![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Закрытие Windows [D5, Win95/98]
Сережа © (2002-08-16 09:27:00)Здравствуйте уважаемые мастера !Помогите пожалуйсто.
Как мне отловить событие завершения Windows ?
Мне нужно закрыть свою прогу перед завершением Windows
Помогите пожалуйсто, может код приведете как начинающему.
С уважением к мастерам и всем откликнувшимся.
Jeer (2002-08-16 10:17:00) [1]При завершении работы Windows каждое открытое приложение получает сообщение WM_QUERYENDSESSION, сопровождаемое сообщением WM_ENDSESSION, в случае, если закрытие сессии не отменено.
type
TfmMain = class(TfmStatusPgBar)
private
{ Private declarations }
procedure WMQueryOnExit(var Msg: TWMQueryEndSession); message WM_QUERYENDSESSION;
public
{ Public declarations }
end;
....
procedure TfmMain.WMQueryOnExit(var Msg: TWMQueryEndSession);
begin
if (Msg.Unused and ENDSESSION_LOGOFF)= 0 then
ShowMessage("Exit");
else
ShowMessage("LogOff");
end;
Сережа (2002-08-16 09:33:00) [2]Здравствуйте Dimka Maslov
Спосибо, а можно по подробнее
Dimka Maslov (2002-08-16 09:30:00) [3]В форме надо обрабатывать сообщения WM_QUERYENDSESSION и WM_ENDSESSION