Hallo,
Danke für die Hinweise. Letztlich hat mich nur das Durchprobieren von verschiedenen Varianten weitergebracht.
Ich hab's mit meinem eigenen Mail client jetzt so gemacht:
Versenden von Mails:
oSmtpClient.BodyAsHtml.Text := UTF8Decode(sendText); //sendText ist der Inhalt eines Memos
Zum Abholen der Mail hab ich dann die folgenden Zeilen:
Delphi-Quellcode:
pop.RetrStream(StrToInt(tmpuidl), retrStream);
retrStream.Position := 0;
mess.Lines.LoadFromStream(retrStream);
mess.DecodeMessage;
mess.MessagePart.DecomposeParts;
showmessage(AnsiToUtf8(DecodeQuotedPrintable(mess.Header.Subject)));
mess.MessagePart.Headers.SaveToStream(headerStream);
mess.MessagePart.PartBody.SaveToStream(bodyStream);
headerStream.Position:=0;
bodyStream.Position:=0;
headerSL.LoadFromStream(headerStream);
// ab hier weiter mit INSERT SQL
Mit UTF8Decode(sendText) kommt die Mail sowohl bei gmail, als dann auch bei mir mit
AnsiToUtf8(DecodeQuotedPrintable(mess.Header.Subje ct))
"lesbar" an.
Danke.
Josef