Codigo de teclas
18/12/2003
0
Deusem
Posts
18/12/2003
Tnaires
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
18/12/2003
Ilan
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
18/12/2003
Tnaires
Ia morrer e não sabia disso... valeu!
Sucesso pra todos nós
Clique aqui para fazer login e interagir na Comunidade :)