|
Registriert seit: 28. Apr 2008
1.717 Beiträge
FreePascal / Lazarus
|
AW: PopupMenü mit linker Maustaste an richtiger Stelle öffnen?
6. Dez 2013, 10:55
Delphi-Quellcode:
procedure TForm1.MenuImageClick(Sender: TObject);
var
X,Y: integer;
pos: TPoint;
begin
GetCursorPos(pos);
X:=pos.X;
Y:=pos.Y;
MenuSettingsPopupMenu.Popup(X, Y);
end;
Bin Hobbyprogrammierer! Meine Fragen beziehen sich meistens auf Lazarus!
|