NumLock Urgente!!!

Delphi

05/01/2004

Eu estou tentando verificar se a tecla numlock está ligada, pra isso eu uso o seguinte:
if GetKeyState(VK_NumLock) = 0 then

só que eu não sei qual comando eu uso pra ligar ele? Alguém pode me ajudar?


Derodrigo

Derodrigo

Curtidas 0

Respostas

Marcelo Saviski

Marcelo Saviski

05/01/2004

retirado das 800 dicas da [ur=www.lloydsoft.hpg.ig.com.brl]lloydsoft[/url]

var
  KeyState : TKeyboardState; 
begin 
  GetKeyboardState(KeyState); 
  KeyState[VK_NUMLOCK] := 1;
  SetKeyboardState(KeyState); 
End;


Para a tecla Caps Lock basta trocar VK_NUMLOCK por VK_CAPITAL.


GOSTEI 0
Derodrigo

Derodrigo

05/01/2004

Valeu pela dica!!!



GOSTEI 0
POSTAR