Как в WebBrowser загрузить HTML.

← →
allucard (2007-05-22 08:34) [0]

Доброго дня.

Подскажите методом IdHTTP1.Post получаю HTML код в виде TStringStream.

Как его отобразить в компоненте WebBrowser?

procedure TForm1.Button1Click(Sender: TObject); var LoginInfo: TStrings; Response: TStringStream; begin Login := "login"; Password := "pass"; LoginInfo := TStringList.Create; Response := TStringStream.Create(""); LoginInfo.Clear; LoginInfo.Add("Login=Login"); LoginInfo.Add("Password=Pass"); IdHTTP1.Post("http://www.site.com" ,LoginInfo, Response); Memo1.Lines.Add(Response.DataString); // WebBrowser1. ??? Response.Free; LoginInfo.Free; end;

Спасибо.

← →
G_M_S © (2007-05-22 09:42) [1]

Я обычно в таких случаях кэширую страницу в локальный файл, а потом открываю в WebBrowser методом Navigate. Это позволяет в последствии использовать кэшированные страницы или чего-нить в них подменять... Выглядит примерно так:

===================================================
tmp : String;
f : TextFile;
begin
....(параметры и все такое)
assignfile(f,ExtractFileDir(Application.ExeName)+"\dump.wml");
rewrite(f);
tmp := IdHTTP1.Post("http://....ru/", ppar);
writeln(f,tmp1);
closefile(f);
WebBrowser1.Navigate(ExtractFileDir(Application.ExeName)+"\dump.wml");
===================================================

В принципе, тут кэширование в один файл, а вообще можно сделать что-то типа кэша в Опере, со списком вида URL=LocalFileName.

← →
allucard (2007-05-22 10:06) [2]

Есть же у этого компонента свойство которое содержит HTML код?

← →
Плохиш © (2007-05-22 11:06) [3]

http://www.swissdelphicenter.ch/de/showcode.php?id=1096

← →
allucard (2007-05-22 12:05) [4]

Спасибо всем.
Оно самое.

← →
allucard (2007-05-22 12:26) [5]

Шведы жгут

> allucard (22.05.07 12:26) [5]
> Шведы жгут

Швейцарцы...

← →
allucard (2007-05-22 14:52) [7]

Как в загруженной странице в WebBrowser ввести данные в поля логин и пароль и нажать кнопку вход?

Как в WebBrowser загрузить HTML. Найти похожие ветки