Скачать: CL | DM;

Как при отправке письма через TIdSMTP указать кодировку письма ?   Найти похожие ветки 

← →
ANB ©   (2006-06-16 12:51) [0]

Отправляю письмо через TIdSMTP.
Примерно так :

   FMsg := tIdMessage.Create(nil);
   FMsg.Subject:= Format( "%s_%d_%d", [ MessageChar, Cert_No, MailNum ] );
   FMsg.Date := Now;
   FMsg.From.Address := FPOP.Username;
   FMsg.Sender.Address := FPOP.Username;
   FMsg.Sender.Name := "Я";
   FMsg.Recipients.Clear;
   FMsg.Recipients.Add.Address := Bank_EMail;
   FMsg.Body.Text := Message_Body;

Message_Body - обычная константа.
При получении этого письма оутлуком - в нем крякозябры. Как заставить его ехать нормально в обычной виндовой кодировке (чтобы оутлук читал).

---

← →
ANB ©   (2006-06-16 15:35) [1]

Может надо в другую ветку переложить ?

---

← →
Dmitrij_K   (2006-06-16 15:40) [2]

Попробуй Mes.CharSet := "windows-1251";

---

← →
ANB ©   (2006-06-16 16:33) [3]

> Dmitrij_K   (16.06.06 15:40) [2]

Пробовал - не помогает.

---

← →
ANB ©   (2006-06-16 17:30) [4]

Мрак. Пока модуль IdMessageClient не поправил, так и не смог добиться результата.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.031 c