Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите с  WebBrowser ом [D7, WinXP]


Igor__ ©   (2002-11-17 06:14:00) 

Я уже задавал єтот вопрос, но никто не ответил.
Мкстера, помогите
1)как в WebBrowser выполнить поиск(Приблизительно так, как в дисках AlexSoft)
2)как роботать с буфером обмена.


mrcat   (2002-11-26 18:39:00) [1]

>>1)как в WebBrowser выполнить поиск(Приблизительно так, как в дисках AlexSoft)
подробнее - о чем речь?
>>2)как роботать с буфером обмена.
юзать TClipboard


int64   (2002-11-26 18:37:00) [2]

Если трудно руками парсерить, загружай текст файла в браузер и оттуда бери фрматированный текст.

Т.е. делаешь следующее:

1. Находим файл по слову.
2. Получаем в виде стринга его отображаемый текст. Вот пример:
procedure TForm1.Button1Click(Sender: TObject);
var IE: IWebBrowser2;
v: OleVariant;
begin
IE := CreateOleObject("InternetExplorer.Application") as IWebBrowser2;
IE.Navigate("c:\temp\1.htm", v, v, v, v);
while IE.ReadyState<>READYSTATE_COMPLETE do
Application.ProcessMessages;
Memo1.Text:= Variant(IE.Document).body.innerText;
IE.Quit;
end;

//С фреймами работать не будет!
3. И ищем ещё раз в стринге (pos).

Разумеется, не надо для каждого файла делать CreateOleObject, а потом Quit. Достаточно сделать один раз для всей процедуры поиска.

А вообще, если документы твои и простые, то лучше поищи готовые парсеры - для производительности. И под них подгоняй "стерильность" документа. Только я ниодного не видел парсера нормального, даже из платных.


Igor__   (2002-11-26 16:18:00) [3]

?


Igor__   (2002-11-24 05:48:00) [4]

А есть какие то методы поиска в одном документе без анализа внутреностей???


Igor__   (2002-11-23 18:09:00) [5]

В этом и проблема: какпереварить документ?


int64   (2002-11-21 19:16:00) [6]

FindFirstFile
FindNextFile

Только искомое слово может содержаться в атрибутах тегов или комментариях. Поэтому надо ещё переваривать сам документ.


Igor__   (2002-11-21 15:04:00) [7]

To int64:
Есть сто страничек,а в них текст. Нужно сделать общий поиск по этим страницам. Т.е. на форме стоит Edit и Button, при нажатии на кнопку искать сначала на первой странице, если нашли то загрузить страницу, иначе искать на следуещей ...


int64   (2002-11-20 21:20:00) [8]

1. А причём здесь браузер, если надо выполнять поиск нужного файла по содержащимся словам? Опиши подробнее.
2.
initialization
OleInitialize(nil);

finalization
OleUninitialize;


Igor__   (2002-11-20 19:37:00) [9]

Извиняюсь меня долго здесь небыло.
1. Есть штук сто HTML нужно выполнять в них поиск по слову.
2. Копировать в буфер включая OLE. Я вот выкопал:
WebBrowser1.ExecWB(OLECMDID_COPY, OLECMDEXECOPT_DODEFAULT);
но пишет Exception:"Попытка отменить конечное место
переноса, которое не было зарегистрировано."


int64   (2002-11-17 13:15:00) [10]

1. Для начала, вышли пару дисков AlexSoft, что б хоть знать: о чём речь.
2. Что конкретно надо?


Наверх

Титульная страница Поиск, карта сайта Написать письмо