Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.08.03;
Скачать: [xml.tar.bz2];

Вниз

поиск в WORD   Найти похожие ветки 

 
zdm77   (2008-07-03 10:03) [0]

Добрый день. Необходимо организовать поиск по 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;


 
zdm77   (2008-07-03 10:05) [1]

первый вопрос снимаю, пока писал догнал сам :) извините. Ответьте пожалуйста на 2 и 3


 
zdm77   (2008-07-03 10:36) [2]

или хотябы дайте ссылки где грамотно расписаны методы работы с OLE касаемо WORD.


 
saNat ©   (2008-07-03 11:49) [3]

такого делать не приходилось, но всегда делал макрос и потом смотрел  его текст. обычно хватало...


 
Johnmen ©   (2008-07-03 11:58) [4]

http://sql.ru/forum/actualthread.aspx?tid=572767



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2008.08.03;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.01 c
15-1213509700
VingtQuatrieme
2008-06-15 10:01
2008.08.03
Мобильнику четверть века


2-1214849705
blazerad
2008-06-30 22:15
2008.08.03
Ввод пароля


2-1214987265
Ega23
2008-07-02 12:27
2008.08.03
Избавиться от warning а в потомке TStringList


15-1213620496
Поросенок Винни-Пух
2008-06-16 16:48
2008.08.03
Виста и юзер интерфейс


15-1213616042
Term
2008-06-16 15:34
2008.08.03
С# создание CAB файла для мобильного устройства





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский