![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TWebBrowser
odyssey © (2003-07-10 09:56:00)
Я использую WebBrowser как получить в Memo код HTML подгружаемой страницы? Прошу ответить по существу....напыщинных умников типа "иди почитай Help" прошу не беспокоиться, не отвлекайтесь...Спасибо.
Ihor Osov'yak (2003-07-10 11:22:00) [1]Что такое "подгружаемая страница"? Если то, что все понимают под термином "загруженная страница", то
function SaveToString(const WebBrowser: IWebBrowser2): string;
var
S: TStringStream;
begin
S := TStringStream.Create("");
try
(WebBrowser.Document as IPersistStreamInit).Save(TStreamAdapter.Create(S), True);
Result := S.DataString;
finally
( WebBrowswer.DefaultInterface)
Что такое "подгружаемая страница"? Если то, что все понимают под термином "загруженная страница", то
function SaveToString(const WebBrowser: IWebBrowser2): string;
var
S: TStringStream;
begin
S := TStringStream.Create("");
try
(WebBrowser.Document as IPersistStreamInit).Save(TStreamAdapter.Create(S), True);
Result := S.DataString;
finally
S.Free;
end;
end;
Memo1.Text := SaveToString(WebBrowswer.DefaultInterface);
Ps IPersistStreamInit - ActiveX, TStreamAdapter - classes;
Зы2. Это далеко не единственный способ. Но поскольку я напыщеный и немного умник, то остальные не скажу...
Palladin (2003-07-10 10:47:00) [2]типа "ты не умничай, ты пальцем покажи"...
http://www.yandex.ru/yandsearch?rpt=rad&text=Memo+%EA%EE%E4+HTML+%EF%EE%E4%E3%F0%F3%E6%E0%E5%EC%EE%E9+%F1%F2%F0%E0%ED%E8%F6%FB+TWebBrowser