*.msg Datei in Memo einlesen

[erich.wanker]

Hallo Leute,

ich versuche grad (vergebens) den text einer Email, die ich via Drag&Drop auf dem Desktop ablege, in ein Memo zu laden...

Delphi-Quellcode:

    memo1.Lines.Clear;
    F := TFileStream.Create(aktuelle_datei, fmOpenRead);
    memo1.Lines.LoadFromStream(F);

Die Header-Sonderzeichen sind mir egal, solange der restliche Quelltext lesbar ist..
Die weiteren Schritte, die ich mit dem Text mache sind: if AnsiContainsStr(Memo1.Lines ..
Will nur bestimmte Infos aus meinen Mails automatisch extrahieren ...

Vielen Dank für Hinweise

Erich

Zitat:

The Internet email message format is defined in RFC 5322, with multi-media content attachments being defined in RFC 2045 through RFC 2049