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

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

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

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

Delphi Sources

Описание
Процедура Halt вынуждает резкое завершение текущего приложения. Предупреждение: не гарантируется, что ресурсы будут освобождены при вызове halt. Переменная ExitCode может быть произвольно установлена, передавая значение ExitValue. Этот код передается прерывателю приложения как код возврата от приложения. Если значение ErrorAddr уже было присвоено, перед тем как был вызван Halt, то диалог отображается, показывая значение ErrorAddr и ExitCode. После выполнения Halt, перед фактическим завершением программы, выполняется секция модуля finalization.
Примечания
Предупреждение: используйте только в исключительных случаях.
Похожие команды
Break  Выполняет выход из одного цикла

Continue  Заставляет перейти к следующей итерации цикла

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

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

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

RunError  Заканчивает программу с диалогом ошибки

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

 
Пример кода : Останавливает программу с диалогом ошибки
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;
Программа заканчивается, не выполнив инструкцию ShowMessage. Диалог ошибки отобразит:
Runtime error 4 at 0069FC94
 


Последние добавленные на сайт исходники

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

Айболит (remote control)

 

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

Canvas Drawing

 

Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте