OK,Das hier ist die Lösung.
Delphi-Quellcode:
function TLog.Internal_GetEmailFile: String;
var alogtext:String;
begin
result := '';
Internal_ReadFile(alogtext);
alogtext := aLogtext.Replace(''+linefeed, ''+carriageReturn+''+linefeed, [rfReplaceAll] );
alogtext := alogtext.Replace(''#0,'',[rfReplaceAll]);
if tFile.Exists(fEmailFile) then
Tfile.Delete(fEmailFile);
TFile.WriteAllText(femailfile,aLogText, TEncoding.UTF8 );
result := femailfile;
end;
Ich weiß nicht wie die ganzen "null" werte da rein kommen, aber es fühlt sich so ein bisschen an als würde der Filestream einen Nulltermnierten string schreiben, und auch die #0 in die Datei speichern.