Форум: "Основная";
Текущий архив: 2002.12.05;
Скачать: [xml.tar.bz2];
ВнизПомогите с WebBrowser ом Найти похожие ветки
← →
Igor__ (2002-11-17 06:14) [0]Я уже задавал єтот вопрос, но никто не ответил.
Мкстера, помогите
1)как в WebBrowser выполнить поиск(Приблизительно так, как в дисках AlexSoft)
2)как роботать с буфером обмена.
← →
int64 (2002-11-17 13:15) [1]1. Для начала, вышли пару дисков AlexSoft, что б хоть знать: о чём речь.
2. Что конкретно надо?
← →
Igor__ (2002-11-20 19:37) [2]Извиняюсь меня долго здесь небыло.
1. Есть штук сто HTML нужно выполнять в них поиск по слову.
2. Копировать в буфер включая OLE. Я вот выкопал:
WebBrowser1.ExecWB(OLECMDID_COPY, OLECMDEXECOPT_DODEFAULT);
но пишет Exception:"Попытка отменить конечное место
переноса, которое не было зарегистрировано."
← →
int64 (2002-11-20 21:20) [3]1. А причём здесь браузер, если надо выполнять поиск нужного файла по содержащимся словам? Опиши подробнее.
2.
initialization
OleInitialize(nil);
finalization
OleUninitialize;
← →
Igor__ (2002-11-21 15:04) [4]To int64:
Есть сто страничек,а в них текст. Нужно сделать общий поиск по этим страницам. Т.е. на форме стоит Edit и Button, при нажатии на кнопку искать сначала на первой странице, если нашли то загрузить страницу, иначе искать на следуещей ...
← →
int64 (2002-11-21 19:16) [5]FindFirstFile
FindNextFile
Только искомое слово может содержаться в атрибутах тегов или комментариях. Поэтому надо ещё переваривать сам документ.
← →
Igor__ (2002-11-23 18:09) [6]В этом и проблема: как переварить документ?
← →
Igor__ (2002-11-24 05:48) [7]А есть какие то методы поиска в одном документе без анализа внутреностей???
← →
Igor__ (2002-11-26 16:18) [8]?
← →
int64 (2002-11-26 18:37) [9]Если трудно руками парсерить, загружай текст файла в браузер и оттуда бери фрматированный текст.
Т.е. делаешь следующее:
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. Достаточно сделать один раз для всей процедуры поиска.
А вообще, если документы твои и простые, то лучше поищи готовые парсеры - для производительности. И под них подгоняй "стерильность" документа. Только я ниодного не видел парсера нормального, даже из платных.
← →
mrcat (2002-11-26 18:39) [10]>>1)как в WebBrowser выполнить поиск(Приблизительно так, как в дисках AlexSoft)
подробнее - о чем речь?
>>2)как роботать с буфером обмена.
юзать TClipboard
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.12.05;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.045 c