Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2002.10.24;
Скачать: [xml.tar.bz2];

Вниз

Закрытие Windows   Найти похожие ветки 

 
Сережа   (2002-08-16 09:27) [0]

Здравствуйте уважаемые мастера !Помогите пожалуйсто.
Как мне отловить событие завершения Windows ?
Мне нужно закрыть свою прогу перед завершением Windows
Помогите пожалуйсто, может код приведете как начинающему.
С уважением к мастерам и всем откликнувшимся.


 
Dimka Maslov   (2002-08-16 09:30) [1]

В форме надо обрабатывать сообщения WM_QUERYENDSESSION и WM_ENDSESSION


 
Сережа   (2002-08-16 09:33) [2]

Здравствуйте Dimka Maslov
Спосибо, а можно по подробнее


 
Jeer   (2002-08-16 10:17) [3]

При завершении работы 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;



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

Форум: "Система";
Текущий архив: 2002.10.24;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.55 MB
Время: 0.032 c
1-78372
Rule
2002-10-14 22:37
2002.10.24
Помогите изменить цвет закладок в Tab Controlе, цвет формы,


6-78551
Ksion
2002-08-17 16:44
2002.10.24
Авторизация через инет


3-78290
brestmarket
2002-10-03 04:14
2002.10.24
Чтение и ЗАПИСЬ в Paradox-table без BDE и т.п. ?


14-78670
AL2002
2002-10-05 01:03
2002.10.24
Всё. Пора спать, а то


14-78587
Delirium
2002-10-01 15:08
2002.10.24
Дайте ссылку на фотки с последней встречи в Москве





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский