HTML код в TWebBrowser

← →
Lex_! © (2005-05-11 05:37) [0]

Искал но ничего не нашел, пара вопросов есть но оставлены без ответа.
Собственно сам вопрос: после загрузки страници в WebBrowser как получить HTML этой страници (со всеми тегами и прочим .

← →
Alecksey (2005-08-11 14:09) [1]

uses MSHTML; ....... var HTMLDocument: IHTMLDocument2; PersistFile: IPersistFile; begin HTMLDocument := WebBrowser1.Document as IHTMLDocument2; PersistFile := HTMLDocument as IPersistFile; PersistFile.Save(StringToOleStr("C:\test.htm"), True); end;
А потом загружаеш в Мемо или куда хоч и читаеш код.

Alecksey, у Вас какой-то код длинный...
Вот, покороче:

var
code: string;
begin
code:=Variant(WebBrowser1.Document).Body.OuterHTML;
end;

HTML код в TWebBrowser Найти похожие ветки