Вниз
Скачать: CL | DM;

некорректная работа PopupMenu в трее   Найти похожие ветки 

 
AndreyAs   (2003-09-11 15:16) [0]

Добрый день, мастера!

Моя форма показывает иконку в трее.
При нажатии правой кнопки мыши на этой иконке показываю свое PopupMenu:

procedure TMyForm.WMTRAYICONNOTIFY(var Msg: TMessage);
var
ACursorPos: TPoint;
begin
case Msg.LParam of
WM_RBUTTONDOWN:
begin

GetCursorPos(ACursorPos);
PopupMenu.Popup(ACursorPos.X, ACursorPos.Y);

...

Проблема следующая: это меню ведет себя не вполне нормально (по сравнению с popup menus, появляющимися при нажатии левой кнопкой мыши в трее на иконках других приложений), а именно:
после появления меню и клика вне меню, оно не прячется (как привычно пользователю), а продолжает висеть до тех пор пока не будет выбран какой-либо итем. А если выбирать ничего не нужно.

Есть ли способ поправить такое поведение?


 
[lamer]Barmaglot ©   (2003-09-11 15:35) [1]

FAQ?

http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988621935&n=15


 
AndreyAs   (2003-09-11 15:57) [2]

Спасибо огромное!



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
3-71545
AlexWeb
2003-08-27 13:11
2003.09.22
Как обновить данные в TIBQuery или TIBDataSet?


1-71701
Andery
2003-09-11 15:32
2003.09.22
FastReport и DLL


1-71590
ah
2003-09-09 21:51
2003.09.22
мне нужно распечатать на принтере график на рисованной


3-71511
DelphiNew
2003-09-02 09:50
2003.09.22
Sql запрос


3-71493
yurez
2003-09-01 15:43
2003.09.22
translate error. value out of bounds - не могу забороть.




   Наверх