Устанавливает код возврата, когда приложение заканчивается
System unit
var ExitCode : Integer;
Описание
Переменная ExitCode содержит код, возвращаемый приложением при завершении вызывателю завершения.
Если значение переменной ErrorAddr не 0, то значение ExitCode будет отображено в диалоговом окне.
Похожие команды
Addr Возвращает адрес переменной, функции или процедуры
ErrorAddr Устанавливает адрес ошибки, когда приложение заканчивается
Пример кода : Отображение кода завершения в диалоге ошибки завершения
var
i : Integer;
begin // Установка адреса ошибки так,
чтобы прерывание показало диалог завершения
ErrorAddr := Addr(i); // Установка кода завершения
программы ExitCode := 8;
end;
Когда программа прервётся, диалог ошибки отобразит: