Mausklick simulieren

[r0nnY]

hallo,
wie ihr seht habe ich ein problem mit einer Mausklicksimulation.
ich benutze zZ den Code:

Delphi-Quellcode:

SetCursorPos(X, Y);
mouse_event(MOUSEEVENTF_LEFTDOWN, X, Y, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, X, Y, 0, 0);

doch wie ich sehe ist der Punkt(X,Y) von meinem Bildschirm sozusagen abhängig, aber ich will das er von meiner Form(mein Prog) abhängig ist.
Bsp:
1. mein Programm ist ganz oben links in der ecke, ich führe den Befehl aus und er trifft was ich will! hura
2. wenn der user das Programm einfach mal ein bissl verschiebt(nach unten zB) ist die Koordinate logischer weise nicht mehr richtig

Hintergrund: ich benutze ein TWebBrowser und der Mausklick soll auf der Komponente stattfinden.

hab ich mich klar ausdrücken können? kann mir jmd helfen?


thx
MfG r0nnY

[Matze]

Hi, herzlich willkommen!

Ich weiß gerade nicht, ob's einfacher geht, aber du könntest zu den Koordinaten die Positionen wie Form.Left etc. addieren und erhälst so die gewünschten Koordinaten.

[r0nnY]

auf die idee bin ich net gekommen, aber ich werds gleich mal ausprobieren

edit:
danke nochma für den tip
für alle die das auch wollen:

Delphi-Quellcode:

SetCursorPos(Form1.Left + X,Form1.Top + Y);
mouse_event(MOUSEEVENTF_LEFTDOWN, Form1.Left + X, Form1.Top + Y, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, Form1.Left + X, Form1.Top + Y, 0, 0);

[Robert Marquardt]

Zur Umrechnung der Koordinaten auf das Koordinatensystem der Komponente haben diese die Methode ScreenToClient. Andersrum geht es mit ClientToScreen.