Показать сообщение отдельно
  #1  
Старый 16.11.2010, 15:40
MrDiG MrDiG вне форума
Начинающий
 
Регистрация: 05.10.2010
Сообщения: 112
Репутация: 1227
По умолчанию D2010 + Email + кодировка

Тема заезженная, но как-то ответа для D2010 не нашёл.

Импользую IdSMTP и IdMessage (из indy)

Код:
begin
idsmtp1.Host:= 'smtp.mail.ru';    //почтовый сервер
idsmtp1.Port:= 25;    //порт
idsmtp1.Username:= '******';   //имя пользователя
idsmtp1.Password:= 'pass';     //пароль

IdMessage1.From.text:='***@mail.ru';   //поле от
IdMessage1.Recipients.EMailAddresses:='****@***.**';    //кому отправить
IdMessage1.Body.Text:=('Тут текст письма в киррилице');
IdMessage1.Subject:=('Тут тема письма в киррилице');
idsmtp1.connect();
if idsmtp1.Connected=false then abort;
idsmtp1.Send(idmessage1);
idsmtp1.Disconnect;
end;

Тема письма приходит в киррилице, как и нужно. А вместо тела - знаки вопроса. D2010 ведь юзает только UTF-8? Что-то мои попытки с разными там AnsiToUTF8 успеха не принесли. Как отправить в нормальной кодировке?
Ответить с цитированием