Plaintext aus .EML-Datei extrahieren?

[mm1256]

Hallo,

habe soeben einen Ordner mit 700+ EML-Dateien konvertiert. Hat funktioniert. :thumb:

Eine Kleinigkeit würde ich im Code noch ändern...

Delphi-Quellcode:

begin
  IndyStringList := nil;
  IndyStream := nil;
  try
    IndyStringList := TStringList.Create;
    IndyStream := TMemoryStream.Create;
    IndyStringList.LoadFromFile(Trim(Edit1.Text));
    IndyStringList.Add(CRLF + '.' + CRLF);
    IndyStringList.SaveToStream(IndyStream);
    ...

...dann kann es im finally-Block nicht mehr knallen, wenn der erste Constructor fehlschlagen sollte. Unwahrscheinlich, ich weiß, aber, gute Gewohnheiten sollte man auch an kleinen Stellen pflegen