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

Вниз

Tray   Найти похожие ветки 

 
Alibaba ©   (2002-03-07 16:40) [0]

Всем привет!
Нарисовал прогу, которая при запуске делает Application.ShowMainForm:=False, потом ставит иконку в Tray (что-бы показать что прога жывая) и чего-то делает.
Все класно. Но есть одно "НО".
Когда я говорю Виндам - ShutDown - закриваются все програмы, которые сейчас открыты - кроме моей! И, соответственно, никакого SutDown-а не происходит. Надо сначала закрывать мою прогу а потом делать ShutDown.

Это происходит потому, что когда Винда делает ShutDown - она разсылает message WM_QUIT все окнам. Но у моей проги нет активного окна во время работы!!! Поэтому моей проге, получается, нечем отловить это сообщение.

Я попытался отловить это сообщение самостоятельно:

const
CM_OK = WM_USER+$1100;

type
TfrmMain = class(TForm)
...
public
procedure OK(var message: TMessage); message CM_OK;
end

procedure TfrmMain.OK(var message: TMessage);
var ms: MSG;
begin
GetMessage(ms,0,0,0);
if ms.message = WM_QUIT then frmMain.Close;
end;

не работает...
Подскажите, может кто знает, куда бежать?


 
Ketmar ©   (2002-03-07 20:15) [1]

смотри WM_QUERYENDSESSION и компанию.

Satanas Nobiscum!

7/Mar/XXXVII A.S.



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

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

Наверх




Память: 0.46 MB
Время: 0.012 c
14-66980
Yuri Btr
2002-02-07 10:39
2002.03.21
Знатоки Clipperа!!!


1-66881
DeNN
2002-03-05 20:21
2002.03.21
Уважаемые Мастера!


3-66743
draculenok
2002-02-20 07:49
2002.03.21
Отчет по нескольким линиям TMemo!!!!


14-67016
Leo^Sun
2002-01-29 07:39
2002.03.21
Программа в программе.


1-66822
Beka
2002-03-05 11:51
2002.03.21
Помогите пожалуйста. Я написалкод который виводит текст под углом