Управляющая процедура завершения программы с генерацией ошибки времени выполнения RunError

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

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

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

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

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



Вы можете оставить комментарий, или Трекбэк с вашего сайта.

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