Thema: Delphi Popup irgendwo

Einzelnen Beitrag anzeigen

ozz

Registriert seit: 26. Jun 2005
131 Beiträge
 
#1

Popup irgendwo

  Alt 2. Apr 2006, 18:00
Hallo zusammen,
ich habe etwas Probleme mit einen Popup. Dieses erscheint nicht an der richtigen Stelle. Ich weiß auch , was das Problem ist. Die verwendeten Koordinaten beziehen sich immer relativ auf die auslösende Objekt. Für das Form gibt es die (siehe unten). Wie bekomme ich diese mit Hilfe des Senders?
Delphi-Quellcode:
procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
if Button= mbRight then PopupMenu1.Popup(Form1.Left + x,Form1.Top +y);
end;
  Mit Zitat antworten Zitat