谈Delphi 7控制Word 2000---使用模板

发表于:2008-05-19来源:作者:点击数: 标签:模板WORDDELPHIWordDelphi
关键字:谈Delphi 7控制Word 2000---使用模板1)在调用Documents集合的Add方法时,Template参数不再使用EmptyParam值,而是指定为“值班日志表.dot”,这样添加的文档将以“值班日志表.dot”为模板; 2)在插入相应的内容时,我使用的是一个比较笨的方法,但
关键字:谈Delphi 7控制Word 2000---使用模板1)在调用Documents集合的Add方法时,Template参数不再使用EmptyParam值,而是指定为“值班日志表.dot”,这样添加的文档将以“值班日志表.dot”为模板;

  2)在插入相应的内容时,我使用的是一个比较笨的方法,但是对于这个不规则的表格来说却可能是最有效的方法:计算出该表格中共有多个个段落,然后通过语句在所有应插入内容的段落中插入内容。也懒得自己数了,定义了一个整型变量paraCount,将其赋值为WordDoc.Paragraphs.Count,最后用一个消息框显示出来,得到该表格有38个段落,最后注释掉以上代码:)

  3)接下来的工作就是数数了,数到一个该插入内容的段落,就写一段代码插入相应的内容。比如:“值班时间”(表头)是第6段,接在后面该填入内容的空白段落就是第7段,于是写代码在第7段中插入实际内容。

  最后,想说的是一个在操作Word 2000时很有用的帮助文件,VBAWRD9.CHM,里面详细介绍了Word 2000中使用的VBA,里面介绍了很多有用的对象、属性和方法,还有一些VB代码作为示例,很容易可以想到对应的Delphi代码。这个文件在Office 2000的安装盘里面可以找到,具体路径忘记了,烦请搜索:)

  //单击“导出到Word文档”按钮事件处理程序

  procedure TfrmDetails.btnExportClick(Sender: TObject);

  var

原文转自:http://www.ltesting.net