KnowledgeHub
Questions
Tags
Users
Search
Alex Rivera
|
Logout
Edit Question
Title
Body
Here is my code Email body has got some unicode characters LSMTP := TIdSMTP.Create(nil); try LMsg := TIdMessage.Create(LSMTP); try with LMsg do begin Subject := Subj; Recipients.EMailAddresses := Email; WriteToLog(cInformation,'To: '+Recipients.EMailAddresses); From.Address := ReplaceVariables(From_Address); From.Name := ReplaceVariables(From_Name); Body.Text := EmailMessage; ContentTransferEncoding := '8bit'; CharSet := 'UTF-8'; ContentType := 'text/plain'; end; And this is what I get Content-Type: text/plain; charset=us-ascii <<<<< WRONG Content-Transfer-Encoding: 8bit Date: Fri, 23 Mar 2012 17:53:19 +0000 Using delphi 2009
Tags (comma-separated)
Save Edits
Cancel