Cargar un archivo eml en un memo...

[Chente(rMan)]

Una luz por favor...

[keyboy]

Siempre queda la opción de hacerlo a pie.

Revisas línea por línea. Si la línea comienza con To:, el resto de la línea será el destinatario; si comienza con Subject:, el resto será el asunto, etc.

Cuando encuentres una línea en blanco querrá decir que ya terminaron los encabezados. Lo que sigue es el cuerpo del mensaje.

Bye

[keyboy]

A ver, un ejemplo menos cavernícola

Código Delphi [-]
IdMessage1.LoadFromFile('archivo.eml');
Edit1.Text := IdMessage1.Headers.Values['To'];
Edit2.Text := IdMessage1.Headers.Values['Subject'];
Memo1.Lines.AddStrings(IdMessage1.Body);

IdMessage es un componente que viene con los componentes Indy

Bye

[Chente(rMan)]

Gracias keyboy, pero desafortunadamente no funciona la línea de abajo

Empezado por keyboy

IdMessage1.LoadFromFile('archivo.eml');

me marca el siguiente error:

undeclared identifier: 'LoadFromFile'

Se veia bien

[keyboy]

Debe ser cosa de la versión. Yo lo probé con la 10.

Bye

[Chente(rMan)]

No encuentro de donde ver la versión que tengo instalada, voy a bajarme la última versión para probar, gracias KeyBoy.

Saludos.

Vicente López.