Показать сообщение отдельно
  #5  
Старый 04.10.2008, 19:11
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Вообще, что такое интерфейс знаешь? в смысле интерфейс COM.
TWebBrowser есть обертка над IE. Он предоставляет COM-интерфейсы.
Тебе надо получить ссылку на интерфейс IWebBrowser2. Дальше, через его методы получаешь ссылку на DOM-модель загруженной страницы. И уже в ней ищешь что тебе надо.

Что-то типа того:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
  IWB : IWebBrowser2;
  IDoc : IHTMLDocument;
begin
  WebBrowser1.Navigate('www.yandex.ru');
  IWB := WebBrowser1.DefaultInterface;
  IDoc := IWB.Document As IHTMLDocument;
end;

А дальше у IDoc спрашиваешь про кишки страницы. Там все организованно в виде дерева, так что лезь в хелп.
Ответить с цитированием