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

меню из иконки в трее   Найти похожие ветки 

← →
demon ©   (2008-08-03 21:36) [0]

Когда вызываю меню из иконки в трее, то оно не пропадает до тех пор, покуда я на него не кликну, даже если теряет фокус.
В чем тут дело?

---

← →
Тын-Дын ©   (2008-08-03 21:40) [1]

> В чем тут дело?


Ошибка в программе.

---

← →
Юрий Зотов ©   (2008-08-03 21:45) [2]

Перед показом меню: SetForegroundWindow(Wnd);
После показа меню: PostMessage(Wnd, WM_NULL, 0, 0);

Wnd - хэндл окна, которое получает сообщения от иконки.

---

← →
Тын-Дын ©   (2008-08-03 21:50) [3]

> Юрий Зотов ©   (03.08.08 21:45) [2]


Вопрос - зачем

> PostMessage(Wnd, WM_NULL, 0, 0);

?

---

← →
Юрий Зотов ©   (2008-08-03 22:06) [4]

> Тын-Дын ©   (03.08.08 21:50) [3]

Не помню. Но помню, что без этого действительно были какие-то глюки с меню. Какие именно - тоже не помню.

Склероз...
:о)

---

← →
Тын-Дын ©   (2008-08-03 22:15) [5]

> Юрий Зотов ©   (03.08.08 22:06) [4]
> > Тын-Дын ©   (03.08.08 21:50) [3]Не помню. Но помню, что
> без этого действительно были какие-то глюки с меню. Какие
> именно - тоже не помню.Склероз...


С SetForegroundWindow(Wnd) всё понятно.
А без WM_NULL вроде бы глюков не наблюдал до сих пор-)
Ну да ладно-)

---

← →
JanMihail   (2008-08-03 23:13) [6]

procedure TForm1.PopupMenu1Popup(Sender: TObject);
begin
 // что-то тут нужно написать и все будет ок, только не помню что
 PopupMenu.AutoPopup := True;//вроде это но не помню
end;

---

← →
demon ©   (2008-08-03 23:53) [7]

> Юрий Зотов ©   (03.08.08 21:45) [2]
> Перед показом меню: SetForegroundWindow(Wnd);После показа
> меню: PostMessage(Wnd, WM_NULL, 0, 0);Wnd - хэндл окна,
> которое получает сообщения от иконки.

Спасибо! Всё так просто ;)

---

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

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



Память: 0.46 MB
Время: 0.013 c