Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.09.22;
Скачать: [xml.tar.bz2];

Вниз

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

Форум: "Основная";
Текущий архив: 2003.09.22;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.01 c
7-71987
Poirot
2003-07-08 12:33
2003.09.22
Load/Free DLL


1-71581
V.exeR
2003-09-10 04:13
2003.09.22
Drag&Drop в TTreeView


1-71713
GEN
2003-09-10 17:47
2003.09.22
Компонент в вмде стрелочного прибора


14-71943
CinCinNut
2003-09-01 16:15
2003.09.22
Бывают такие люди...


14-71828
VictorT
2003-09-02 00:46
2003.09.22
Полуночники





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