Клуб программистов

    Delphi процедура Halt заставляет внезапно завершить текущее приложение.

     Используйте если вам необходимо внезапное завершение работы программы, то есть экстремальное прекращение выполнения команд приложения. Возможно при возникновении ошибок или сбоев в работе приложения.  

    Предупреждение: ресурсы могут быть не освобождены после вызова Halt.

    Дополнительно, переменная ExitCode может передавать значение ExitValue. Этот код является обратным кодом из приложения как подтверждение внезапной остановки программы.

    Если ErrorAddr назначенная величина, тогда если вызвана процедура Halt, отображается диалог, который выводит на экран ErrorAddr и величины ExitCode.

    После того, как Halt выполнится, секция finalization программы выполниться прежде, чем программа действительно завершится.

var
   i : Integer;
begin
   // Set up an error address so that halt shows a termination dialog
   ErrorAddr := Addr(i);

   // Stop the program with exit code 4
   Halt(4);

   // The following will not be executed
   ShowMessage('We do not get this far');
end;

The program terminates without running the ShowMessage statement. An error dialog is displayed:

Runtime error 4 at 0069FC94