Справочник функций и процедур Delphi: RunError

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

  Реклама:

Рейтинг конструкторов сайтов обзор бесплатных конструкторов для создания сайтов.  |

RunError
Процедура
Заканчивает программу с диалогом ошибки System unit
  procedure RunError ( { ExitValue : Integer } ) ;

Google  
 
Описание
Процедура RunError вынуждает резкое завершение текущего приложения.

Предупреждение: нельзя гарантировать,что ресурсы быдут освобождены при запросе RunError.

Например, переменная ExitCode может быть установлена, передавая ExitValue. Этот код возвращается завершателю приложения как код возврата от приложения.

Диалог отобразится, показывая ErrorAddr (где RunError был выполнен) и значение ExitCode.

После RunError выполняется, раздел finalization модуля, которая выполняется прежде, чем программа фактически заканчивается.
Примечания
Предупреждение: используйте только в исключительных обстоятельствах.
Похожие команды
Break  Выполняет выход из одного цикла

Exit  Осуществляет выход из функции или процедуры

ExitCode  Устанавливает код возврата, когда приложение заканчивается

Goto  Вызывает скачок к метке, независимо от вложения

Halt  Заканчивает программу с дополнительным диалогом.

Abort  Прерывает обработку команд и выходит к последнему исключительному блоку

 
Пример кода : Закончивание программы с диалогом ошибки
begin
  // Остановка программы с кодом завершения 0
  RunError;

  // Нижеследующее не будет выполнено
  ShowMessage('Мы не добираемся настолько далеко');
end;
Программа заканчивается, не выполняя инструкцию ShowMessage. Диалог ошибки отобразит:

Runtime error 0 at 00452105
 


Copyright © 2004-2016 Delphi Sources (источник – "DelphiBasics.ru")
 


Группа ВКонтакте   Ссылка на Twitter   Группа на Facebook