GARANTIR DESCONTO

Fórum Como faço para saber se o CapsLock está ligado #158208

06/05/2003

0

Eu queria fazer o seguinte:

Colocar num [b:7042b75210]StatusBar[/b:7042b75210] o estado do [b:7042b75210]CapsLock[/b:7042b75210].
se alguém pressionar o [b:7042b75210]CAPSLOCK[/b:7042b75210], a StatusBar atualiza o estado do [b:7042b75210]CAPSLOCK[/b:7042b75210]

:wink:

[]´s

luís erucci
[url]www33.brinkster.com/unifenasdx[/url]
[url]www21.brinkster.com/coolunifenas[/url]


Erucci

Erucci

Responder

Posts

06/05/2003

Dedi

implemente este codigo

procedure TForm10.Button3Click(Sender: TObject);
Var
KeyState : TKeyboardState;
begin
GetKeyboardState(KeyState);
if KeyState[VK_CAPITAL] = 1 then //desligado = 0 ligado 1
StatusBar1.SimpleText:=´Caps Ligado´;
else
StatusBar1.SimpleText:=´Caps Desligado´;
end;


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar