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

Вниз

Не всегда появляется трей-иконка   Найти похожие ветки 

 
Leaner ©   (2004-10-05 19:30) [0]

Здравствуйте ! У меня такая проблема:
Программа стартует вместе с Windows из Run регистра.
И трей-иконка не всегда появляется( но создается ).
В чем может быть дело ?
function CreateDeleteTrayIcon(Num:integer;AddIco:Boolean):Boolean;
var
Nidata:TNotifyIconData;
begin
SendMessage(Application.MainForm.Handle,WM_USER+1715,Integer(not AddIco),-1);
Nidata.cbSize:=SizeOf(TNotifyIconData);
Nidata.Wnd:=Application.MainForm.Handle;
Nidata.uID:=Num;
if AddIco then
 begin
  Nidata.uFlags:=NIF_ICON or NIF_MESSAGE or NIF_TIP;
  Nidata.uCallBackMessage:=WM_USER+1715
  Nidata.hIcon:=Application.Icon.Handle;
  StrPCopy(NiData.szTip,AppName);
  Result:=Shell_NotifyIcon(NIM_ADD,@Nidata);
  Exit;
 end;
Result:=Shell_NotifyIcon(NIM_DELETE,@Nidata);
end;


Функция вызывается в .dpr после
Application.CreateForm(TMainForm, MainForm);


 
Cobalt ©   (2004-10-05 22:03) [1]

А Result проверяешь?
И Run - какой?
В какой ОС проявляется?


 
Leaner ©   (2004-10-05 22:49) [2]

>Cobalt
>А Result проверяешь?
Да, дважды: получаю SendMessage и смотрю результат
>И Run - какой?
HKEY_LOCAL_MACHINE
>В какой ОС проявляется?
XP


 
Cobalt ©   (2004-10-06 00:45) [3]

1)
>>А Result проверяешь?
>Да, дважды: получаю SendMessage и смотрю результат

И...?

2)
>>В какой ОС проявляется?
>XP
А в Win2K/NT?


 
GuAV ©   (2004-10-06 01:54) [4]

А если
 Nidata.hIcon:=LoadImage(hInstance, "MAINICON",
       IMAGE_ICON, 16, 16, LR_DEFAULTCOLOR); ?



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

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

Наверх




Память: 0.47 MB
Время: 0.038 c
1-1099320334
Kat
2004-11-01 17:45
2004.11.14
Как узнать сколько дней в январе например?


3-1097714633
saNat
2004-10-14 04:43
2004.11.14
ADOConnection


1-1099309330
Igor_
2004-11-01 14:42
2004.11.14
CONSOLE APPLICATION


3-1098090555
Layner
2004-10-18 13:09
2004.11.14
Помогите парсировать SQL запрос


3-1097522029
Morrison
2004-10-11 23:13
2004.11.14
Глюк: Query не находит полей...