Position bestimmen an der ich einen Mausklick ausgeführt hab

[K-Asche]

Hi@all,

ich möchte gerne, wenn ich auf mein Ctrl klicke, die Position erhalten, an der ich den Mausklick ausgeführt habe.
Welche Methode ist den dafür geeignet?

LG, Karsten

[dfried]

Was für ein Control?
Viele Komponenten haben das Ergeignis OnMouseDown wo du die X/Y-Koordinaten der angeklickten Stelle bekommst.

[pszopp]

Bei einem von TControl abgeleiteten Objekt steht das OnMouseDown Event zur Verfügung.
Das sieht so aus:
procedure (Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer) X und Y bilden dabei die Koordinaten des Mausklicks.
Diese müssen evtl. noch mit ScreenToClient oder ClientToScreen des Control umberechnet werden.

[Daniel Schuhmann]

Ansonsten kannst Du die Koordinaten mit GetCursorPos bekommen.

[K-Asche]

Hab ein Selbst erstelltes Control abgeleitet von TCustomControl und fange den Mausklick ab in dem ich die Prozedur Click überschreibe.
Mal probieren mit OnMouseDown.

[pszopp]

Bei einem Click-Event werden die Koordinaten meines Wissens nach nicht mitgeliefert.
Man kann die aber jederzeit mit

Delphi-Quellcode:

  
  Mouse.CursorPos.X;
  Mouse.CursorPos.Y;

abfragen.

[K-Asche]

Besten Dank für die Infos hab es mit MouseDown gemacht, funktioniert wunderbar.