Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.06.29;
Скачать: CL | DM;

Вниз

Как отловить выключение windows.   Найти похожие ветки 

 
Merlot   (2005-04-29 10:59) [0]

Здравствуйте Уважаемые!
Подскажите пожалуйста как узнать, что windows выключается.
Пробывал WM_QUERYENDSESSION и WM_ENDSESSION, когда выключение идет через меню пуск, все нормально работает, но если комп выключать кнопкой "включение", то эти события не отслеживаются. Спасибо!


 
mgcr ©   (2005-04-29 11:15) [1]


> но если комп выключать кнопкой "включение", то эти события
> не отслеживаются. Спасибо!


Если выдергивать сетевой шнур, то сообщений тоже не посылается. Странно, правда ?


 
КиТаЯц ©   (2005-04-29 11:22) [2]

Держи:


 private
   procedure WMQueryEndSession(var Message: TWMQueryEndSession); message WM_QUERYENDSESSION;

procedure tForm1.WMQueryEndSession(var Message: TWMQueryEndSession);
begin
inherited;
Message.Result:=0;                                                
 showmessage("Кажется Виндус вырубается...");
Message.Result:=1;
end;


Кнопку "пуск" отлавливает если в панели управление - электропитание - при нажатии кнопки отключения питания НЕ стоит "Действие не требуется"
Кнопку "Ресет" почему-то не ловит...


 
alpet ©   (2005-04-29 12:33) [3]

У тебя блок-питания отключает Windows или кнопка выключения ?

The WM_QUERYENDSESSION message is sent when the user chooses to end the session or when an application calls the ExitWindows function.

Действительно - если пользователь хочет завершить сеанс, или приложение вызвало функцию ExitWindows.

Есть еще сообщения по просыпанию/засыпанию компа.
WM_POWERBROADCAST
А также полезные функции в разделе MSDN: Power Management Functions
Локальная ссылка: ms-help://MS.MSDNQTR.2003APR.1033/power/base/power_management_functions.htm


 
Merlot   (2005-04-29 12:49) [4]

у меня отключает windows кнопка выключения.



Страницы: 1 вся ветка

Текущий архив: 2005.06.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.033 c
10-1094464325
Ragazor
2004-09-06 13:52
2005.06.29
Как в делфи перевести команду 1С такого синтаксиса


1-1118046896
Cosinus
2005-06-06 12:34
2005.06.29
Помогите найти ошибку в функции подсчета кол-ва файлов...


3-1116151121
Рукма
2005-05-15 13:58
2005.06.29
Value of field CurrencyRate is out of range


14-1117471924
Cerberus
2005-05-30 20:52
2005.06.29
Новый значёк


14-1117561140
Juice
2005-05-31 21:39
2005.06.29
D8, D2005. Правильный выбор?