Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Поисковая система [D6, WinXP]

buka © (2005-02-21 07:48:00)
Уважаемые Мастера!
Я опять решаю задачу с которой когда-то начал любопытствовать о DELPHI. За это время познал многое, научился составлять базы, осуществлять по ним поиск (по введенному слову) но никак не могу понять как надо сделать следующее:
1.Допустим имеем достаточно много не связанных друг с другом файлов документов в формате HTML, DOC или RTF.
2. Надо вывести на экран название документа в котором имеется какое-то слово (или какое-то словосочетание), и, чтобы можно было от выведенного названия перейти по ссылке к документу,т.е. достаточно распространенная поисковая система.
===========
Кто может дать исходный код?
Если жаль кода - алгоритм, если и того и другого не хотите дать-подскажите что можете.
С уважением.

buka (2005-02-28 06:37:00) [1]
Всем спасибо! DigitMan- персонально. (Моя ремарка "не богато" была послана тогда, когда еще не было вашего сообщения.

programania (2005-02-21 19:34:00) [2]
В статьях этого форума была статья о локальном поиске.
Просто нужно заранее прочитать все тексты
и накопить список слов со ссылками на файлы.
Сложнее если текстов несколько GB,
а поиск нужно выполнять за 1-2 сек

Anatoly Podgoretsky (2005-02-21 16:41:00) [3]
Я опять решаю задачуи Кто может дать исходный код?это антонимы.

Digitman (2005-02-21 14:54:00) [4]

> buka (21.02.05 14:43) [3]

мне выпрыгнуть из штанов и написать за тебя программу ?

buka (2005-02-21 14:43:00) [5]
Не богато.

Digitman (2005-02-21 10:32:00) [6]
var
word: OleObject;
doc: OleObject;

..

word := CreateOleObject('Word.Application');
doc := word.Documents.Open('somedocument.ext');
doc.Selection.ClearFormatting;
doc.Selection.Find.Text = 'SomeSearchModel';
if doc.Selection.Find.Execute then
ShowMessage('Found')
else
ShowMessage('Not found')

Cosinus (2005-02-21 09:33:00) [7]
Алгоритмы посмотри на http://algolist.manual.ru
Переход по OnClick на, например, ListView.

Наверх

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