String Para Hexadecimal

[McBlade]

Salve galera!

Estava de bobeira fazendo umas 'bricadeirinhas' no delphi e pensei em converter as letras de um Edit em Hexadecimal, mas eu não consigo encontrar uma função para isso!!

O que eu devo fazer???

Exemplo: Converter o texto Edit1 de um edit para Hexadecimal e jogá-lo no Edit2

Se tiver como postem aí!!

[Graymalkin]

Salve galera!

Estava de bobeira fazendo umas 'bricadeirinhas' no delphi e pensei em converter as letras de um Edit em Hexadecimal, mas eu não consigo encontrar uma função para isso!!

O que eu devo fazer???

Por "converter o texto para hexadecimal", você quer dizer pegar cada um dos valores ASCII/ANSI dos caracteres do texto e transformá-los em hexadecimal? Se for, você pode utilizar Ord() para obter o código ASCII/ANSI de um caracter e a função IntToHex() para transformar um inteiro em hexadecimal (o resultado é uma string).

Abraços,

Graymalkin

[McBlade]

O Ord() Só pode receber caracteres 1 por 1?? Eu queria usar uma variável nele...

tipo: Edit2.Text := IntToHex(Ord(Edit1.Text),2);

[Graymalkin]

Só um... afinal de contas, qual seria o resultado de Ord("ab")? 9798? Além de não ter sentido, se você aplicasse o IntToHex() a esse valor você não estaria recebendo o resultado esperado. Se você pode fazer com um basta percorrer a string toda pegando caracter por caracter.

Abraços,

Graymalkin