Как узнать состояние клавиши CAPS LOCK?

function IsCapsLockOn : Boolean; 
begin 
  Result := 0 <> (GetKeyState(VK_CAPITAL) and $01); 
end;

Взято с Исходников.ru



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

---

---