Bonjour à tous,

le code suivant fonctionne avec "XXXXX@gmail.com" et pas avec "XXXXX@laposte.net" (je n'ai pas tester d'autres adresses).
En mettant Idmessage1.NoEncode := True, les 2 adresses reçoivent le mail sans sujet sans rien.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
        Idmessage1.Clear;
        Idmessage1.Date                      := Now;
        Idmessage1.CharSet                   := 'iso-8859-1';
        // Idmessage1.NoEncode                  := True;
        Idmessage1.Encoding                  := MeMIME;
        Idmessage1.ContentType               := 'multipart/mixed';     // 'text/plain';
        IdMessage1.ReplyTo.EMailAddresses    := FMails.MailReponse.Text;
        IdMessage1.From.Text                 := FMails.MailExpedit.Text;
        Idmessage1.from.address              := FMails.MailExpedit.Text;  // e-mail do remetente
        Idmessage1.recipients.emailaddresses := FMails.MailDestin.Text;
        Idmessage1.subject                   := FMails.SujetMail.Text;
        Idmessage1.AttachmentEncoding        := 'MIME';
Merci de votre aide !!!