Ich nimm alles zurück, hab den Fehler zwar nicht gefunden, aber ich hab diese Funktion
Delphi-Quellcode:
with TIdText.Create(IdMsgSend.MessageParts, nil) do
begin
ContentType := 'text/plain';
Body := Nachricht.Lines;
Body.SaveToFile('Data.txt');
end;
Einfach weggelassen und den Body "normal" eingefügt.