Enviar correos con adjuntos (Indy 10)

[Angel.Matilla]

Gracias por la respuesta juanelo. Ya logré solucionarlo. El código que me has mandado es, más o menos, como lo hacía yo con Indy 9; con Indy 10, como comentaba antes, es que hay que añadir un include en .h del formulario que no se hace de forma automática:

#include "IdAttachmentFile.hpp"

y para añadir el adjunto se hace con:

TIdAttachment *Adjunto = new TIdAttachmentFile(IdMessage1->MessageParts, File);

siendo File un AnsiString en el que se indica la vía de acceso y el nombre del fichero a adjuntar al mensaje. Ya he hecho varias pruebas y todas me han salido bien.