Текущий архив: 2009.04.05;
Скачать: CL | DM;

Вниз

TWebBrowser получить текст без тегов   Найти похожие ветки 

← →
stas ©   (2009-02-01 18:32) [0]

Делаю так:
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;
В одном проекте сохраняет без тегов, в другом с тегами ))
Подскажите пожалуйста в чем может быть проблема.

---

← →
stas ©   (2009-02-01 19:07) [1]

Проблема оказалась в расширении фалйла O_0

---

Страницы: 1 вся ветка

Текущий архив: 2009.04.05;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.017 c