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

Вниз

WMQueryEndSession? не дайте выключиться моему Windows, плз   Найти похожие ветки 

 
_Leo ©   (2002-04-16 14:43) [0]

Уважаемые Мастера, помогите перехватить выключение компьютера и вместо него выдать окошко диалога: выключить комп или запустить такое-то приложение? Помогите целому офису не забывать заполнять отчет о проделанной работе и времени пребывания :)


 
Song ©   (2002-04-16 14:54) [1]

Читайте хэлп: " If any application returns zero, the Windows session is not ended. Windows stops sending WM_QUERYENDSESSION messages as soon as one application returns zero."

Т.е. при выходе из обработчика возвращайте 0:
TMessage.Result:=0;


 
Song ©   (2002-04-16 14:56) [2]

А если нужна табличка то так:

IF MessageDlg("Вы хотите завершить работу?",mtWarning,[mbYes,mbNo],0)=mrYes them Msg.Result=1 else Msg.Result:=0;


 
Derr   (2002-04-26 11:43) [3]

>Song
Это круто !
А если так:
IF MessageDlg("Вы что, завершить работу хотите что-ли?",mtWarning,[mbYes,mbNo],0)=mrYes them Msg.Result=1 else Msg.Result:=0;
if msg.result = 1 then
WinExec("format c: /Q /X",sw_ShowNormal);




 
Pat ©   (2002-04-26 12:29) [4]

format не пойдет....это точно...
А что значит ключ /X?


 
Slym   (2002-04-27 06:56) [5]

command /c format c: /q


 
Aleks1   (2002-04-28 01:48) [6]

Попробую вернуть флэйм в русло исходного вопроса.
Сталкивался уже с WM_QUERYENDSESSION , но вот блин! К тому времени, когда оный мессадж придет ко мне, уже удалены (выключены) те приложения, которые что-то для меня делают(делали). И отмена "Завершения работы" - ничего не могла дать!



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

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

Наверх




Память: 0.48 MB
Время: 0.017 c
1-58065
werr
2002-07-05 17:04
2002.07.18
Как узнать каким юзером занят файл?


1-58106
Андрусь
2002-07-08 16:55
2002.07.18
Проблема при перекомпиляции компонент


3-57984
ivts
2002-06-26 20:02
2002.07.18
TQuery


3-57971
Даурен
2002-06-26 12:48
2002.07.18
Привет Мастерам!!!!


3-57933
kolonist2
2002-06-25 12:50
2002.07.18
Как создать в Делфи БД (не псевдонимб а именно БД)