TWebBrowser, выделение текста в нужном месте.

← →
Wood (2008-09-19 10:07) [0]

Добрый день(ночь).
Уважаемые мастера, помогите, кто чем может...))
Как программно выделить часть текста в TWebBrowser методом select?

Имеется загруженный в TWebBrowser текст HTML (документ) ч/з "about:". В документе есть повторяющейся текст. Допустим, список этих повторяющихся строк текста загружен в листбокс. Чтобы находить его в дальнейшем по клику в листбоксе, в документ прописываются теги идентификаторы <P ID=[ID_текста]>.
При клике:
IHTMLElement: if AnsiSameText(Tag.id, Id) - получаем элемент (IDispatch) scrollIntoView() - прокручиваем страницу к нему.
Все чудесно работает. Но хотелось бы, кроме прочего, выделить текст (select) на страничке (innerText этого элемента).
Создаю IHTMLTxtRange, его метод FindText() находит первое вхождение...
Вот здесь я застрял капитально:( На ночь глядя очередной раз перечитал MSDN и понял, что ничего не понял, т.е. не нашел что, кому и как нужно передать, образно говоря, индекс, чтобы выделение (select) innerText элемента произошло, там где его нашел scrollIntoView().
При поиске элемента for I := 0 to Pred(Tags.length) получаем некий индекс IHTMLElementCollection (I). Можно ли его как-нибудь использовать для поиска и выделения текста в нужном месте?
Спасибо.

← →
Wood (2008-09-19 11:25) [1]

А ларчик просто открывался))

IHTMLTxtRange.moveToElementText(IHTMLElement)

Вопрос снят.

TWebBrowser, выделение текста в нужном месте. Найти похожие ветки