24.04.2017, 12:35
|
|
LMD-DML
|
|
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
|
|
Цитата:
Сообщение от Cognizer
...нужно чтобы можно было вводить комбинации клавиш.
|
Код:
If ((GetKeyState(VK_CONTROL) AND 128)=128) and
((GetKeyState(VK_F5) AND 128)=128) and
((GetKeyState(ord('8')) AND 128)=128) then
ShowMessage('CTRL+F5+8 Pressed');
drkb
|