Position bestimmen an der ich einen Mausklick ausgeführt hab

[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.