Converter char para Ascii

Question

Ol� pessoal,preciso transformar um char em c�digo ascii mas n�o encontrei fun��o para isso, algu�m tem alguma id�ia??Agradecido...

Marcelo · Answer

Olha colega, voce pode fazer da seguinte forma:

1� - No evento KeyPress do form, digite o seguinte:

var
 i : Integer;
begin
  i := Key;
  ShowMessage( IntToStr( i ));
end;

2� - Coloque um Edit no form.
3� - Mude a propriedade �KeyPreview� do form para �True�.

Ao executar a aplica��o, digite algo no Edit, que surgir� uma mensagem com o c�digo correspondente ao valor digitado!
Valeu?

Anisio · Answer

valeu cara, mas pra mim naum deu certo.. :(uso Delphi 5, naum sei se � por isso, mas o i (integer) n�o pode receber um char......

Denis · Answer

Showmessage(�C�digo asc de c � :�+IntToStr(Ord(�c�)));ou do char que vc. colocar dentro da fun��o ord....

Marcelo · Answer

[quote:1aadc79e5c=�anisio�]valeu cara, mas pra mim naum deu certo.. :(uso Delphi 5, naum sei se � por isso, mas o i (integer) n�o pode receber um char...[/quote:1aadc79e5c]Colega, eu fiz o exemplo em Builder, pois aki nao tenho o Delphi intalado!Tente fazendo convers�es do tipo: i := StrToInt( Key );Valeu?...

Anisio · Answer

obrigado a todos,quest�o resolvida....