Ipworks Smtp - Anhang und Umlauten Problem

[rocksoft]

Hallo zusammen,

ich spiele gerade mit IpWorks V9 und test die demo popclient, senden und empfangen lauft soweit bis man eine email mit sonderzeichen(im email text) und ein anhang mit senden will.

Z.B Email text:

das ist ein Test
ñ ä ö # * / - |



Hab nun die lössung gefunden :) als NEU deklariert im code

Hier ein teil des codes

Code:

      if FormCompose.ComboBoxAttachments.Items.Count > 0 then
      begin
         //reset data
         ipwMIME1.ResetData;

         //set PartCount.  Part 0 is the plain text of the message
         ipwMIME1.PartCount := FormCompose.ComboBoxAttachments.Items.Count + 1;
         ipwMIME1.PartDecodedString[0] := FormCompose.MemoMessage.Text;

         // NEU---------------------------------------------------------
         ipwMIME1.PartContentType[0] := 'text/plain';  
         // NEU---------------------------------------------------------

         //add attachments
         for i := 1 to FormCompose.ComboBoxAttachments.Items.Count do
            ipwMIME1.PartDecodedFile[i] := FormCompose.ComboBoxAttachments.Items[i-1];

         //encode 
         try
            ipwMIME1.EncodeToString;
         except on E: EipwMIME do
            ShowMessage(E.Message);
         end;

         //assign the data. The Headers are indispensable!
         ipwSMTP1.MessageText := ipwMIME1.Message;
         ipwSMTP1.OtherHeaders := ipwMIME1.MessageHeadersString;

      end
      else
      begin
         // No MIME.  Just send the message.
         ipwSMTP1.MessageText := FormCompose.MemoMessage.Text ;
      end;

und zurletzt Frohe Weihnachen an alle :)