Советы по Delphi

         

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


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

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



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