Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

bdexterholland

Como capturar estado da tecla?

Recommended Posts

Como faço para capturar o estado das teclas:

Insert

caps lock

:P

 

Valew!!!

----------------------------------------------------------------------------

Solução obtida a partir do link:

http://www.activedelphi.com.br/modules.php...=17794#pid41989

 

 

código usado:

if GetKeyState(VK_CAPITAL) = 0 then		StatusBar1.Panels[6].Text:=''	else		StatusBar1.Panels[6].Text:='CAPS';	if GetKeyState(VK_INSERT) = 0 then		StatusBar1.Panels[5].Text:=''	else		StatusBar1.Panels[5].Text:='INS'

Compartilhar este post


Link para o post
Compartilhar em outros sites

Essa dica tirei do DTDalphi 2.6. Vê se é isso...096 - Como saber o estado das teclas Num lock, Caps lock e Scroll lockPara saber o estado das teclas acima citadas, utilize a função getkeystate em conjunto com o código das teclas, ela retorna 0 se a tecla estiver OFF e 1 se a tecla estiver ON, assim:If getkeystate(vk_numlock) = 0 then // Num lock está OFFIf getkeystate(vk_numlock) = 1 then // Num lock está ONIf getkeystate(vk_scroll) = 0 then // Scroll lock está OFFIf getkeystate(vk_scroll) = 1 then // Scroll lock está ONIf getkeystate(vk_CAPITAL) = 0 then // Caps lock está OFFIf getkeystate(vk_CAPITAL) = 1 then // Caps lock está ON ==Inteh!

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.