Problema al enviar un email con acentos en Delphi 2009

[Quim Herrera]

Hola,

He migrado de Delphi 7 a delphi 2009 y tengo un problema: al enviar un email con Indy 10 que contenga caracteres especiales (acentos, eñes) estos se transforman. Ejemplo:
ÇçÑñÁàáÉèÈéÍíÒòÓóÚúÏÜ
se convierte en
CcNnAaaEeEeIiOoOoUuIU
El texto del mensaje está en un Tmemo y básicamente el código es este:

Código Delphi [-]
 idmessage1.Clear;
 idmessage1.ContentType := 'text/plain';
 idmessage1.Body.clear;
 idmessage1.Body.AddStrings( MemoCarta.Lines);
 
 idmessage1.From.Address := strEmailFrom;
 idmessage1.From.Name := strNomFrom;
 idmessage1.Subject := EdAsun.Text;
 IdSMTP1.Connect;
 IdSMTP1.Send(idmessage1);

Supongo que es un problema de codificación pero llevo peleándome dos dias y no consigo resolverlo. ¿alguien sabe como hacerlo?

Gracias y un saludo,
Quim

[Quim Herrera]

Hola,

Sigo probando.
Pasa lo mismo con el asunto. Si lleva acentos, al enviar, desaparecen.

He probado con:
idmessage1.CharSet := 'ISO-8859-1';
idmessage1.ContentTransferEncoding := '16bit';
pero no hay manera.

La versión de Indy es la 10.2.5

¿Alguien puede ayudarme a enviar e-mails con acentos en el asunto y en el cuerpo del mensaje con delphi 2009 y Indy?

Gracias por adelantado,
Quim

[agidar]

Me pasa exactamente lo mismo, alguien tiene alguna solucion?

Gracias.