На этом шаге мы рассмотрим процедуру RunError.

    Процедура RunError останавливает выполнение программы и генерирует ошибку времени выполнения с заданным кодом.

    Процедуре RunError также, как процедуре Halt может быть передан необязательный параметр, который задает код генерируемой ошибки.

procedure    ExampleExit;
   .    .    .    .    .
begin
  <Оператор>;
   .    .    .    .    .
  if   <Выражение> then RunError(<Код ошибки>);
   .    .    .    .    .
  <Оператор>; 
end;

    Со следующего шага мы начнем знакомиться с файлами.

Предыдущий шаг Содержание Следующий шаг