Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.015 c
1-13656
Vile
2002-07-22 17:55
2002.08.05
Программирование в Delphi TStringGrid


1-13649
Skif
2002-07-23 12:11
2002.08.05
Файлы и папки


14-13813
sergey32
2002-07-11 15:18
2002.08.05
Не могу установить RX компоненты


14-13778
Химик
2002-07-10 10:46
2002.08.05
Задачка на засыпку


1-13642
J_S
2002-07-23 11:23
2002.08.05
WINRAR ZIP