Hallo,
Ich habe folgende Funktionen von einem Freund bekommen:
Procedure SendKeyStroke(Window,Key.b,Param.b)
Select Param
Case 0
SendMessage_(Window,#WM_CHAR,Key,0)
Delay(5)
Case 1
SendMessage_(Window,#WM_KEYDOWN,Key,0)
SendMessage_(Window,#WM_CHAR,Key,0)
SendMessage_(Window,#WM_KEYUP,Key,0)
Case 2 ...