Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Bestimmte Messageparts auswaehlen (https://www.delphipraxis.net/81498-bestimmte-messageparts-auswaehlen.html)

Namron 28. Nov 2006 10:50


Bestimmte Messageparts auswaehlen
 
Hallo,

ich habe da ein kleines Problem mit EMails.

Es geht darum das ich EMails aus meinem Postfach auslese, diese aber wenn sie mit Outlook, Firebird oder Outlook Express geschickt werden einmal in Plaintext und einmal in HTML verschickt werden.
Ich suche im Moment Moeglichkeiten um
1. Nur den Plaintext auszuwaehlen und
2. Die Textzeilen vor der eigentlichen Message zu entfernen

Ich dachte daran MessageParts zu verwenden. Habe aber leider nicht ganz herausgefunden wie ich bestimme MessageParts und deren Texte nutzen kann.

Vielen dank schon einmal
Namron

Namron 28. Nov 2006 17:39

Re: Bestimmte Messageparts auswaehlen
 
Delphi-Quellcode:
       
.
        _Body := Msg.Body.Text;
        //alles vor 'Content-Transfer-Encoding:' wird entfernt
        _Body := copy(_Body,pos('Content-Transfer-Encoding:',_Body),Length(_Body));
        // die zeile mit 'Content-Transfer-Encoding:' wird entfernt
        _Body := copy(_Body,pos(#13#10,_Body)+2,Length(_Body));
        //der HTML Teil der Mail wird entfernt
        _Body := copy(_Body,3,pos('---',_Body)-5);
        _Body := copy(_Body,0,Length(_Body)-2);
Also das ist nun meine Loesung die recht gut funktioniert. Ist zwar nicht schoen aber das ist mir im Moment noch nicht sooooooooo wichtig. Aber fuer andere Vorschlaege bin ich gerne offen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:00 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz