ExitCode
Переменная
Устанавливает код возврата, когда приложение заканчивается System unit
  var ExitCode : Integer;

Delphi Sources

Описание
Переменная ExitCode содержит код, возвращаемый приложением при завершении вызывателю завершения.

Если значение переменной ErrorAddr не 0, то значение ExitCode будет отображено в диалоговом окне.
Похожие команды
Addr  Возвращает адрес переменной, функции или процедуры

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

 
Пример кода : Отображение кода завершения в диалоге ошибки завершения
var
  i : Integer;
begin
  // Установка адреса ошибки так, чтобы прерывание показало диалог завершения
  ErrorAddr := Addr(i);

  // Установка кода завершения программы
  ExitCode := 8;
end;

Когда программа прервётся, диалог ошибки отобразит:

Runtime error 8 at 0069FC94