Página sobre a Linguagem
de programação da Embarcadero

Usando Virtual-Key Codes

Como detectar as teclas pressionadas para impulsionar uma determinada ação

27-03-2015

O Windows define constantes especiais para cada tecla que você pressiona no teclado. A estas constantes damos o nome de Virtual-Key Codes; virtual aqui é porque não são valores reais, mas valores com os quais teremos maior facilidade para trabalhar (afinal, os valores reais estão em binário, consistindo numa sequência de 0s e 1s e trabalhar diretamente com eles seria caótico). Esses códigos virtuais identificam várias teclas e podem ser usados quando manipulamos os eventos OnKeyUp or OnKeyDown de diversos componentes (inclusive do próprio Form). Os códigos virtuais não indicam apenas tecla, mas também os botões do mouse. Todas as constantes estão definidas na unit Windows do Delphi.

Imagine, por exemplo, que você desejaria que, na tela abaixo, ao pressionarmos ENTER sobre o componente TEdit, a pesquisa do botão Procurar já começasse.

Para isso, bastaria um código semelhante a este:

Aqui, estamos supondo, claro, que o botão Button1 já foi codificado para pesquisar ao ser clicado. Note também que o próprio método OnKeyDown( ) já recebe, como parâmetros, as variáveis Key e Shift; a primeira guarda um valor numérico que indica qual foi a tecla pressionada, e a segunda armazena teclas que podem ser pressionadas simultaneamente com a primeira (ou botões do mouse). No caso de ALT+F4 (para fechar uma janela, por exemplo), a variável Shift armazenaria o ALT e Key ficaria com VK_F4. Supondo que estejamos numa janela em que você queira impedir o comando ALT+F4 de ser usado, há uma maneira simples de bloqueá-lo. É o que mostramos no exemplo a seguir:

Detectando a utilização das teclas desejadas e alterando-se o valor de uma delas para zero, a janela já não mais receberá ALT+F4 mas, sim, ALT e zero (na linha onde se lê Key := 0). Para que o código acima seja detectado apenas pela janela da sua aplicação, basta usar o evento OnKeyDown do formulário (e não de outro componente). Além disso, a propriedade KeyPreview do form deve ser marcada como True (do contrário, as mensagens de teclas que passarem pelo form não serão interpretadas).

Abaixo,uma tabela mostrando os valores mais usados e sua correspondência em ASCII e em hexadecimal:

Fonte: ASMC, delphi.about.com