Bonjour
Avec beaucoup de recherche sur le Web ou ici même, je ne trouve pas la solution pour expédier un email au format Html avec MAPI, avec Indy pas de soucis.
Voici mon code, quelques lignes en commentaire pour des essais.

Est-il possible de le faire?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
JvMail1.Clear;
//définir une option pour "smtp:" avant le adresse acause de Outloock d'office
 
//JvMail1.Address('smtp:',3); ouvre la boite du carnet d'adresse
JvMail1.Recipient.AddRecipient ('smtp:'+(DM.IBQuery_fournisseursFRN_EMAIL.Value));
JvMail1.CarbonCopy.AddRecipient('smtp:'+_EmailCC);
JvMail1.Subject := _OBJET;
//JvMail1.Body.LoadFromFile(Dossier+'trames\Cde.html');
 
JvMail1.Body.Add('<html> <body> <b> salut</b> </body> </html>');
//JvMail1.Attachment.Add(Dossier+'trames\Cde.html');
 
JvMail1.Attachment.Add(Dossier+'trames\Cde.pdf');
 
JvMail1.SendMail(true);  // false, créer un message pour demander si c'est normal l'envoie de l'Email