Delphi For Выход Из Цикла

В Delphi для выхода из цикла можно использовать оператор break. Он прерывает выполнение цикла и переходит к следующей строке после цикла. Пример:

  for i := 1 to 10 do 
  begin 
    if i = 5 then 
      break; 
    ShowMessage(IntToStr(i)); 
  end;

В этом примере цикл исполняется 10 раз, но когда i достигает 5, оператор break вызывает выход из цикла. В результате на экране будет выведено только числа от 1 до 4. Если нужно выполнить операцию, но только если цикл был завершен, то можно использовать оператор for... else. Пример:

  for i := 1 to 10 do 
  begin 
    if i = 5 then 
      break; 
    ShowMessage(IntToStr(i)); 
  end 
  else 
    ShowMessage('Цикл завершен.');

Этот пример выводит числа от 1 до 4 на экран, а затем выводит сообщение «Цикл завершен». Если цикл был завершен оператором break, сообщение не будет выведено.