Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  


Основы Delphi
Break
Процедура
Выполняет выход из одного цикла System unit
  procedure Break ;
Описание
Процедура Break выполняет выход из одного цикла, то есть из текущего цикла см. пример. Подобно инструкции Goto, она должна использоваться с осторожностью.

Следующая инструкция, которая будет выполнена это та которая стоит после признака конца цикла. Например:

for i := 1 to 10 do
begin
  ...
  break;
  ...
end;
size := 10;  
// перескакивает сюда

 

Важно обратить внимание, что оператор Break выпрыгнет только из текущего цикла - не из всех вложенных циклов выше него. А инструкция Goto может это сделать.
Примечания
Используйте с осторожностью.
Похожие команды
Continue  Заставляет перейти к следующей итерации цикла

Exit  Осуществляет выход из функции или процедуры

For  Начинает цикл, который выполняется конечное число раз

Goto  Вызывает скачок к метке, независимо от вложения

Repeat  Повторяет инструкции, пока не выполнится условие завершения

RunError  Заканчивает программу с диалогом ошибки

While  Повторяет инструкции, пока выполнится условие продолжения

 
Пример кода : Выброс из цикла for по разумным причинам
var
  i : Integer;
  s : string;

begin
  s := '';

  // Большой цикл
  for i := 1 to 10 do
  begin
    s := s + IntToStr(i) + ' ';
    // Выход из цикла, когда выполнено некоторое условие
    if Random(4) = 2 then Break;
  end;

  ShowMessage('i = '+IntToStr(i));
  ShowMessage('s = '+s);
end;
i = 6
s = 1 2 3 4 5 6
 



© Форум Delphi   |  Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки   |  Английская версия