在Delphi中设置Word文档页面的大小(100分)

我正在编写一个需要处理Word文档的程序，在程序中需要实现重新设置页面的大小。我是使用Servers控件组中的TWordApplication和TWordDocument来实现的。具体方法如下：
......
WordApplication: TWordApplication;
WordDocument: TWordDocument;
......
WordApplication.Connect;
wordapplication.Visible := false;
WordApplication.Documents.Open(......);
ItemIndex := 1;
WordDocument.ConnectTo(WordApplication.Documents.Item(ItemIndex));
(以上执行都正确)
WordDocument.PageSetup.TopMargin := 0; (执行到此行时出错，提示是：“服务器出现意外情况”)
WordDocument.PageSetup.BottomMargin := 0;
WordDocument.PageSetup.LeftMargin := 0;
WordDocument.PageSetup.RightMargin := 0;
WordDocument.PageSetup.PageWidth := Width;
WordDocument.PageSetup.PageHeight := Height;
......
敬请各位高手指点迷津，在下谢谢了。
我使用的系统是XP，Office是2003，以及Delphi7.0

用VBA吧，用VBA没问题的！

delphi+word不稳定

要设多少？给出来。。我帮你

刚才试了一下，没有问题。
可能word调用次数太多了（wordapplication.Visible := false;）

多人接受答案了。