некорректная работа 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]

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

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