Форум: "Сети";
Текущий архив: 2005.11.27;
Скачать: [xml.tar.bz2];
Вниз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;
А потом загружаеш в Мемо или куда хоч и читаеш код.
← →
Yegorchic © (2005-08-13 18:05) [2]Alecksey, у Вас какой-то код длинный...
Вот, покороче:
var
code: string;
begin
code:=Variant(WebBrowser1.Document).Body.OuterHTML;
end;
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2005.11.27;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.013 c