![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как в TWebBrowser изменить кодировку на КИРИЛЛИЦУ?! [D6, WinXP]
Volf_555 © (2006-04-17 21:34:00)Написал прогу, котороая в TWebBrowser выводит текст полученных сообщений (аналог почтовика). Но эти сообщения отображаются крэказябдами!!! Так как не правильная кодировка...
Как изменить кодировку в TWebBrowser на КИРИЛЛИЦУ (Windows)?
Volf_555 (2006-04-17 21:58:00) [1]
> palva © (17.04.06 21:41) [1]
> Укажите кодировку в тексте, который выводите, т. е. начните
> вывод примерно так:
>
> <HTML><HEAD>
> <META http-equiv=Content-Type content="text/html; charset=windows-
> 1251">
> </HEAD>
> <BODY>
Я пробывал делать так:
NMPOP31.Connect;
NMPOP31.GetMailMessage(listview4.ItemIndex+1);
a:=TStringList.Create;
a.Text:=NMPop31.MailMessage.Body.Text;
a.Insert(0,'<BODY>');
a.Insert(0,'</HEAD>');
a.Insert(0,'<META http-equiv=Content-Type content="text/html; charset=windows-1251">');
a.Insert(0,'<HTML><HEAD>');
a.SaveToFile(EFP(ParamStr(0))+'body.html');
WebBrowser1.Navigate('file://'+EFP(ParamStr(0))+'body.html');
NMPOP31.Disconnect;
Никаких изменений не произошло... Скорее всего, что эти строки не обрабатываются. Так какNMPop31.MailMessage.Body.Textуже содержит html-код с тегами....
palva (2006-04-17 21:41:00) [2]Укажите кодировку в тексте, который выводите, т. е. начните вывод примерно так:
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=windows-1251">
</HEAD>
<BODY>