获得Word文件的页数的问题，用的是CB。(200分)

TWordDocument WD;
WD = new TWordDocument(NULL);
......
和WordApplication相连，然后
WD->Range((OleVariant)0, (OleVariant)100)->get_Information(wdNumberOfPagesInDocument);
为什么告诉我Range的参数有问题，可是它确实只有两个啊，CB说有三个。

http://www.delphibbs.com/delphibbs/dispq.asp?lid=458661

CB和Delphi有一点区别
delphi可以直接写，比方：WD.range->get_Information不一定对
但CB的Range是Range(tagVARIANT *Start, tagVARIANT *End)
这两个值给什么？是什么意思？
我给了两个值，但运行的时候告诉我
this->Range(Start, End, (Word_2k::Range**)&prop)
然后就error了。

Delphi,自己改一下就行了。
procedure TForm1.Button1Click(Sender: TObject);
var
App,Doc,Shtlevariant;
begin
try
App:=CreateOleObject('Word.application');
do
c:=App.documents.open(FileName:='c:/Mydo
cuments/综合技巧_2.doc');
showmessage(inttostr(Doc.BuiltInDocumentProperties[13]));
except
App.quit;
end;
end;