[kiman.ru]

Как узнать количество страниц в докумете *.doc и вывести его на печать?

[Aristarh Dark]

Запустить Ворд, посмотреть внизу, нажать CTRL+P Enter. Примерно так...

[kiman.ru]

Сообщение от Aristarh Dark

Запустить Ворд, посмотреть внизу, нажать CTRL+P Enter. Примерно так...

Шутник.

Мне это все необходимо сделать в своей программе. Как это можно сделать?

[NumLock]

Код:

var
  w: Variant;
  d: Variant;
begin
  w:=CreateOleObject('Word.Application');
  d:=w.Documents.Open(FileName:='c:\Downloads\cd.doc');
  Caption:=IntToStr(d.ComputeStatistics(2));
  d.Close;
end;