Текущий архив: 2002.08.05;
Скачать: CL | DM;

Вниз

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

← →
c0pYc@t   (2002-07-23 13:21) [0]

как сделать так, чтоб при нажатии на пункт PopupMenu действие выполнялось, но форма PopupMenu не закрывалась?

---

← →
Skier   (2002-07-23 13:32) [1]

>c0pYc@t
Видимо (?), нужно опять выводить PopupMenu в том же месте...

---

← →
c0pYc@t   (2002-07-23 13:36) [2]

И как енто сделать

---

← →
Skier   (2002-07-23 13:48) [3]

>c0pYc@t


procedure TForm1.MenuItemClick(Sender: TObject);
begin
//код твоего обработчика ...
PopupMenu1.Popup(...те же координаты...);
end;


---

← →
c0pYc@t   (2002-07-23 14:06) [4]

А мона чтоб не мерцало :))

---

← →
Skier   (2002-07-23 14:33) [5]

>c0pYc@t
Нет.

---

← →
Song   (2002-07-23 15:07) [6]

Можно попробовать, но в принципе у меня не моргает и так:
procedure TForm1.N11Click(Sender: TObject);
begin
With PopupMenu1 Do
Begin
LockWindowUpdate(Handle);
Popup(PopupPoint.X,PopupPoint.Y);
LockWindowUpdate(0);
End;
end;

---

← →
Игорь Шевченко   (2002-07-23 16:18) [7]

c0pYc@t (23.07.02 14:06)
Skier © (23.07.02 13:48)
Song © (23.07.02 15:07)

Давить надо такие извращения. В корне :-)

---

← →
Skier   (2002-07-23 16:21) [8]

>Игорь Шевченко
Ну...захотел человек... :)

---

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

Текущий архив: 2002.08.05;
Скачать: CL | DM;

Наверх

Память: 0.48 MB
Время: 0.012 c