Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2006.12.31;
Скачать: [xml.tar.bz2];

Вниз

Проблема с Tidmessage   Найти похожие ветки 

 
mr. Eof   (2006-08-09 23:22) [0]

Добрый день!!

Подскажите пожалуйста как правильно задать кодировку отправляемого письма???
Симптомы - следующие:
- при просмотре письма через WEB интерфейс, например на mail.ru, - ВСЕ ОК.
- при просмотре письма через OutLook - все содержание письма (кроме темы. тема - ок) - выглядит так: дНАПШИ ДЕМЭ!

uses
IdCoderHeader, ...;

procedure TForm1.IdMessageInitializeISO(var VTransferHeader: TTransfer; var VHeaderEncoding: Char; var VCharSet: string);
begin
VTransferHeader:= bit7;
VHeaderEncoding:= "Q";
VCharSet:= "windows-1251";
end;

а в свойствах TIdMessage - я задаю:

IdMessage.ContentType:= text/html;

остальные свойства - это: тема, получатель, от кого и др свойства необходимые для отправки письма...

И в процедуре отправки письма:

IdMessage.OnInitializeISO:= IdMessageInitializeISO;

Текст письма программа считывает из TXT файла:
<HTML>
<HEAD>
<META http-equiv=Content-Type content="text/html; charset=windows-1251">
</HEAD>

<BODY>
Добрый день!
</BODY>
</HTML>

А OutLook отображает:
дНАПШИ ДЕМЭ!


 
ivane   (2006-08-10 03:55) [1]

попробуй
VCharSet:= "cp1251";
или
VCharSet:= "cp-1251";

тоже самое, только подругому


 
mr. Eof   (2006-08-10 11:12) [2]

Спасибо, но ксожалению результата это не принесло..

При получении письма - тема имеет правильную кодировку (как и задаю: cp1251 или cp-1251 или windows-1251), а вот само письмо - нечитабилино..

Параметры, которые я задаю для IDMessage:


IdMessage.Subject
IdMessage.Body
IdMessage.From.Name
IdMessage.From.User
IdMessage.From.Domain
IdMessage.From.Address
IdMessage.From.Text
IdMessage.Recipients.EMailAddresses


CharSet - задаю в теле самого письма (в html)

Я спринтскринил свойства IDMessage: http://www.eof.pochta.ru/prop.jpg

Большое спасибо за помощь!


 
Slym ©   (2006-08-10 11:20) [3]

Добавляй TextPart и у него чарсет настраивай


 
mr. Eof   (2006-08-10 19:42) [4]

Спасибо! Все получилось!



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

Форум: "Сети";
Текущий архив: 2006.12.31;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.046 c
2-1165905216
Steep
2006-12-12 09:33
2006.12.31
Реестр


11-1142575284
Unknown Mystic
2006-03-17 09:01
2006.12.31
Ошибка в TKOLOpenDirDialog из MCK?


10-1127456027
SupKlo
2005-09-23 10:13
2006.12.31
Как передать array of record


2-1165836388
said46
2006-12-11 14:26
2006.12.31
TList.Sort и переполнение стека


15-1166000886
Ega23
2006-12-13 12:08
2006.12.31
Как по-английски сказать "прямое направление"?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский