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]

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

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