Проверить NumLock,ScrollLock

[Nealles]

Как в Дельфи 6 проверить, включен ли ScrollLock

[CyberDaemon]

Попробуй

VAR KS : TKeyboardState;
...
GetKeyboardState(KS);
IF Odd(KS[VK_SCROLL]) THEN {ScrollLock включен}