В Indy не поддерживается кодировка

[GragDen]

Здравствуйте.
у меня вот какая проблема:
написал программку получения почты с помощью компонентов Indy (TIdMessage и TIdPop3), при приеме письма некорректно показывает тело итему сообщения.
Вот отрывок кода:
POP3.Host:='------'; // адресс почтового сервера
POP3.Port:=110; // порт по которому будет осуществляться подключение
POP3.Username:='------'; // Логин пользователя
POP3.Password:='------'; // пароль пользователя
IdMessage.Clear; // очистка буфера для сообщения
POP3.Connect; // подключение по протоколу POP3
Memo1.Clear; // очистка компонента memo для отображения текста письма.
POP3.Retrieve(1,IdMessage); // получение 1 сообщения
Memo1.Lines.AddStrings(IdMessage.Bo dy); // передача сообщения из компонента IdMessage в memo
POP3.Delete(1); // удаление с сервера, полученного сообщения
POP3.Disconnect; // разрыв связи

Пробовал присваивать кодировки KOI-8 или WINDOWS-1251 - без толку

вот просто текст темы (это как он его показывает) - =?KOI8-R?B?8NLJ18XUIMTFzsnTLg==?=

Помогите чем можете.

Это текст тела письма:

------=_Part_6764_27739647.1205952517715
Content-Type: text/plain; charset=KOI8-R
Content-Disposition: inline
Content-Transfer-Encoding: base64

8NLJ18XUIOTFzsnTy8EKCi0tIArzINXXwdb FzsnFzSDkxc7J0y4K
------=_Part_6764_27739647.1205952517715
Content-Type: text/html; charset=KOI8-R
Content-Disposition: inline
Content-Transfer-Encoding: base64

8NLJ18XUIOTFzsnTy8E8YnIgY2xlYXI9ImF sbCI+PGJyPi0tIDxicj7zINXXwdbFzsnFzS Dkxc7J
0y4K
------=_Part_6764_27739647.1205952517715--

[Квэнди]

1. добавьте корректную кодироку в headers письма.
Вот отрывок кода:

POP3.Host:='------'; // адресс почтового сервера
POP3.Port:=110; // порт по которому будет осуществляться подключение
POP3.Username:='------'; // Логин пользователя
POP3.Password:='------'; // пароль пользователя
IdMessage.Clear; // очистка буфера для сообщения
POP3.Connect; // подключение по протоколу POP3
Memo1.Clear; // очистка компонента memo для отображения текста письма.
POP3.Retrieve(1,IdMessage); // получение 1 сообщения
Memo1.Lines.AddStrings(IdMessage.Bo dy); // передача сообщения из компонента IdMessage в memo
POP3.Delete(1); // удаление с сервера, полученного сообщения
POP3.Disconnect; // разрыв связи

хоть одну строчку, относящуюся к кодировке видите ?
тема описывается в headers письма, кодировка содержимого у вас отображается в base64 поэтому и бред видите.

[GragDen]

Я использовал CHarSEt, присваивал ему разные кодировки. но без толку. Мож я чето не правильно делаю.

Может кто-нибудь подскажет как написать код с поддержкой кодировки, и какие компоненты при этом нужно использовать?

[Квэнди]

Ответ я уже вам написал.
Относительно кодировки в теме письма: вы не указываете кодировку в заголовках письма
По поводу содержимого: незачем указывать base64

[Dark_Cat]

Также пробовал получить почту с mail.ru, но русские символы в Memo отображаются некорретно. Пробовал прописать кодировку письма в свойстве CharSet не помогает. Предполагаю, что содержимое поля используется только для кодировки отправляемых сообщений.
Возможно, текст сообщения представлен в виде Ansi строки, а компонент индентифицирует его как Unicode? Не подскажете как решить проблему совместимости?

[KORN]

http://programmersforum.ru/showthread.php?t=10231
тебе сюда