![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
PopupMenu [D7, XP]
nord489 © (2007-08-22 21:36:00)Как сделать так, чтобы при нажатии на Image левойкнопкой открывалось PopupMenu.
WASM (2007-08-23 22:34:00) [1]
procedure TForm1.Image1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if Button = mbLeft then
PopupMenu1.Popup(Mouse.CursorPos.X, Mouse.CursorPos.Y + 2);
end;
MsGuns (2007-08-22 22:26:00) [2]Мы, программисты - народ умелый
Устала правая, работай левой
;)
Leonid Troyanovsky (2007-08-22 21:44:00) [3]
> nord489 (22.08.07 21:36)
Кто там шагает правой?
Левой, левой.
--
Regards, LVT.
DrPass (2007-08-22 21:39:00) [4]OnClick + PopupMenu.Popup