Envoi email format html avec INDY

GeulderackK Messages postés 1 Date d'inscription mardi 9 décembre 2003 Statut Membre Dernière intervention 10 février 2004 - 10 févr. 2004 à 09:55
cs_H4MZA Messages postés 18 Date d'inscription vendredi 9 juin 2006 Statut Membre Dernière intervention 25 août 2008 - 9 sept. 2010 à 04:25
Bonjour je voudrais savoir si quelqu'un a un exemple d'envoi de mail au format html avec les composants Indy

Merci

1 réponse

cs_H4MZA Messages postés 18 Date d'inscription vendredi 9 juin 2006 Statut Membre Dernière intervention 25 août 2008 1
9 sept. 2010 à 04:25
  // -- Configuration Message
try for i:=0 to sendto.items.count -1 do begin
Source := VotreEditeurHtml.Source;
//imessage.Clear;
with TIdMessageBuilderHtml.Create do try
Subject := Subject.Text;
IMessage.From.Address := From.Text;
IMessage.From.Name:= name.Text;
IMessage.Recipients.Add.Address:=sendto.items[0];
if selecthtmlmsg.Checked=true then Html.Text := Source+pub else Html.Text := textmsg.Text; 
FillMessage(IMessage);
finally
.....;
  // -- Fin Configuration Message


Je travail avec sur mon projet TOTO Mail Sender
0
Rejoignez-nous