Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Sendkey
Autor: MisterCP
Datum: 18.11.04 16:41
Hallo Katrin, versuch doch mal, den Tastendruck nicht speziell an die Anwendung zu senden. Wenn diese den Focus hat sollte es auch kein Problem sein das dieser richtig ankommt Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer Private Const VK_NUMLOCK = &H90 Private Const KEYEVENTF_KEYUP = &H2 Private Sub Timer1_Timer() Static Counter As Long Dim Text As String 'NumLock-Status prüfen If GetKeyState(VK_NUMLOCK) = 0 Then 'ggf NumLock-ON setzen Call keybd_event(VK_NUMLOCK, 28, 0, 0) Call keybd_event(VK_NUMLOCK, 28, KEYEVENTF_KEYUP, 0)

Sendkey	650	Kathrin01	18.11.04 14:06
Re: Sendkey	448	MisterCP	18.11.04 16:41
Re: Sendkey	425	Kathrin01	18.11.04 20:42
Re: Sendkey	512	MisterCP	19.11.04 08:41
Re: Sendkey	413	Kathrin01	19.11.04 11:30

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen