Главная страница
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.011 c
14-13768
hedgehog
2002-07-09 01:39
2002.08.05
FireWall написание


4-13857
Vaddya
2002-05-29 21:16
2002.08.05
Смена


3-13565
Igor_
2002-07-16 10:31
2002.08.05
BLOB


6-13754
neodiX
2002-05-24 18:01
2002.08.05
TClientSocket and TServerSocket


1-13697
MsGuns
2002-07-23 23:23
2002.08.05
CreateProcess