Как заставить IndySMTP отправлять Subject кириллицей?

← →
Rav (2007-09-26 19:45) [0]

Отправляю сообщение через Indy SMTP:
MailMsg := TIdMessage.Create(IdSMTP); try MailMsg.CharSet := "Windows-1251"; MailMsg.ContentType := "text/plain"; MailMsg.Subject := MailHeader; MailMsg.From.Text := MailSender; MailMsg.Recipients.EMailAddresses := CN_LISTRCP_EMAIL.AsString; MailMsg.Body.Add(MessageStr); if IdSMTP.Connected then IdSMTP.Disconnect; IdSMTP.Host := MailServer; IdSMTP.Username := MailUser; IdSMTP.Password := MailPassword; IdSMTP.Connect; if IdSMTP.Connected then begin IdSMTP.Send(MailMsg); IdSMTP.Disconnect; end; finally MailMsg.Free; end;
Проблема в том, что тело письма приходит как и положено, кирилицей, а вот Subject, если подсунуть ему кирилицу, приходит крякозябрами. Как победить? Help!

← →
umbra © (2007-09-27 11:51) [1]

MailMsg.Subject := "=?windows-1251?B?тема в Base64?=";

Как заставить IndySMTP отправлять Subject кириллицей? Найти похожие ветки