![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
текст HTML Документа из TWebBrowser без тегов
Демерго © (2010-12-01 18:07:00)Хочу сохранить в файл текст из Webbrowser без тегов.
нашел следующий код:
uses mshtml, activex;
procedure GetHtmlCode(WebBrowser: TWebBrowser; FileName: string);
var
htmlDoc: IHtmlDocument2;
PersistFile: IPersistFile;
begin
htmlDoc := WebBrowser.document as IHtmlDocument2;
PersistFile := HTMLDoc as IPersistFile;
PersistFile.save(StringToOleStr(FileName), true);
end;
Делает все идеально, кроме одного НО. Он "портит" документ в самом Webbrowsere. Можно как-то это обойти? Чтобы сохранять теги в файл при этом ничего не меняя в самой страничке открытой в Webbrowsere.
Jeer (2010-12-01 18:21:00) [21]
> нашел следующий код:
>
Ищи следующий код.