![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 21.12.2009
Сообщений: 15
|
![]()
Помогите пожалуйста на работе сталкнулся с такой проблемой : мне на компьютер присылают по сетке кучу файлов *.doc. в определённую папку, которые я просматриваю и сортирую. А всвязи с аттестацией на предприятии в этой папке накопилось уже около 11500 файлов.И я написал програмку сортирующую эти файлы(саму программу и текст прикрепил).
Но у меня возникла проблема с пробелами в документах.Например я ищу в файлах слова "ПРИКАЗ №" или "ТЕХНИЧЕСКОЕ УСЛОВИЕ №",а там вместо одного пробела стоит два или три или вообще нет. Так вот у меня вопрос нельзя ли как нибудь исправить эту проблему с пробелами. Извеняюсь за столь подробный текст и заранее спасибо всем откликнувшимся. |
![]() |
![]() |
![]() |
#2 |
Форумчанин
Регистрация: 18.03.2009
Сообщений: 109
|
![]()
Здравствуйте. все можно, надо просто искать по словам, в ворде словами являеться любая последовательность символов не разделенных пробелами. вы можете использовтаь для поиска интерисуемых слов W.Selection.Words . Как я понимаю вам не нужен весь документ а нужен тока заголовок , вот и выделите необходимую часть и проверяете есть ли нужная последовательность. В разделе литература я выложил книгу "Программирование документов и приложений MS Office в Delphi", там много полезного.
Мозг человека обычно загружен лишь на 10% своей мощности; остальное резерв для опереционной системы. Если помог не пожалей "+", это лучшее спасибо
![]() |
![]() |
![]() |
![]() |
#3 |
Пользователь
Регистрация: 21.12.2009
Сообщений: 15
|
![]()
rockedit
вот именно по этой книге я писал эту программу Последний раз редактировалось rodionov_uv; 23.12.2009 в 00:40. |
![]() |
![]() |
![]() |
#4 |
Форумчанин
Регистрация: 18.03.2009
Сообщений: 109
|
![]()
Та там примера нет, там просто наптисано что есть коолекция слов суть в чем W.Selection.Words - сдесь содерожаться вес слова выделенного фрагмента, именно слова т.е. если вы выделили "11 22" то там будет 11 и 22, без пробелов. ну и потом если не ошибаюсь W.Selection.Words.Item()
Мозг человека обычно загружен лишь на 10% своей мощности; остальное резерв для опереционной системы. Если помог не пожалей "+", это лучшее спасибо
![]() |
![]() |
![]() |
![]() |
#5 |
Пользователь
Регистрация: 21.12.2009
Сообщений: 15
|
![]()
rockedit
Через W.Selection.Words прога вообще отказывалась работать.Выдавала ошибку и код был ого-го нашёл его в "королевстве дельфи",а этот хоть работает |
![]() |
![]() |
![]() |
#6 |
Форумчанин
Регистрация: 18.03.2009
Сообщений: 109
|
![]()
Можно впринцпипи ничего не выделять и испорльзовать весь документ. W.Documents.Words
Мозг человека обычно загружен лишь на 10% своей мощности; остальное резерв для опереционной системы. Если помог не пожалей "+", это лучшее спасибо
![]() |
![]() |
![]() |
![]() |
#7 |
Пользователь
Регистрация: 21.12.2009
Сообщений: 15
|
![]()
rockedit
выдаёт ошибку на W.Documents.Words при автоматическом поиске, а при выделении в документе строки вручную зараза работает. Последний раз редактировалось rodionov_uv; 23.12.2009 в 01:59. |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Работать в Word, не открывая документы (работа с закрытыми документами Word) | Георгиевич | Microsoft Office Word | 10 | 07.09.2009 11:19 |
Word Delphi | xtc_win64 | Общие вопросы Delphi | 9 | 31.07.2009 12:48 |
Delphi + word | ToLeG | Мультимедиа в Delphi | 2 | 09.07.2009 16:42 |
создание файла в папке Мои Документы (Delphi) | sonic007 | Помощь студентам | 1 | 27.05.2008 17:07 |
из delphi в word | *Devil* | Microsoft Office Word | 1 | 24.05.2007 07:55 |