Ne, kann deine Probleme nicht nachvollziehen.
Versuche es deshalb mal so, in der Hoffnung, dass dir das besser gefällt:
Delphi-Quellcode:
procedure TForm.MakeMouseClick(X, Y:integer);
var P:TPoint;
begin
if GetCursorPos(P) then begin
SetCursorPos(X, Y);
Mouse_Event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
Mouse_Event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
SetCursorPos(P.X, P.Y);
end;
end;
Edit: Du must doch irgendwo diese Routine Aufrufen wollen? Wo kommen die Koordinaten her, an denen du den Mausklick durchführen möchtest?