Как в TWebBrowser переключать кодировку на Кириллица Windows

← →
массив (2004-09-10 05:12) [0]

и Кириллица Koi-8 ?

← →
easy © (2004-09-10 09:59) [1]

uses ...., mshtml; procedure SetEncoding(browser:TWebBrowser;enc:string); var Doc2 : IHTMLDocument2; level:Olevariant; begin browser.Document.QueryInterface(IHTMLDocument2,Doc2); Doc2.charset:= enc; level:=REFRESH_IFEXPIRED; browser.Refresh2(level); end; //********************** ... SetEncoding(WebBrowser1,"KOI8-R"); ... SetEncoding(WebBrowser1,"windows-1251");

← →
массив (2004-09-11 01:32) [2]

> easy © (10.09.04 09:59) [1]

Пишет "Неопределённая ошибка".

var Doc1 : Variant; procedure TForm1.FormCreate(Sender: TObject); begin WebBrowser1.Navigate("about:blank"); Doc1 := WebBrowser1.DefaultInterface.Document; Doc1.write("<html><HEAD></HEAD><body bgcolor=#FFFFCF> Проверка </body></html>"); end;

C чем это может быть связано ?

← →
массив (2004-09-12 01:31) [3]

easy © (10.09.04 09:59) [1]
Проверь ! Ошибка возникает.

← →
массив (2004-09-16 06:10) [4]

А где хотя бы описан полный список всех возможных кодировок ? В исходниках Дельфи чего-то не наблюдается.

← →
массив (2004-09-16 10:50) [5]

Нет никакой ошибки. Все нормально работает.

Как в TWebBrowser переключать кодировку на Кириллица Windows Найти похожие ветки