Thema: Delphi Tasten ausgeben

Einzelnen Beitrag anzeigen

Benutzerbild von Fussball-Robby
Fussball-Robby

Registriert seit: 22. Okt 2007
Ort: Nähe Köln
1.063 Beiträge
 
Delphi 7 Enterprise
 
#6

Re: Tasten ausgeben

  Alt 30. Apr 2008, 16:34
Probiers mal mit den Prozeduren hier:
Delphi-Quellcode:
procedure PressKey(Key: Word);overload;
begin
  keybd_event(Key, 0, 0, 0);
  keybd_event(Key, 0, KEYEVENTF_KEYUP, 0);
end;

procedure PressKey(Key: Char);overload;
begin
  PressKey(vkKeyScan(Key));
end;

//Aufruf:

  PressKey(vk_SPACE);//Entweder mit virtuellem KeyCode
  PressKey('h'); //Oder mit Char
Mfg
Robert L.
Der folgende Satz ist richtig!
Der vorherige Satz ist falsch!

Paradox
  Mit Zitat antworten Zitat