![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как найти и выделить необходимый текст в WebBrowser? [D6, WinXP]
brestmarket © (2002-12-09 00:49:00)Как найти и выделить необходимый текст в WebBrowser?
У меня есть исходник подобного решения, но работает он неверно, т.е.
текст не находит и не перемещает к найденному контексту, выделяет абсолютно весь желтым цветом, работает
очень долго?:
procedure TfrmWebBrowser.SearchAndHighlightText(aText: string);
var
i: Integer;
begin
for i := 0 to WebBrowser1.OleObject.Document.All.Length - 1 do
begin
if Pos(aText, WebBrowser1.OleObject.Document.All.Item(i).InnerText) <> 0 then
begin
WebBrowser1.OleObject.Document.All.Item(i).Style.Color := "#FFFF00";
WebBrowser1.OleObject.Document.All.Item(i).ScrollIntoView(True);
end;
end;
end;
int64 (2002-12-09 16:18:00) [1]
> что необходимо импортировать, чтобы получить MSHTML_TLB
> ?
MSHTML.TLB
На все случаи.
brestmarket (2002-12-09 14:36:00) [2]Да абсолютно верно. int64 уже любезно отвечал на мой подобный вопрос. Я вообще ему очень и очень признателен за всю помощь на протяжении уже 4 месяцев, которую он мне оказывает. СПАСИБО БОЛЬШОЕ ему за его труды, однако я столкнулся с другими проблемами при решении моей задачи и хотел найти другие варианты и советы по моему вопросу.
Кстати, извините за дилетанство в этом вопросе: что необходимо импортировать, чтобы получить MSHTML_TLB ? и для себя этот вопрос наверно решу?
Troll (2002-12-09 13:52:00) [3]2int64
если бы ответили он бы не задавал второй раз, я прав brestmarket???
int64 (2002-12-09 13:25:00) [4]Ты уже задавал этот вопрос.