Закрыть программу

← →
Officeman (2005-12-11 04:03) [0]

есть form1 интро программы.
осноная рабочая form 2, именно её пользовать закрывает когда хочет заверщить работу с программой. я установил на событие onClose, следующие команды

//выход
form1.Destroy;
application.Terminate;

и всёравно иногда при закрытии программы. ОНА вешается..
что я нетак сделал. что надо сделать?!

← →
Джо © (2005-12-11 04:10) [1]

Не делать главную форму заставкой, очевидно.

← →
Officeman (2005-12-11 04:32) [2]

;(

← →
Джо © (2005-12-11 04:33) [3]

А почему так пессимистично? ))
На самом деле ничего сложного ведь.

← →
Набережных С. © (2005-12-11 08:35) [4]

> Officeman (11.12.05 04:03)
> есть form1 интро программы.
> осноная рабочая form 2, именно её пользовать закрывает когда
> хочет заверщить работу с программой. я установил на событие
> onClose, следующие команды
>
> //выход
> form1.;
> application.;

Напиши Form1.Close, Destroy и Terminate убери. Но [1] правильнее.

← →
Anatoly Podgoretsky © (2005-12-11 13:58) [5]

Набережных С. © (11.12.05 08:35) [4]
Еще проще, стереть все строки в onClose и нажать Ctrl+S

← →
Набережных С. © (2005-12-11 15:47) [6]

> Anatoly Podgoretsky © (11.12.05 13:58) [5]

Анаталий, ну я же вроде сказал, что правильнее [1], или о чем? Простое закрытие неглавной формы ведь не завершит приложение.

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction); begin PostMessage(Application.Handle,WM_CLOSE,0,0); end;

← →
Officeman (2005-12-14 21:46) [8]

спасибо! попробую через postmessage.

с Уважением ко всем участникам, Officeman

Officeman (14.12.05 21:46) [8]
Проверь так же с WM_QUIT

Закрыть программу Найти похожие ветки