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

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

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


Наверх

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