Завершить программу в обработчике FormOnCreate

← →
Володя (2003-02-27 07:04) [0]

Чтобы завершить программу пользовался командой закрытия главной формы:Form.Close; Но возникла потребность завершать программу уже в обработчике события создания главной формы. И там этот оператор не работает. Пытаюсь завершить командой:Application.Terminate; иногда завершается нормально, а иногда вываливается срез памяти (в откомпилированном виде:"Программа выполнила недопустимую операцию")
Что же делать ?

← →
gek © (2003-02-27 07:33) [1]

Попробуй halt

← →
Vladimir © (2003-02-27 07:47) [2]

Form1.Release

← →
Style (2003-02-27 08:16) [3]

if(надо выйти на Create)
then
begin
PostQuitMessage(0); то же что и halt
FormOnDestroy(nil); - если ты уже чего то создал не забудь убить
exit;
end;

Удалено модератором
Примечание: Создание пустых сообщений

← →
Alexander1966 (2003-02-27 10:45) [5]

Из HELP-a:

In addition to displaying the exception message, which happens by default, the following code shuts down the application when a VCL exception is not caught and handled.

procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnException := AppException;

end;

procedure TForm1.AppException(Sender: TObject; E: Exception);

begin
Application.ShowException(E);
Application.Terminate;
end;

Завершить программу в обработчике FormOnCreate Найти похожие ветки