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

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

поиск в 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


Наверх

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