PopupMenu.Popup auf Komponente

[Martin K]

Hi,
ich möchte gerne ein PopupMenu auf einer Komponente ausführen (also PopupMenu.Popup).
Die geschieht im OnMouseUp-Ereignis der Komponente.
In diesem Ereignis werden mir ja die Koordinaten X, Y übergeben, wenn ich aber PopupMenu.Popup(X, Y) schreibe, ist das PopupMenu natürlich an der falschen Stelle.
Mit Left/Top der Form + Left/Top der Komponente + X/Y habe ich das PopupMenu immer noch nicht an der gewünschten Stelle.
Nun könnte ich natürlich solange irgendwelche Zahlen addieren bis es passt, aber da muss es doch eine elegantere Lösung geben,
dem PopupMenu zu sagen, dass es von dieser Komponente (und deren X/Y-Werte) aus ausgeführt werden soll...

Achso:
Nein, ich kann das PopupMenu NICHT der Komponente dirket zuordnen, da in OnMouseUp noch andere Befehle VOR dem Popup ausgeführt werden sollen.

[Dax]

Funktionierts mit X+comp.Left, Y+comp.Top auch nicht?

[Martin K]

Nö.
Comp.Left ist ja immer vom Left der Form aus gesehen.
//Edit: und dann kommt eben noch die Border-Breite dazu...

PopupMenu.Popup will aber die X,Y-Werte vom Screen aus!

[Dax]

Ah, dann kuck dir mal ClientToScreen an :)

[Martin K]

Ja, danke - das hab ich gesucht :thumb:

Hier mein Code:

Delphi-Quellcode:

    PopupMenu1.Popup(ClientToScreen(Point(X,Y)).X, ClientToScreen(Point(X,Y)).Y);