Поиск по сайту загруженному в TWebbrouser

← →
Владимир (2004-10-26 16:18) [0]

Необходимо организовать поиск по сайту загруженному в TWebbrouser с возможностью прокрутки и выделения.
Если кто знает как это можно реализовать помогите.
Буду рад любой информации.

← →
Reindeer Moss Eater © (2004-10-26 16:25) [1]

Поиск по сайту организуется средствами сайта на самом сайте.
Независимо от того, загружен он в чей-то браузер или нет.

А веббраузер способен осуществить поиск исключительно в загруженном ресурсе, а не сайте

← →
Владимир (2004-11-06 13:26) [2]

Извините неправильно выразился. ПОиск в загруженой странице.

← →
Ihor Osov'yak © (2004-11-07 19:40) [3]

см. mshtml.pas

очень подробно работа с mshtml описана в msdn. Как ввод в тему - http://delphi.vitpc.com/mastering/tweb.htm

← →
Ш-К (2004-11-09 11:26) [4]

procedure TForm1.Button1Click(Sender: TObject);
var
Range: IHTMLTxtRange;
i: integer;
FindText: WideString;
begin
Range := IHTMLBodyElement(IHTMLDocument2(WB.Document).Body).createTextRange;
i := 0;
FindText := "s";
while (Range.findText(FindText, i, 0) = true) do
begin
Range.select;
Range.collapse(false);
Application.ProcessMessages;
sleep(1000);
inc(i);
end;
end;

Поиск по сайту загруженному в TWebbrouser Найти похожие ветки