Описание:
Delphi процедура Break выполняет выход
из одного цикла, то есть из текущего цикла см. пример.
Пример кода:
var
i : Integer;
s :
string;
begin
s := '';
// A big
loop
for i := 1 to 10 do
begin
s := s + IntToStr(i) + ' ';
// Exit loop when a certain condition is met
if Random(4) = 2 then Break;
end;
ShowMessage('i = '+IntToStr(i));
ShowMessage('s = '+s);
end;