![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Поиск по сайту загруженному в TWebbrouser [D5]
Владимир © (2004-10-26 16:18:00)Необходимо организовать поиск по сайту загруженному в TWebbrouser с возможностью прокрутки и выделения.
Если кто знает как это можно реализовать помогите.
Буду рад любой информации.
Ш-К (2004-11-09 11:26:00) [1]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;
Ihor Osov'yak (2004-11-07 19:40:00) [2]см. mshtml.pas
очень подробно работа с mshtml описана в msdn. Как ввод в тему - http://delphi.vitpc.com/mastering/tweb.htm
Владимир (2004-11-06 13:26:00) [3]Извините неправильно выразился. ПОиск в загруженой странице.
Reindeer Moss Eater (2004-10-26 16:25:00) [4]Поиск по сайтуорганизуется средствами сайтана самом сайте.
Независимо от того, загружен он в чей-то браузер или нет.
А веббраузер способен осуществить поиск исключительно в загруженном ресурсе, а не сайте