Поиск по странице в WebBrowser

[Port 111]

Вот еще вопросик касаемый WebBrowser.
Как осуществить поиск слова по странице которая загружена в webbrowser..
Я так понимаю мне нужен html код странице, и в нем искать слово.
Воспользовался поиском по сайту, так и не нашел ничего внятного...
Спасибо за терпение...

[mihali4]

Воспользовался поиском по сайту, так и не нашел ничего внятного...

А спуститься в самый низ этой страницы и посмотреть "Похожие темы"?
Или это тоже "невнятно"?

[Port 111]

Сообщение от mihali4

А спуститься в самый низ этой страницы и посмотреть "Похожие темы"?
Или это тоже "невнятно"?

Я там поискал, и для себя ничего понятного не нашел....
Проблемку решил. ВОспользовался вот таким кодом:

{....} 

  private 
    procedure SearchAndHighlightText(aText: string); 
     
{....} 

procedure TForm1.SearchAndHighlightText(aText: string); 
var 
  i: Integer; 
begin 
  for i := 0 to WebBrowser1.OleObject.Document.All.Length - 1 do 
  begin 
    if Pos(aText, WebBrowser1.OleObject.Document.All.Item(i).InnerText) <> 0 then 
    begin 
      WebBrowser1.OleObject.Document.All.Item(i).Style.Color := '#FFFF00'; 
      WebBrowser1.OleObject.Document.All.Item(i).ScrollIntoView(True); 
    end; 
  end; 
end; 

procedure TForm1.Button1Click(Sender: TObject); 
begin 
  SearchAndHighlightText('some text...'); 
end;

Всем спасибо....