![]() |
Модераторы: MetalFan |
![]() ![]() ![]() |
|
EDuard |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 331 Регистрация: 1.8.2005 Где: Синее нигде Репутация: нет Всего: 7 |
Привет.
Как в word сосчитать количество абзацев с текстом '', т.е. пустых абзацев. через дельфи естественно. ![]() -------------------- |
|||
|
||||
EDuard |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 331 Регистрация: 1.8.2005 Где: Синее нигде Репутация: нет Всего: 7 |
Как вообще определить каков текст абзаца и какие элементы в него входят (рисунки, формулы, таблицы).
-------------------- |
|||
|
||||
Albinos_x |
|
|||
![]() Evil Skynet ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 3288 Регистрация: 28.5.2004 Где: X-6120400 Y-1 4624650 Репутация: 15 Всего: 108 |
попробуй так:
не знаю не проверял... по экспериментируй с WordApplication1.ActiveDocument.Paragraphs.... WordApplication1.ActiveDocument.Paragraphs.Item(i).... WordApplication1.ActiveDocument.Paragraphs.Item(i).SelectNumber и т.д.... -------------------- "Кто владеет информацией, тот владеет миром" Уинстон Черчилль |
|||
|
||||
EDuard |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 331 Регистрация: 1.8.2005 Где: Синее нигде Репутация: нет Всего: 7 |
Albinos_x, все перепробовал, но так ничего не придумал. всегда 0 показывает.
-------------------- |
|||
|
||||
Albinos_x |
|
||||||
![]() Evil Skynet ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 3288 Регистрация: 28.5.2004 Где: X-6120400 Y-1 4624650 Репутация: 15 Всего: 108 |
0 чего : WordApplication1.ActiveDocument.Paragraphs.Count; ??? попробуй так:
По идее работать должно, по крайней мере у меня возвращяет указанный мной абзац командой
и
у меня тоже работает... Это сообщение отредактировал(а) Albinos_x - 17.2.2006, 17:37 -------------------- "Кто владеет информацией, тот владеет миром" Уинстон Черчилль |
||||||
|
|||||||
EDuard |
|
||||||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 331 Регистрация: 1.8.2005 Где: Синее нигде Репутация: нет Всего: 7 |
Albinos_x, нет
всегда правильно считает. 0 показывал когда проверял текст так:
По твоему примеру показывает 26 вместо 12. Почему
означает пустую строку? Добавлено @ 18:53 Пардон, если документ пуст, то одну пустую строку все таки показывает, а вот если там текст с рисунками и формулами то похоже ошибается. -------------------- |
||||||
|
|||||||
Albinos_x |
|
|||
![]() Evil Skynet ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 3288 Регистрация: 28.5.2004 Где: X-6120400 Y-1 4624650 Репутация: 15 Всего: 108 |
в строке имеются непечатные символы обозначающие конец абзаца , поэтому когда документ пуст в нем как минимум есть один пустой параграф... 2 (#13#7) символа в таблице, 1 - в обычном тексте (#13), рисунок если вставлен в контейнер "создайте рисунок" идёт как 2 символа (#1#21) и опять же конец абзаца #13, т.е. в абзац можно разместить несколько рисунков или рисунок и текст, тогда полученная строка будет равна : "#1#21ТЕКСТ#13" таблица представляется в виде нескольких абзацев... приблизительно так: таблица 2х3 |__абзац__|__абзац__|__абзац__|абзац |__абзац__|__абзац__|__абзац__|абзац т.е. последовательность символов #13#7 обозначают конец ячейки, 2 подряд последовательности обозначают конец строки приблизительно, т.к. в одно ячейке может быть несколько абзацев.... сам ворд если не ошибаюсь абзацы не содержащие текст за обзац не принимает, поэтому если посмотреть статистику, цифры будут отличаться от полученных командой WordApplication1.ActiveDocument.Paragraphs.Count; колонтитулы за обзац не принимаются это точно... проверил... Рисунок не вставленный в контейнер "создайте рисунок" как абзац не идет... Это сообщение отредактировал(а) Albinos_x - 17.2.2006, 20:01 -------------------- "Кто владеет информацией, тот владеет миром" Уинстон Черчилль |
|||
|
||||
Albinos_x |
|
|||
![]() Evil Skynet ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 3288 Регистрация: 28.5.2004 Где: X-6120400 Y-1 4624650 Репутация: 15 Всего: 108 |
т.е. я немного ошибся....
нужно
-------------------- "Кто владеет информацией, тот владеет миром" Уинстон Черчилль |
|||
|
||||
![]() ![]() ![]() |
Правила форума "Delphi: ActiveX/СОМ/CORBA" | |
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам помогли, и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Rrader, Girder. |
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: ActiveX/СОМ/CORBA | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |