Статистика документа MSWord.

← →
erig (2006-09-13 13:14) [0]

Здрасте!
Может кто нибудь подсказать как программно отобразить
статистику Вордовского документа?
Которая отображается через меню Файл->Свойство->Статистика
в Ворде.

← →
Dmitrij_K (2006-09-13 13:17) [1]

Range.ComputeStatistics(Param)

wdStatisticWords = $00000000;
wdStatisticLines = $00000001;
wdStatisticPages = $00000002;
wdStatisticCharacters = $00000003;
wdStatisticParagraphs = $00000004;
wdStatisticCharactersWithSpaces = $00000005;
wdStatisticFarEastCharacters = $00000006;

← →
erig (2006-09-13 13:30) [2]

Спасибо!
А можешь сказать еще как отображать
время создания, изменения и т.д.

← →
Dmitrij_K (2006-09-13 13:38) [3]

см. FindFirst()

← →
erig (2006-09-13 13:41) [4]

Дак там не все.

← →
Dmitrij_K (2006-09-13 13:47) [5]

TSearchRec.FindData.*

ftCreationTime

Specifies a FILETIME structure containing the time the file was created. FindFirstFile and FindNextFile report file times in Coordinated Universal Time (UTC) format. These functions set the FILETIME members to zero if the file system containing the file does not support this time member. You can use the FileTimeToLocalFileTime function to convert from UTC to local time, and then use the FileTimeToSystemTime function to convert the local time to a SYSTEMTIME structure containing individual members for the month, day, year, weekday, hour, minute, second, and millisecond.

ftLastAccessTime

Specifies a FILETIME structure containing the time that the file was last accessed. The time is in UTC format; the FILETIME members are zero if the file system does not support this time member.

ftLastWriteTime

Specifies a FILETIME structure containing the time that the file was last written to. The time is in UTC format; the FILETIME members are zero if the file system does not support this time member.

← →
Dmitrij_K (2006-09-13 13:48) [6]

Оно?

← →
erig (2006-09-13 13:59) [7]

:(
увы
я это уже перепробовал давно

← →
Dmitrij_K (2006-09-13 14:02) [8]

И чем не подошло?

← →
erig (2006-09-13 14:11) [9]

Например нет даты когда был напечатан документ.

← →
Dmitrij_K (2006-09-13 14:23) [10]

Какоето из свойств Document.* BuiltinDocumentProperties(index) или CustomDocumentProperties(index)

wdPropertyTimeLastPrinted = $0000000A;
wdPropertyTimeCreated = $0000000B;
wdPropertyTimeLastSaved = $0000000C;

в word200.pas написаны остальные свойства.

← →
erig (2006-09-13 14:53) [11]

спасибо! понял.

А не знаешь как сводку файла вывести?

← →
Dmitrij_K (2006-09-13 15:09) [12]

Что это?

← →
erig (2006-09-13 15:44) [13]

в свойстве файла есть закладка "сводка".

← →
Dmitrij_K (2006-09-13 15:57) [14]

это и есть сводка
BuiltinDocumentProperties и ComputeStatistics
параметры функций ищи в word2000.pas

← →
erig (2006-09-13 16:02) [15]

да я понял.
а если документ не вордоский?

← →
Dmitrij_K (2006-09-13 16:07) [16]

тогда хз

Статистика документа MSWord. Найти похожие ветки