Mausclick

[deusmac]

Ich würde gerne mit einem Delphiprogramm ein Fenster in den Vordergrund holen und dann den Mauszeiger an eine bestimmte Position setzten und klicken. Ausserdem würde ich gerne die Position meines Mauszeigers abfragen und ausgeben lassen.

[SirThornberry]

in den Vordergrund holen mit
  BringWindowToTop(HandleDerAnwendung); Mauszeigerposition setzen mit
  SetCursorPos(x, y); Klicken mit

Delphi-Quellcode:

  mouse_event(MOUSEEVENTF_LEFTDOWN, x, y, 0, 0);
  mouse_event(MOUSEEVENTF_LEFTUP, x, y, 0, 0);

und Zeigerposition ausgeben mit

Delphi-Quellcode:

var LPos: TPoint;
begin
  GetCursorPos(LPos);
  ShowMessage(inttostr(LPos.X) + ' / ' + inttostr(LPos.Y);
end;