![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
поиск в WORD
zdm77 © (2008-07-03 10:03:00)Добрый день. Необходимо организовать поиск по WORD документу, при нахождении ключевого слова пропустить две строки и вносить данные в БД. Ключевое слово-заголовок таблицы, повторяющейся на каждом листе. В связи с этим три вопроса.
1. Как искать до конца документа? ..что сделал приведу ниже, не могу понять как организовать цикл до конца документа.
2. Как пропустить две строки (чтото вроде ReadLN)
3. Как выделить от когото символа n кол-во знаков (чтото вроде функции "copy")
var
wd:OleVariant;
begin
wd:=CreateOleObject('Word.Basic');
wd.FileOpen('путь к файлу');
wd.EditFind('Серия');
//для проверки нахождения
if wd.EditFindFound then showmessage(''); //вот тут как организовать поиска до конца документа? это к первому вопросу
end;
Johnmen (2008-07-03 11:58:00) [1]http://sql.ru/forum/actualthread.aspx?tid=572767
saNat (2008-07-03 11:49:00) [2]такого делать не приходилось, но всегда делал макрос и потом смотрел его текст. обычно хватало...
zdm77 (2008-07-03 10:36:00) [3]или хотябы дайте ссылки где грамотно расписаны методы работы с OLE касаемо WORD.
zdm77 (2008-07-03 10:05:00) [4]первый вопрос снимаю, пока писал догнал сам :) извините. Ответьте пожалуйста на 2 и 3