Cita:
extrído de Win32.hlp
GetKeyState
...
If the function succeeds, the return value specifies the status of the given virtual key. If the high-order bit is 1, the key is down; otherwise, it is up. If the low-order bit is 1, the key is toggled. A key, such as the CAPS LOCK key, is toggled if it is turned on. The key is off and untoggled if the low-order bit is 0. A toggle key's indicator light (if any) on the keyboard will be on when the key is toggled, and off when the key is untoggled.
...
|
Por lo que mas correcto sería:
Código:
if GetKeyState(VK_CAPITAL) and $1 = 1 then
Caption := 'Activado'
else
Caption := 'Desactivado';
Lo que estoy hacendo es comparando el primer bit del resultado, si este es 1, entonces la tecla esta presionada, si es cero no lo está.
Saludos!