Главная страница
    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
14-71848
хз
2003-08-31 02:47
2003.09.22
По юриспруденции


1-71746
Broot
2003-09-10 10:42
2003.09.22
Разбиение строкИ на стрОки


14-71906
shelest
2003-09-03 13:29
2003.09.22
DOA for Delphi 7


3-71481
Dush
2003-09-01 10:43
2003.09.22
Группировка данных


3-71466
AtoL
2003-08-28 09:42
2003.09.22
FIBPlus и DBLookUpComboBox





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