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

Вниз

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

 
anod   (2002-08-08 14:01) [0]

восстанавливать иконку после глюков эксплорера


 
Antonius   (2002-08-08 15:16) [1]

чью иконку? каких шлюков?


 
anod   (2002-08-08 21:02) [2]

иконку в трее (извините, забыл написать).


 
DarkSimpson   (2002-08-08 21:22) [3]

Эта, как яво... О...
Эксплорер шлет сообщение WM_TASKBARCREATED после глюков.
Лови ево и восстанавливай икону.


 
anod   (2002-08-08 21:59) [4]

большой thanks


 
anod   (2002-08-08 23:34) [5]

Нет теакого сообщения в Windows SDK???
procedure WMTASKBARCREATED(var msg:TMessage); message WM_TASKBARCREATED;

[Error] Unit1.pas(112): Undeclared identifier: "WM_TASKBARCREATED"


 
DarkSimpson   (2002-08-09 00:24) [6]

Блин, забыл...
--
Вообщем я делаю так (я пишу замену эксплореру - свой шелл):

WM_TASKBARCREATED := RegisterWindowMessage("TaskbarCreated");
PostMessage(HWND_BROADCAST, WM_TASKBARCREATED, 0, 0);

И после этого AVP, например, кидает свою иконку обратно.


 
anod   (2002-08-09 16:19) [7]

Я так понимаю мне надо сделать так
var WM_TASKBARCREATED: TMessage;
WM_TASKBARCREATED := RegisterWindowMessage("TaskbarCreated");
А потом ловить, только как?


 
Opuhshii   (2002-08-09 16:26) [8]

1. WM_TASKBARCREATED:DWORD не TMessage
оконная проц-а первой получает все сообщения,.. там и лови....


 
anod   (2002-08-09 18:02) [9]

procedure TForm1.WndProc(var msg: TMessage);
begin
case msg.Msg of
WM_TASKBARCREATED: begin
end;
end;
end;

Можкт я неправильно описываю оконную процедуру?


 
anod   (2002-08-09 19:36) [10]

Попробовал в другой программке
var WM_TASKBARCREATED: DWORD; (или Cardinal);

WM_TASKBARCREATED := RegisterWindowMessage("TaskbarCreated");

В оконной процедуре пишу
WM_TASKBARCREATED: begin
TaskBarIcon(NIM_ADD, Icon);
end;


Ругается:
[Error] CDS.dpr(225): Constant expression expected


 
Ученик   (2002-08-09 19:41) [11]

procedure DefaultHandler(var Message); override;


procedure TMainForm.DefaultHandler(var Message);
begin
if (TMessage(Message).Msg = WM_TASKBARCREATED) then
TaskBarIcon(NIM_ADD, Icon)
else
inherited DefaultHandler(Message)
end;


 
anod   (2002-08-09 20:31) [12]

Большое спасибо, вроде работает.



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

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

Наверх




Память: 0.46 MB
Время: 0.008 c
14-85644
Eugene_Jek_Efimochkin
2002-08-30 00:46
2002.09.26
Тестинг прог


7-85724
DC-AC
2002-07-05 12:27
2002.09.26
IOCTL-коды


1-85466
Gari
2002-09-16 09:08
2002.09.26
Работа с компонентами


1-85548
ЮРИЙ_К
2002-09-12 10:21
2002.09.26
Формирование документа по шаблону форы


6-85636
Butt
2002-07-23 19:54
2002.09.26
Проблема с отправкой пакетов с WinPcap через модем





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