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

Вниз

Востоновление иконок в 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.038 c
1-41287
Len
2003-10-31 14:16
2003.11.13
Взаимодействие VB и DELPHI


1-41162
tria
2003-11-03 11:04
2003.11.13
Как сделать в ToolBar кнопки разной ширины?


3-40789
ОТК
2003-10-22 15:44
2003.11.13
помогите. Складской учет


14-41937
RoLeX
2003-10-20 16:17
2003.11.13
Как сгенерировать случайные Числа?? Буквы???


1-41454
ss-dd
2003-10-29 11:30
2003.11.13
Rational ClearCase





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский