![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Пытаюсь отследить завершение работы Windows... [Delphi, Windows]
-Alex- © (2002-10-26 17:26:00)Привет.
Ребятки, ну, не получается у меня отследить завершение работы. В чём тут дело?
procedureTForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
ifMessageDlg(" Вы уверены?", mtConfirmation, mbYesNoCancel, 0) = mrYes then
CanClose := true //Разрешаем завершение работы.
else
CanClose := false; //Nе разрешаем завершение работы.
end;
Gandalf (2002-10-26 21:30:00) [1]>Ребятки, ну, не получается у меня отследить завершение работы. >В чём тут дело?
1) В Кол компонент Form (форма VCL), НИКАК не относится к программе. Привязывать к ней сообщения БЕСПОЛЕЗНО, их надо привязывать к аналогичным KOLForm.
2) События CloseQuery(которого нет в КОЛ) и Close(которое там есть), не сильно относятся к завершению Window. Они относятся к завершению программы.
3) Скорее тебе пойдет QueryEndSession - если я ничего не путаю.
Удачи!