Codigo das teclas

Delphi

02/02/2005

e ai calera primeiramente gostaria de sabe o codigo do teclado da letra S e da letra N pra formar o seguinte codigo no evento onkeyup
if key = S then
showmessage(´ClubeDelphi´)

if key = N then
showmessage(´Forum ClubeDelphi´)

Grato
Guilherme


Guilherme

Guilherme

Curtidas 0

Respostas

Tnaires

Tnaires

02/02/2005

Olá
Se vc estiver se referindo aos códigos ASCII, a letra N possui código 78, e a letra S possui código 83.
Abraços


GOSTEI 0
Tnaires

Tnaires

02/02/2005

Ajuda do Delphi:
For alphabetic keys, you should use ord with an uppercase character, for example, ord( ´M´ )

Então, use Ord(´N´) e Ord(´S´) para obter os códigos virtuais.


GOSTEI 0
Guilherme

Guilherme

02/02/2005

Mas estou usando esse codigo e nao esta dando certo o q pode estar ocorrendo ????


GOSTEI 0
Tnaires

Tnaires

02/02/2005

Eu acabei de testar aqui no trabalho e deu certo...
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key = Ord(´S´) then
    ShowMessage(´Teste´);
end;

Abraços


GOSTEI 0
POSTAR