之前偶然看到类似的软件，查询并切换CapsLock键、NumLock键按键状态的软件，就顺便查了一下相关的Delphi代码，特记之如下： 查询按键状态的过程 procedure CheckKeyState(); var KeyState: TKeyboardState; CapsLockState , NumLockState : Boolean; begin ...