Подписаться на RSS рассылку
Главная » Статьи по Delphi » Браузер » Как получить текст HTML документа из TWebBrowser без тегов

Как получить текст HTML документа из TWebBrowser без тегов

Автор: Акулов Николай

Взято с http://delphiworld.narod.ru/

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;

Естественно на форме должен быть TWebBrowser.

FileName - путь, по которому будет создан файл с текстом HTML документа.

Просмотров: 5881

Обсудить на форуме


Имя *:
Email:


Код *:

Copyright © 2008-2016 Программирование на Delphi для начинающих и не только

Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам

Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации

Хостинг от uCoz

Автор проекта: Борисов Сергей

e-mail: save-x@yandex.ru

Связь с администрацией сайта