Virtuellen Klick in einem Spiel simulieren

[tweetymr]

Hi zusammen,
ich weiß das mit dem Klick simulieren ist eigentlich relativ einfach. Habe es auch oft genug verwendet
Doch ich habe es noch nicht mit virtuellen Klicks geschafft
Was meine Frage angeht:
Wie bekomme ich einen virtuellen Klick in einer Full Screen-Anwendung simuliert, von der ich keinerlei Handels oder sonstiges kenne?

Bitte helft mir

[Gruber_Hans_12345]

such mal nach mouse_event hier mouse_event oder hier mouse_event

[tweetymr]

Sorry, aber irgendwie steh ich grade auf dem schlauch
Ich will den Klick virtuell in einer anderen Anwendung erzeugen. Soll heißen: ich mache etwas an meinem Computer und im hintergrund wird der Klick in dem Fenster erzeugt, obwohl ich mit der Maus keine Ausschweifungen mache.
Mit den Tastendrücken funktioniert es einwandfrei.

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
var W: HWnd;
begin
laenge := length(Edit1.Text);
lol := Edit1.Text;
W := FindWindow(nil,'Anwendung');
Windows.SetFocus(W);
if W <> 0 then
begin
  PostMessage(W, wm_KeyDown, VK_Tab, 0);
  PostMessage(W, wm_KeyUp, VK_Tab, 0);
  for i := 1 to laenge do
  begin
  PostMessage(W, wm_CHAR, ord(lol[i]),0);
  end;
  for i := 1 to 3 do
  begin
  PostMessage(W, wm_KeyDown, VK_Return, 0);
  PostMessage(W, wm_KeyUp, VK_Return, 0);
  if i <> 3 then
  sleep(2000);
end;
end;
end;

Aber wenn ich jetzt das ganze mit meiner Klick-VErsion versuche springt der Cursor immer zu der Stelle die ich ihm angegeben hab:

Delphi-Quellcode:

procedure TForm1.Timer2Timer(Sender: TObject);
var
X,Y:Integer;
W: HWnd;
begin
  W := FindWindow(nil,'Anwendung');
  Windows.SetFocus(W);
  if W <> 0 then
  begin
    X := 770;
    Y := 636;
    SetCursorPos(X, Y);
    mouse_event(MOUSEEVENTF_LEFTDOWN, X, Y, 0, 0);
    mouse_event(MOUSEEVENTF_LEFTUP, X, Y, 0, 0);
    sleep(13000);
  end;
end;

Wie gesagt, ich stehe grade so richtig auf dem Schlauch^^
Wie kann ich das mit den Klicks realisieren?

[Gruber_Hans_12345]

axo, die anwendung ist im hintergrund ... dann gehts mit dem mouse_event nicht, das simuliert die maus, und dazu muß die anwendung im vordergrund sein.

ich glaube wenn die anwendung im hintergrund ist, und du keinen Handle davon hast, kannste keinen Klick simulieren.
Bekommste bei der FullScreen Anwendung nicht den Handle auch ganz normal?

Wenn du den Handle hast, kannste probieren die MouseEvents per PostMessage zu senden (wie du es mit den Key Events gemacht hast) ... kommt halt dann auch auf die Anwendung drauf an, wie, ob und auf welche Messages die dann reagiert

[tweetymr]

Zitat von Gruber_Hans_12345:

Bekommste bei der FullScreen Anwendung nicht den Handle auch ganz normal?

Wie meinst du das? oO
Ich weiß nicht ob ich das Fenster Handle habe... is das nicht das unten bei den Tasks?^^ Dann hätte ich es
Wie könnte ich das dann machen? mir fällt grade rein garnix ein

Schonmal danke für deine Geduld^^

[tweetymr]

ok ich hab hier jetzt was im netz gefunden (hoffe ich zumindest)

Delphi-Quellcode:

MouseInputStruct.dx := MCord.X;
  MouseInputStruct.dy := MCord.Y;
  MouseInputStruct.mouseData := 0;
  MouseInputStruct.dwFlags := MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTDOWN;
  MouseInputStruct.time := 0;
  MouseInputStruct.dwExtraInfo := 0;

  InputStruct.Itype := INPUT_MOUSE;
  InputStruct.mi := MouseInputStruct;

  si := SizeOf(InputStruct);
  SendInput(1,InputStruct,si);

  MouseInputStruct.dx := MCord.X;
  MouseInputStruct.dy := MCord.Y;
  MouseInputStruct.mouseData := 0;
  MouseInputStruct.dwFlags := MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTUP;
  MouseInputStruct.time := 0;
  MouseInputStruct.dwExtraInfo := 0;

  InputStruct.Itype := INPUT_MOUSE;
  InputStruct.mi := MouseInputStruct;

  SendInput(1,InputStruct,SizeOf(InputStruct));

Jetzt stellt sich mir nur eine frage: Um was geht es bei MouseInputStruct?
Hab gegooglet aber nich wirklich viel rausgefunden

Bitte um eure Hilfe

[tweetymr]

Will mir hier keiner helfen (außer Gruber_Hans_12345 am anfang)??

[DGL-luke]

Hallo, was funktioniert denn nicht? du kannst wohl auch WM_MOUSE* nachrichten senden.

[Robert Marquardt]

Es liegt im wesentlichen daran das du dich nicht ausdruecken kannst.
Eine Full Screen Anwendung (vermutlich DirectX) liegt ueblicherweise nicht im Hintergrund.
Einer im Hintergrund stehenden Anwendung Mausklicks per Message zu senden ist ist problematisch, da mit einem Mausklick ueblicherweise der Fokus wechselt.
Es kann gut sein das das die Anwendung nicht verkraftet oder ungefragt in den Vordergrund kommt.
mouse_event generiert ein Mausereignis als ob es von der Maus kommt.

[tweetymr]

Sorry das ich mich so lange nicht mehr gemeldet hab :p

naja, mit der methode die ich am anfang gepostet hab, kann ich auf jeden fall schonmal zeichen an das Spiel schicken. Auch WÄHREND dessen ich was anderes mache (also das fenster im hintergrund läuft)

Nur irgendwie will das nicht mit der mouse funktionieren.
Wenn ich mich nicht klar genug ausgedrückt habe, hier nochmal meine Bitte: Wie kann ich die mouse virtuell bewegen und klicken lassen, obwohl das fenster nicht im vordergrund ist? denn mit Keys hab ichs schon hinbekommen.... Hoffe das ist einleuchtender^^

Und entschuldigung das ich euch so viel zeit koste