Erschreckender weise ist es bös einfach.
Delphi-Quellcode:
var
aTask: ITask;
begin
aTask := TTask.Run(procedure
begin
keybd_event(VkKeyScan('d'), 0, KEY_EVENT, 0);
Sleep(20);
keybd_event(VkKeyScan('d'), 0, KEYEVENTF_KEYUP, 0);
end);
end;
Damit ist es ohne Probleme möglich die Figur nach rechts zu bewegen. Ich gehe also von aus das ich auch weitere befehle so eingeben kann.
das einzige was ich noch brauche ist eine Function die mir die Tastatur logt, meine aktuelle ließt das Numpad nicht, sondern Loggt nur "1".
Wer da eine Idee hat immer her mit
