Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.16;
Скачать: CL | DM;

Вниз

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

 
rosl   (2005-09-27 09:06) [0]

Как сделать чтоб при нажатии левой кнопкой мыши на button открывалось бы popup menu присвоенное к button


 
ЮЮ ©   (2005-09-27 09:16) [1]

Заполнить св-во PopupMenu у этого button-а


 
rosl   (2005-09-27 09:44) [2]

нет, срабатывает при нажатии правой кнопки мыши, а мне нужно левой


 
Fay ©   (2005-09-27 09:46) [3]

PopupMenu1.Popup ?


 
ЮЮ ©   (2005-09-27 09:49) [4]

извращенец? :)

procedure TForm1.Button1Click(Sender: TObject);
var
 cp: TPoint;
begin
 cp := Mouse.CursorPos;
 PopupMenu1.Popup(cp.X, cp.Y);
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.025 c
1-1127375465
Альф
2005-09-22 11:51
2005.10.16
Как поймать исключение ?


11-1108035269
WhiteGuy
2005-02-10 14:34
2005.10.16
Немножко в KOLLISTBOX ;)


2-1125684801
Anton S.
2005-09-02 22:13
2005.10.16
простой вопрос по API


14-1127425578
Eraser
2005-09-23 01:46
2005.10.16
Multicast


2-1125092597
ronyn
2005-08-27 01:43
2005.10.16
Как в Делфе анимацию типа *.gif реализовать?