Как сделать автоматическое нажатие клавиши?

Рейтинг: 0Ответов: 1Опубликовано: 08.03.2015

Как сделать автоматическое нажатие клавиши, например, сочетание клавиш Ctrl+f?

pascal
Источник: Stack Overflow на русском

Ответы

▲ 2

Чтобы эмулировать нажатие клавиши на клавиатуре, надо в любой процедуре или функции написать такой код:

keybd_event(VK_LCONTROL, 0, 0, 0); //Нажатие левого Ctrl.
keybd_event(Ord('F'), 0, 0, 0); //Нажатие 'f'.

keybd_event(Ord('F'), 0, KEYEVENTF_KEYUP, 0); //Отпускание 'f'.
keybd_event(VK_LCONTROL, 0, KEYEVENTF_KEYUP, 0); //Отпускание левого Ctrl.

Чтобы найти коды клавиш или какие-то подробности относительно происходящего, наберите в google: "delphi эмуляция нажатия клавиш".