
08.12.2014, 08:13
|
 |
Sir Richard Abramson
|
|
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
|
|
Сэмулировать нажатие Ctrl+U.
Код:
keybd_event(VK_LCONTROL, 0, 0, 0); //Нажатие левого Ctrl.
keybd_event(Ord('U'), 0, 0, 0); //Нажатие 'U'.
keybd_event(Ord('U'), 0, KEYEVENTF_KEYUP, 0); //Отпускание 'U'.
keybd_event(VK_LCONTROL, 0, KEYEVENTF_KEYUP, 0); //Отпускание левого Ctrl
|