Codigo de teclas
18/12/2003
4
Gostaria de saber os codigos das teclas acima e abaixo?
Curtir tópico
+ 0
Responder
Posts
18/12/2003
Olá deusem
As setas não geram códigos ASCII, pq são teclas virtuais. Para captá-las, é necessário usar o evento OnKeyDown. As constantes Delphi q representam as teclas acima e abaixo são VK_UP e VK_DOWN.
No caso, seria algo parecido com:
Sucesso
As setas não geram códigos ASCII, pq são teclas virtuais. Para captá-las, é necessário usar o evento OnKeyDown. As constantes Delphi q representam as teclas acima e abaixo são VK_UP e VK_DOWN.
No caso, seria algo parecido com:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_UP then
// Seta pra cima
else if Key = VK_DOWN then
// Seta pra baixo
end;
Sucesso
Responder
18/12/2003
o codigo das teclas acima e abaixo são respectivamente 38 e 40.
se vc quiser saber de uma outra qualquer é só colocar um label no form e no evento keydown do form colocar o seguinte código.
Label1.Caption := inttostr(key);
valeu.
ilan.fa@pop.com.br
se vc quiser saber de uma outra qualquer é só colocar um label no form e no evento keydown do form colocar o seguinte código.
Label1.Caption := inttostr(key);
valeu.
ilan.fa@pop.com.br
Responder
18/12/2003
Ih Ilan, pode crer
Ia morrer e não sabia disso... valeu!
Sucesso pra todos nós
Ia morrer e não sabia disso... valeu!
Sucesso pra todos nós
Responder
Clique aqui para fazer login e interagir na Comunidade :)