Справочник по Delphi

Exit, процедура

Синтаксис


Exit;

Описание

Вызов процедуры Exit приводит к моментальному возврату из функции или процедуры. Если Exit вызывается из блока try-finally, перед выходом из подпрограммы исполняется секция finally. Процедура Exit встроена в компилятор и не является настоящей процедурой. Если она вызывается вне подпрограммы или метода, Delphi завершает приложение.

Ошибки

Советы и приемы

Пример


// Вычисляет количество итераций в точке (X, Y).
// Останавливается на Maxlterations, что является грубым
// приближением бесконечности. Эта функция используется
// в примере, приведенном в описании BeginThread,
function ComputeIterations(X, Y: Double): Integer;
const
  Threshold = 4.0;
var
  XNew, YNew: Double;
  XC, YC: Double;
begin
  XC := X;
  YC := Y;
  for Result := 0 to MaxIterations-1 do
  begin
     XNew := X * X - Y * Y + XC;
     YNew := 2 * X *Y + YC:
     if (XNew * XNew + YNew * YWew) > Threshold then Exit;
     X := XNew;
     Y := YNew;
  end;
  Result  := Maxlterations;
end;

Смотрите также

Процедура Break.

Учебник по языку Pascal Лабораторные работы по программированию Справочник

Нет комментариев.

Оставить комментарий: