Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

текст HTML Документа из TWebBrowser без тегов


Страницы:   1 2

Демерго ©   (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]


> нашел следующий код:
>


Ищи следующий код.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо