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

PopupMenu   Найти похожие ветки 

← →
FAskerQ ©   (2007-01-19 16:52) [0]

Обьясните мне такую вещь, когда кликаешь по форме

procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
begin
  PopupMenu1.Popup(Mouse.CursorPos.X, Mouse.CursorPos.Y - 2);
end;

PopupMenu появляется нормально

а если кликаю по созданной мной иконкой в tray"е, ели без строчки

SetForeGroundWindow(Application.MainForm.Handle);

PopupMenu появляется с какими то глюками, в чем проблема ?

хотя вот так зашибись

SetForeGroundWindow(Application.MainForm.Handle);</
PopupMenu1.Popup(Mouse.CursorPos.X, Mouse.CursorPos.Y);

Сильно прошу небить

---

← →
oldman   (2007-01-19 17:39) [1]

Объямните мне такую вещь, как:
"Зачем нужен такой геморрой с вызовом попапа?"

---

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

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



Память: 0.44 MB
Время: 0.029 c