[DELPHI]Send Befehle?

[Der P-er]

Guten Tag E*PVP,
ich habe eine Frage und zwar : ICh kenne mich noch nicht so gut in Delphi aus aber hab schon ein paar Kentnisse. Nun will ich einen Bot für MEtin2 schreiben, welcher ein paar Tasten senden soll aber ich weiß die Sende Befehle nicht kann die mir bitte jemand sagen?


MfG

[HardCore.1337]

SendMessage/PostMessage

Bei Fragen PN an mich

[Der P-er]

Danke

[Der P-er]

Sry wegen Doppelpost hab jeztz noch eine Frage wie wird das geschrieben?
So?
SendMessage(W)
oder wie?
MfG

[HardCore.1337]

empfehle dir PostMessage

Syntax: PostMessage(Handle, Flag, Key, 0)

Postmessage (Handle von Metin, WM_KEYDOWN, Ord(W), 0); 
PostMessage (Handle von metin, WM_KEYUP, Ord(W), 0);

Das Beispiel schickt an das METIN Fenster die Taste W.
Das packst du in eine Procedure, beispielsweise

var wnd: HWnd;
wnd := FindWindow(nil, Metin2);

Procedure Send(Key: PChar);
begin
  PostMessage(wnd, WM_KeyDown, Ord(Key), 0);
  PostMessage(wnd, WM_KEYUP, Ord(Key), 0);
end;

...

Send('W'); //sendet W
Send('A'); //sendet A

[Der P-er]

Danke

[HardCore.1337]

Procedure Send(Key: Cardinal);

So ist richtig