Показать сообщение отдельно
  #5  
Старый 24.04.2017, 12:35
Аватар для Alegun
Alegun Alegun вне форума
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
Ответить с цитированием