Buenas Tardes Amigos del Foro.
Alguien de ustedes sabe como puedo pegar una imagen en el cuerpo del correo, no como archivo atachado, esto para darle mas presentación al correo, si alguien sabe y lo puede compartir se los voy agradecer bastante. La aplicación que estoy modificando esta echa en Delphi 7 y para el envió de los correos utilizo los componentes TidMessage y TidSMP, les anexo una parte del código que uso para el envió de correos.
Código Delphi
[-] VLSbody_correo:='Se ha enviado el reporte De Entregas del mes de marzo';
SMTPcorreos.Host:='179.19.10.200';
SMTPcorreos.Port:=45;
MSGcorreos.from.Name:='Sistema ERP';
MSGcorreos.From.Address:='Reportes@maosis.mx';
MSGcorreos.Subject:='Reporte De Entregas';
TIdAttachment.Create(MSGcorreos.MessageParts, 'C:\Reporte_Entregas.XLS');
MSGcorreos.Body.Clear;
MSGcorreos.Body.Add(VLSbody_correo);
MSGcorreos.Recipients.EMailAddresses:=VLScorreo_to;
MSGcorreos.CCList.EMailAddresses:=VLScorreo_cc
Les agradezco la ayuda que me puedan brindar.
Su amigo Charless..