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

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

HTML код в TWebBrowser [D7, WinXP]


Lex_! ©   (2005-05-11 05:37:00) 

Искал но ничего не нашел, пара вопросов есть но оставлены без ответа.
Собственно сам вопрос: после загрузки страници в WebBrowser как получить HTML этой страници (со всеми тегами и прочим .


Yegorchic   (2005-08-13 18:05:00) [1]

Alecksey, у Вас какой-то код длинный...
Вот, покороче:

var
code: string;
begin
code:=Variant(WebBrowser1.Document).Body.OuterHTML;
end;


Alecksey   (2005-08-11 14:09:00) [2]


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;

А потом загружаеш в Мемо или куда хоч и читаеш код.


Наверх

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