Вниз
Скачать: CL | DM;

Программно нажать комбинацию клавиш   Найти похожие ветки 

← →
worldmen   (2008-10-28 09:06) [0]

Программно нажать одну клавишу я могу. Делаю так:

procedure TForm1.SetKey(Key:Integer);
begin  // нажимаем кнопку на клавиатуре
 keybd_event(Key,0,KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP,0);
 keybd_event(Key,0,KEYEVENTF_EXTENDEDKEY,0);
 keybd_event(Key,0,KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP,0);
end;
....
SetKey(VK_F2);            // нажимаем клавишу F2

А как нажать комбинацию клавиш, например Alt+F1, Ctrl+F1


← →
{RASkov} ©   (2008-10-28 10:21) [1]

Так же.... Нажать одну, затем другую - потом обе отпустить...


← →
Leonid Troyanovsky ©   (2008-10-28 21:58) [2]


> worldmen   (28.10.08 09:06)  

> Программно нажать одну клавишу я могу. Делаю так:

А объяснить зачем 3 keybd_event можешь?

--
Regards, LVT.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.007 c
2-1225057267
NavigatorNeba
2008-10-27 00:41
2008.12.07
Место на компонентах под Label, не реагирует на onClick.


2-1225178052
zxc
2008-10-28 10:14
2008.12.07
Взять строку в двойные кавычки


2-1225276621
Andy BitOff (PPC)
2008-10-29 13:37
2008.12.07
Exception


2-1225219523
vik2008
2008-10-28 21:45
2008.12.07
Замена слов


2-1225089628
Гость
2008-10-27 09:40
2008.12.07
Нетипизированный файл.




   Наверх