Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Delphi - Справочник: Break
Break
|
procedure Break ; |
Процедура (Unit System)
|
Выполняет выход из одного цикла
|
Описание:
|
Процедура Break выполняет выход из одного цикла, то есть из текущего цикла см. пример. Подобно инструкции Goto, она должна использоваться с осторожностью. Следующая инструкция, которая будет выполнена это та которая стоит после признака конца цикла. Например: for i := 1 to 10 do begin ... break; ... end; size := 10; // перескакивает сюда Важно обратить внимание, что оператор Break выпрыгнет только из текущего цикла - не из всех вложенных циклов выше него. А инструкция Goto может это сделать. |
Пример кода: Выброс из цикла 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 |
Примечание:
|
Используйте с осторожностью. |