Examples Delphi

  1. Home
  2. Delphi
  3. Examples
  4. Find out if the caps lock is on
Here's a function you can use to find out if the CAPS LOCK is on:
function IsCapsLockOn : boolean;
begin
Result := 0 <>
(GetKeyState(VK_CAPITAL) and $01);
end;