Советы по Delphi

Индикация статуса клавиш I


Вы можете отслеживать состояние "индикаторных" клавиш с помощью таймера с интервалом, скажем, в 100мс. Я просто считываю состояние клавиш следующим образом:

VAR KS : TKeyboardState;...GetKeyboardState(KS);IF Odd(KS[VK_NUMLOCK]) THEN {caps lock нажат}... VK_VK_CAPITAL... VK_SCROLL... VK_INSERT
[000404]



Содержание раздела