управленския цикъл в Делфи

управленския цикъл в Делфи. Операторите да продължават и да се счупят.

Вие търсихте контрол цикъл в Делфи. Операторите да продължават и да се счупят. и най-вече за вас, ние сме подготвили този урок Delphi. Всеки урок ние се опитваме да предостави на Delphi изходния код, така че в края на управлението на хартия цикъл в Делфи. Операторите да продължават и да се счупят. Можете да видите пример за Делфи, и Delphi код, който ще разгледа контрол цикъл в Делфи. Операторите да продължават и да се счупят. по-подробно.
Научете програмирането онлайн на интернет страницата www.DelphiSchool.3dn.ru и овладеят основите на програмирането. Образование Програмиране DelphiSchool този програмиране за начинаещи и опитни програмисти.

Работа цикъл също могат да бъдат контролирани. В Делфи, има два контрол оператор - прекъсне и да продължи. В този урок ще научите как да се работи с тези оператори и някои примери за това как да Delphi може да се напише програма, с помощта на почивката и да продължи да управлява цикъла. За начало, ние ще започнем нашето внимание и проучване на циклите на контрола в Делфи, за да продължите оператор.
Да предположим, че трябва да се разделят на броя на 10 число от -3 до 3, и показване на резултата в TListBox. За да се реши този проблем възниква цикъл трябва да бъде изпълнена от -3 до +3. По-долу можете да видите примерен код за този цикъл, в който ние ще се опитаме да се реализират предварително определената степен на завършеност:

В този пример, цикъл започва в което променливата и ще варира от -3 до 3. На всяка стъпка 10 е разделена на стойността на I и съхранява резултата променлива г.
При разделяне на кръг функция се използва. които кръга му тази стойност. Като начална стойност, ние го резултат на разделяне 10 променливата премине I, т.е. кръг (10 / I). Така, променливата г се записва закръглена до число резултат на разделяне.
Следващата стъпка е допълнение резултат на ListBoxl на, с едновременно превръщане на променливата Z в низа.
Нека да видим какво ще се случи, когато променливата и е равен на 0. В този случай, броят 10 ще бъде разделен на 0, което означава, че има грешка, защото не можете да се разделят с 0. Как тогава да се измъкнем от тази ситуация? Можете да на всеки етап от цикъла, за да проверите стойността на I, и ако тя е 0, като не извършва никакви действия. Два възможни решения са показани в кода по-долу:

? 200 '200px': '' + (this.scrollHeight + 5) + 'пиксела ");"> процедура TForm1.Button1Click (Sender: TObject # 41 ;;
Var
I, R: цяло число;
започвам
защото: = - 3 3 да се направи
започнем // старт за за отчет
ако аз<>0 след това
започнем // започне за ако изявлението
R: = кръг (10 / и # 41 ;;
ListBox1.Items.Add ('10 / '+ IntToStr (I # 41 +' = '+ IntToStr (R # 41, # 41 ;;
приключи; // Това края на отчета, ако
приключи; // Това края на изявление за
приключи;

В този пример, при всеки етап проверява стойността на I, и ако не е 0, то е само в този случай, се извършват изчисленията.
Това е много просто решение за малки и прости програми. Но ако си цикъл е голям и не много екшън, решението ще бъде най-малко неудобно и може да се загуби "четливост" код. В най-лошия случай, няма да получите нищо. Тук идва на помощ продължи изявление.

? 200 '200px': '' + (this.scrollHeight + 5) + 'пиксела ");"> процедура TForm1.Button1Click (Sender: TObject # 41 ;;
Var
I, R: цяло число;
започвам
защото: = - 3 3 да се направи
започнем // старт за за отчет
ако I = 0, тогава
започнем // започне за ако изявлението
ListBox1.Items.Add ( "не може да се раздели на нула '# 41 ;;
Продължи;
приключи; // Това края на отчета, ако
R: = кръг (10 / и # 41 ;;
ListBox1.Items.Add ('10 / '+ IntToStr (I # 41 +' = '+ IntToStr (R # 41, # 41 ;;
приключи; // Това края на изявление за
приключи;

В този пример, ние проверяваме всяка стъпка от стойността на променливата аз. Ако тя е нула, съобщението в ListBoxl че не може да се раздели на нула, и изпълнява изявлението продължи. След като програмата отговаря на този оператор, той веднага прекъсва по-нататъшното изпълнение на цикъла и продължава към следващата стъпка. Това е същото, което се изпълни "Спри за продължаване на изпълнението на програмата, за да се увеличи стойността на променливата аз и начало на цикъла със следващата стойност."
След като програмата отговаря продължи оператор, тя скача до края на цикъла, където стойността на брояча се увеличава (в този случай, променливата и) и изпълнението продължава от следващата стъпка.
Фигурата по-долу показва формата с резултатите от нашия пример.

Фигура. Пример управляваща верига чрез оператор Продължи

Използване продължи с течение на доста удобно и безопасно, за разлика от това време, или се повтаря ... докато цикли. Нека разгледаме следния пример:

? 200 '200px': '' + (this.scrollHeight + 5) + 'пиксела ");"> I: = - 3
докато аз<3 do
започне ако I = 0, тогава
продължи;

R: = кръг (10 / и # 41 ;;
ListBoxl.Items.Add ('10 / '+ IntToStr (I # 41 +' = '+ IntToStr (R # 41, # 41 ;;
I: = I + L;
приключи;

? 200 '200px': '' + (this.scrollHeight + 5) + 'пиксела ");"> ако аз = 0, тогава
започвам
I: = I + L;
продължи;
приключи;

В този случай, преди стъпката на прекъсване на стойност цикъл на променливата I се увеличава с един, а след това на следващата стъпка няма да е нула.
Сега нека да се справят с изявление почивка. След като програмата отговаря на този оператор, цикълът се прекратява и изпълнението се предава на следващия отчет след изявлението на цикъла. Да вземем предишния пример и да го замени продължи да се прекъсне

? 200 '200px': '' + (this.scrollHeight + 5) + 'пиксела ");"> процедура TForm1.Button1Click (Sender: TObject # 41 ;;
Var
I, R: цяло число;
започвам
защото: = - 3 3 да се направи
започнем // старт за за отчет
ако I = 0, тогава
започнем // започне за ако изявлението
ListBox1.Items.Add ( "не може да се раздели на нула '# 41 ;;
прекъсване;
приключи; // Това края на отчета, ако
R: = кръг (10 / и # 41 ;;
ListBox1.Items.Add ('10 / '+ IntToStr (I # 41 +' = '+ IntToStr (R # 41, # 41 ;;
приключи; // Това края на изявление за
ListBox1.Items.Add ( "изчисление е над '# 41 ;;
приключи;

В този случай, ако стойността на I е равна на нула, съобщението, че не може да се раздели на нула, и цикълът се прекъсва. След това, за контрол се предава на следващия отчет след цикъл. Фигурата по-долу показва резултата от програмата.

Фигура. Пример управляваща верига чрез проникване оператор

Както можете да видите, след среща с нула в течение след това тя не прави нищо и просто да се прекъсне изявление приключи своята работа.