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

Вниз

Востоновление иконок в tray области при перезапуске explorer   Найти похожие ветки 

 
valler   (2003-11-02 12:07) [0]

Есть программа помещающая свою иконку в Tray(компонент RxTrayIcon). Когда происходит ошибка в explorer.exe и он перезапускается иконка программы исчезает. Отсюда вопрос - как отследить перезапуск explorer.exe и что сделать, чтобы иконка программы опять востановилась в Tray?


 
KSergey ©   (2003-11-02 12:24) [1]

Да в таких случаях, помнится, кроме часиков - нифига не появляется. Так что, думаю, можно плюнуть на это. Все равно ни у кого (?) нет. Во всяком случае, мне не попадалось.


 
Opuhshii ©   (2003-11-02 12:39) [2]

зарегистрировать сообщение,..

RegisterWindowMessage("TaskbarCreated");

и его обрабатывать,..


const WM_TASKBARCREATED:DWORD=WM_USER+100;

..........
protected
procedure WndProc(var Message: TMessage); override;
..........

procedure TForm1.FormCreate(Sender: TObject);
begin
WM_TASKBARCREATED:=RegisterWindowMessage("TaskbarCreated");
end;

procedure TForm1.WndProc(var Message: TMessage);
begin
inherited;
if Message.Msg = WM_TASKBARCREATED then begin
AddMyTrayIcon;
end else
inherited;
end;



 
Maxud ©   (2003-11-02 12:39) [3]

SpIDer Guard у меня в таких случаях все-равно появляется в tray, значит следит как-то...


 
Opuhshii ©   (2003-11-02 12:42) [4]

)))

procedure TForm1.WndProc(var Message: TMessage);
begin
if Message.Msg = WM_TASKBARCREATED then begin
AddMyTrayIcon;
end else
inherited;
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.022 c
1-41367
Cranium
2003-10-30 15:13
2003.11.13
Как разместить несколько форм в одном модуле?


4-42297
Sirakuz
2003-09-09 17:27
2003.11.13
Перевести SYSTEMTIME в FILETIME


3-41106
Саня
2003-10-21 07:08
2003.11.13
Скорость открытия таблицы (запроса).


3-40958
GSV_
2003-10-17 08:31
2003.11.13
Специалистам по Oacle. Вопрос про snapshot


1-41394
Элина
2003-10-29 15:10
2003.11.13
поМОГИТЕ С РЕСУРСАМИ