TClrCustomControl.IsKeyLocked(TKeys_Set) Method
Determines whether the CAPS LOCK, NUM LOCK, or SCROLL LOCK key is in effect.
Use the IsKeyLocked property to determine whether the CAPS LOCK, NUM LOCK, or SCROLL LOCK keys are on, whether individually or in combination.