Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.14;
Скачать: CL | DM;

Вниз

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

 
Артем ©   (2004-02-29 19:42) [0]

Мастера, только Вы способны помочь!Вопрос следующий. На форме есть edit и webbrowser
с загруженной страницей. Как лучше реализовать
механизм поиска на странице текста, введнного в поле edit?
Надеюсь, что кто-нибудь обязательно поможет.
Заранее ОГРОМНОЕ спасибо!


 
nikkie ©   (2004-02-29 21:11) [1]

TEmbeddedWB.Find
http://www.euromind.com/iedelphi


 
Артем ©   (2004-02-29 21:57) [2]

Спасибо, nikkie. Будем разбираться.


 
Артем ©   (2004-02-29 22:28) [3]

Да, бесспорно ценные исходники! Но... Сложновато будет, да и некогда сейчас вникать во внутреннюю структуру IE. Позже обязательно разберусь и, думаю, очень много нового для себя найду.
Но сейчас! Сейчас мне нужно более простое решение. Разве никак нельзя перехватить стандартный вызов поиска IE и вставить из edit-а текст?


 
nikkie ©   (2004-02-29 22:49) [4]

vaIn := Edit1.Text;
InvokeCmd(TRUE, HTMLID_FIND, 0, vaIn, vaOut);


 
Артем ©   (2004-02-29 23:12) [5]

Спасибо, nikkie!
А я тем временем вот что нашел:

procedure TForm1.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 :=$000000CE;
WebBrowser1.OleObject.Document.All.Item(i).ScrollIntoView(True);
end;
end;
end;


На мой взгляд - более простое решение, напролом, так сказать. Да, но зато во много раз можно сэкономить на размере.

Еще раз спасибо, nikkie!


 
nikkie ©   (2004-03-01 01:01) [6]

я, конечно, могу только догадываться, что ты хочешь сделать, но приведенный код
1. не всегда найдет нужный текст
2. выделит не найденный текст, а нечто иное
3. это даже не выделение, а изменение цвета

поиск без использования IOleCommandTarget.Exec сделать конечно можно, но не так. и выйдет сложнее...



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

Текущий архив: 2004.03.14;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.018 c
3-43310
Night Cold
2004-02-11 17:51
2004.03.14
Перемещение данных


1-43561
Tyo
2004-02-27 15:04
2004.03.14
---|Ветка была без названия|---


1-43471
aha
2004-02-29 15:26
2004.03.14
Работа с Chart , можно ли вычислить значение


14-43813
pasha_golub
2004-02-12 11:39
2004.03.14
Киевская встреча Мастаков aka KMP


1-43438
malkolinge
2004-03-01 13:07
2004.03.14
Указатель за витруальный метод предка.