Converter Letra em Ascci
qual função utilizao para converter uma letra (ou número) no valor correspondente ao caractere?
Raserafim
Curtidas 0
Respostas
Lhsantos
18/07/2006
Veja se isso ajuda:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Label1.Caption :=
Format(´O código da tecla pressionada é: ¬d´, [Key]);
end;
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Label1.Caption :=
Format(´O código da tecla pressionada é: ¬d´, [Key]);
end;
GOSTEI 0
Night_man
18/07/2006
tem uma funcao basica que eh Ord,
Ord(´A´) retorna 65
Ord(´ ´) retorna 32
Ord(´A´) retorna 65
Ord(´ ´) retorna 32
GOSTEI 0
Raserafim
18/07/2006
valeu night_man, era exatamente isto que precisava.
e só para complementar, o inverso é a função Chr. ou seja, com o Chr passo p valor em ascci e é retornado o caracter.
e só para complementar, o inverso é a função Chr. ou seja, com o Chr passo p valor em ascci e é retornado o caracter.
GOSTEI 0