VOID keybd_event(
BYTE bVk, // virtual-key code
BYTE bScan, // hardware scan code
DWORD dwFlags, // flags specifying various function options
DWORD dwExtraInfo // additional data associated with keystroke
);
Эмуляция нажатий клавиш клавиатуры с помощью мыши
Заранее благодарен за ответы.
Код:
Есть также mouse_event.
Код:
void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y)
{
if (Button == mbLeft)
{
if (ActiveControl)
{
short VKCode = 'Q';
PostMessage(ActiveControl->Handle, WM_KEYDOWN, VKCode, 0);
}
}
}
TShiftState Shift, int X, int Y)
{
if (Button == mbLeft)
{
if (ActiveControl)
{
short VKCode = 'Q';
PostMessage(ActiveControl->Handle, WM_KEYDOWN, VKCode, 0);
}
}
}