Нужно ПОЛНОСТЬЮ сэмулировать нажатие клавиши клавиатуры

[Mihail_]

Здравствуйте, имеется вот такое симпатичное устройство

миниатюрная раскладная BT-клавиатура для КПК

Но к сожалению для нее отсутствуют драйвера для обычного компьютера, но поскольку она цепляется по блютусу на виртуальный ком-порт, то мы можем считывать, то что она посылает.
Худо-бедно составил таблицу сигналов, которые она посылает - мы можем отслеживать событие KEYDOWN и KEYUP для каждой ее клавиши. Но возникает вопрос - как это дело лучше эмулировать на самом компьютере? SendMessage WM_KEYDOWN, WM_KEYUP активному окну сработало не так как я ожидал, подскажите, можно ли что-нибудь подобное сделать впринципе?
Заранее спасибо!

[RayShade]

Поискать дрова получше?

[ANDLL]

keybd_event
Но все равно это не будет влиять на всякие win+д и ctrl+alt+del

[Mihail_]

ANDLL спасибо! по крайней мере с базовыми клавишами работает

Код: Выделить всё

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, _
    ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Const KEYEVENTF_EXTENDEDKEY = &H1
Private Const KEYEVENTF_KEYUP = &H2


Private Sub Command1_Click()
  keybd_event vbKeyShift, 0, 0, 0
  keybd_event vbKeyA, 0, KEYEVENTF_EXTENDEDKEY, 0
  keybd_event vbKeyShift, 0, KEYEVENTF_KEYUP, 0
End Sub

RayShade спасибо за совет, как я сразу не подумал что оказывается можно поискать получше, а не писать самому..
Модель клавиатуры "FA287A" мастер класс по поиску в студию!

[arvitaly]

а какой кпк?

[iGrok]

а какой кпк?

Большой такой.. x86-compatible.

З.Ы. Внимательно читаем первый пост. =)