Скачать: CL | DM;

WebBrowser поиск во фреймах   Найти похожие ветки 

← →
nsvi   (2004-04-18 03:07) [0]

Уважаемые!
Поиск в одиночном файле, загруженном в WebBrowser прекрасно работает. Но при загрузке фреймовой структуре происходит ошибка, так как в это время в компоненте не один файл. Как назначить фрейм для поиска?
Вот код для одиночного файла, взят на этом же форуме:
procedure TForm1.Button1Click(Sender: TObject);
var
Range: IHTMLTxtRange;
i: integer;
FindText: WideString;
begin
Range := HTMLBody(HTMLDocument(WebBrowser1.DefaultInterface.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;

Какие манипуляции бы я не проводил с кодом, ничего не получается! К сожалению, в английском я слабоват, поэтому на MSDN просьба не посылать.

---

← →
nsvi   (2004-04-18 13:34) [1]

Ну, может быть есть ссылка, где посмотреть исходник, как это делается?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.029 c