Thema: Delphi Popup

Einzelnen Beitrag anzeigen

Prym

Registriert seit: 20. Feb 2005
108 Beiträge
 
#1

Popup

  Alt 9. Mär 2005, 22:59
allso ich habe dank der dp schon rausbekommen wie ich ein popup öffne

das problem ist ich möchte das es nur mit der linken maustaste geöffnet wird aber immoment wird es mit beiden geöffnet

hier das wie ich das gemacht habe

Delphi-Quellcode:
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var LCursorPos: TPoint;
begin
  GetCursorPos(LCursorPos);
  PopupMenu1.Popup(LCursorPos.X, LCursorPos.Y)
end;
  Mit Zitat antworten Zitat