Registriert seit: 28. Nov 2006
Ort: Bergen auf Rügen
8 Beiträge
Delphi 6 Professional
|
Re: Bestimmte Messageparts auswaehlen
28. Nov 2006, 18:39
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.
|
|
Zitat
|