Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Вниз

System Tray 


User_OKA   (2001-11-28 15:25) [0]

Вычитал в умной книге как разместить значок на SystemTray.
Никак не могу добиться, чтобы при щелчке на иконке появилось
меню TPopupMenu. Вся загвоздка в том, что нет связи иконки с
моим приложением и не обрабатывается процедура:

Procedure Tform1.WMICON(var msg: TMessage);

хотя свойство объекта

nidata: TNotifyIconData
nidata.uCallBackMessage:=WM_MYTRAYNOTIFY;
где
Const
WM_MYTRAYNOTIFY=WM_USER + 123;

Так написано в книге, но по всей видимости что-то не так.
В настоящее время пользуюсь RXLib, но охота разобраться с
проблемой. Помогите, кто может.



Delirium   (2001-11-28 15:43) [1]

www.master-brain.boom.ru
У меня есть оч.простой компонентик - посмотри сам всё поймёшь




Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.022 c
1-9118            ATLANTIDO             2002-02-16 01:33  2002.03.04  
KILL FORM


3-9078            Jhonny                2002-02-07 07:07  2002.03.04  
Максимальное значение кода в базе данных


1-9133            f0rm                  2002-02-17 00:01  2002.03.04  
Вытаскивание e-mail ов


1-9216            DJ X                  2002-02-14 16:28  2002.03.04  
Подбросте пример кода


14-9271           модератор             2002-01-14 11:19  2002.03.04  
По вопросам модерирования просьба обращаться по адресу