Indy9 - HTML-EMail mit Bildern senden

[Peinhard]

Der Titel sagt es schon: ich versuche - ziemlich erfolglos - mit Indy9 über SMTP eine HTML-Mail mit eingebetteten Bildern zu versenden. Die Suche ergab bislang nur einen Hinweis von 'Jelly', dass das 'etwas komplizierter' wäre. Hätte evt jemand ein Code-Sample, an dem ich mich orientieren könnte?

[Deep-Sea]

In der Tat ist das etwas komplizierter. Ich nutze Indy10, darum weiß ich nicht ob es bei Indy9 auch so ist.
Einen kompletten Quelltext kann ich dir leider auch nicht anbieten, bei mir ist alles zu sehr verstrickt.

Du benötigst die Klasse TIdAttachmentFile.

Delphi-Quellcode:

With TIdAttachmentFile.Create(LIdMessage.MessageParts, 'Dateiname mit Pfad') do
begin
  ContentID   := ErzeugeEineGUID; // Eigentlich egal, Hauptsache eindeutig
  ContentType := 'image/jpg'; // Der MIME-Typ der Datei
  FileName    := 'Dateiname';
end;

So ungefähr.
Du musst jedoch src der Bilder im HTML-Dokument ändern, und zwar auf cid:xyz, wobei xyz für die ContentID des Anhangs steht.

Den Text, der sonst in TIdMessage.Body.Text steht, muss mittels der Klasse TIdText - ähnlich TIdAttachmentFile - hinzugefügt werden. Beachte, dass TIdMessage.Body.Text trotzdem nicht leer sein darf, da sonst Fehler auftreten (Beispiel für den Inhalt: This is a multi-part message in MIME format).


So, versuch damit erstmal etwas anzufangen. Evtl. musst du auf Indy10 updaten ... :-D

[Peinhard]

Danke, das hilft mir schon mal auf die Sprünge, und deckt sich soweit auch mit meinen 'Beobachtungen'. Nur leider hat die Klasse TIdAttachment in v9 keine Eigenschaft ContentID, TIdAttachmentFile gibt es gar nicht - da wird wohl tatsächlich erstmal ein Update unumgänglich sein...