HI
here is a start, the following code WORKS! when sending text part with unicode
var txtPart: TMimePart;
txtContent: TStringList;
tmpStrm: TMemoryStream;
begin
txtPart := Msg.AddPart(nil);
txtContent := TStringList.Create;
tmpStrm := TMemoryStream.Create;
try
txtContent.Text := Content;
txtContent.SaveToStream(tmpStrm,TEncoding.UTF8);
tmpStrm.Position := 0;
txtPart.DecodedLines.LoadFromStream(tmpStrm);
txtPart.Primary := 'text';
txtPart.Secondary := 'plain';
txtPart.Description := 'plain text';
txtPart.Disposition := 'inline';
txtPart.CharsetCode := UTF_8;
txtPart.EncodingCode := ME_QUOTED_PRINTABLE;
txtPart.TargetCharset := UTF_8;
txtPart.EncodePart;
txtPart.EncodePartHeader;
finally
txtContent.Free;
tmpStrm.Free;
end;
im sure that creating a HTML part will be the same as above except for the
obvious changes for HTML.
i still have a problem sending a subject/sender name with unicode, any idea?
-- ------------------------------------------------------------------------------
Apps built with the Adobe(R) Flex(R) framework and Flex Builder(TM) are
powering Web 2.0 with engaging, cross-platform capabilities. Quickly and
easily build your RIAs with Flex Builder, the Eclipse(TM)based development
software that enables intelligent coding and step-through debugging.
Download the free 60 day trial. http://p.sf.net/sfu/www-adobe-com
_______________________________________________
synalist-public mailing list
synalist-public@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/synalist-public
