Okay, nochmal etwas genauer
Hier ist eine Lösung dazu, die aber bei mir nicht funkt
Delphi-Quellcode:
with IdMessage do
begin
ContentType := 'multipart/*'; // Wichtig für Anhang!
From.Address := ASender;
for i := 0 to ARecipients.Count - 1 do
Recipients.Add.Address := ARecipients.Strings[i];
for i := 0 to AAttachment.Count - 1 do // Wichtig für Anhang!
TIdAttachmentFile.Create(IdMessage.MessageParts, // Wichtig für Anhang!
AAttachment.Strings[i]); // Wichtig für Anhang!
IdMessage.MessageParts.Add(); // Wichtig für Anhang!
Subject := ASubject;
Body := ABody;
end;
Die mit " // Wichtig für Anhang!" markierten Zeilen habe ich aus dem verlinkten Thread entnommen, allerdings geht das schief :/
Ich hoffe es findet sich eine Lösung