Array
(
)

Converter Imagem em Hexadecimal e Vice versa

Carlosfim
   - 29 nov 2005

Olá para todos.

Estou precisando converter uma imagem (que está carregada em um componente do tipo TImage) em hexadecimal e depois ler este hexadecimal e transformá-lo novamente em imagem.


alguém sabe como posso fazer isso?

Obrigado,


Edan
   - 29 nov 2005

Vovê esta querendo criptografar uma imagem ? Se for isso mande seu email que eu envio a função que faz esse processo


Carlosfim
   - 29 nov 2005

Na verdade o que eu quero é o seguinte:

Tenho um arquivo de texto que contém alguns dados e preciso enviar uma imagem dentro desse arquivo.

Depois, quando eu receber este arquivo, preciso separar os dados da imagem e transformá-la novamente em uma imagem e exibi-la na tela.

Se o resultado da criptografia for uma string pra mim está ótimo, já resolve meu problema.

Obrigado


Ildefonso
   - 29 nov 2005

Olá, Carlos.

Acredito que seu objetivo pode ser alcançado com um arquivo XML, usando a técnica chamada MyBase.

Crie um TClientDataset e construa uma estrutura de campos de acordo com sua necessidade de emendar textos, valores numéricos, datas e, por fim, gráficos. Neste último caso, você criará um campo BLOB no ClientDataset.
Depois, atribua os dados aos campos, tal como se fosse um arquivo de banco de dados comum. Então, é só pedir para o arquivo ser criado com .SaveToFile(´arq_base´, dfXML). Pronto! O conteúdo do arquivo é armazenado para o formato XML (texto) e pode ser manipulado como tal. Depois é só pedir o LoadFromFile() que você recupera todo o conteúdo armazenado.

Note que essa técnica permite armazenar quantos registros você precisar. Não precisa ser de um em um.
Pesquise sobre ClientDatasets e XML que você encontrará o que precisa por agora e muito mais que, tenho certeza, você achará muito útil.


Carlosfim
   - 30 nov 2005

Obrigado pela dica Ildefonso.

Vou testar aqui para ver se vai resolver meu problema.

Valeu!!