原创力文档- 1、本文档共6页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 5、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 6、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
?
?
基于ＤＥＬＰＨＩ的ＷＯＲＤ文档处理技术研究
?
?
胡小红游新娥
摘要：总结了四种Delphi访问和控制Word的方法，简单分析了Word的对象层次模型，重点阐述了利用Delphi中Server组件操纵Word的实现方法．并就实现Delphi对Word文档直接操作进行了探讨和分析。
关键词：DelphiWord组件层次模型
TP317.2B：1002-2422(2007)03-0060-02
1Delphi访问和控制Word的方法
1．1通过导入类型库和直接访问COM接口控制Word
由于引入了类型库，对自动化对象的控制比较灵活，并且在设计期间可以对代码进行类型检查，因此性能较好，但实现起来比较复杂，现在已经很少使用。
1．2使用TOleContainer组件调用Word
在Delphi中，使用TOleContainer的Run方法就可以直接启动Word文档，但此方法不能通过Delphi控制Word文档，不能灵活操作Word。
1．3使用CreateOleObieet方式控制Word
是使用CreateOleObject方式创建并调用Word文件，难点在于没有Delphi代码提示．需要自己编写所有对异常事件的处理过程，可能编写时探索性知识比较多。
1．4使用Delphi提供的Servers组件控制Word
Delphi组件面板上有一组Servers组件，能非常方便地访问和控制Word，在编程时能够实现友好的代码提示。本文使用此方法来介绍在Delphi开发环境中如何实现对Word文档的处理。
2Word的对象模型
Word2000的层次结构比较复杂，包括100多个对象，各对象处于一个完整的体系结构且相互联系，整个Word2000对象可以看成一个层次结构，每一个对象处于一个特定的对象层次中，其中Application对象处于最高层，除Application外的其它对象都是高层次的对象派生，派生的对象处于原对象的下层，常用的Word2000对象。
(1)Application对象：位于Word对象的最高层，代表整个Word应用程序。
(2)Document对象：代表一篇Word文档。
(3)Selection对象：代表窗口中所选定的内容。
(4)Range对象：由Document对象派生，代表Word文档中的某个范围。
(5)Font对象：由Selection对象派生，包含各种字体属性。
(6)ParagraphFormat对象：由Selection对象派生，代表所有段落格式。
3通过Servers组件操作Word
首先通过WordApliation组件实现Delphi与Word的无缝联接，然后用OLE技术借助VBA来控制Word对象，其过程主要包括联结Word服务器、创建或打开文稿、编辑文档、格式设置、保存与打印设置、断开Word服务器等步骤。
从Servers组件页中拖一个TWordApplication组件、一个TWordDocument组件放到窗体上，分别命名为WordApp、WordDoc。
(1)联结Word服务器
WordApp.AutoConnect：=True；
WordApp.ConneetKind：=ckRunningorNew；
WordApp.Connect；
WordApp.Visible：=true；
(2)文稿的创建与打开
与Word2000建立联系后即可以新建或打开Word文档，其方法如下：
WordApp.Documents.Add(Template，NewTemplate，DocumentType，visi-ocLentTypeVisi—ble)；
若打开已有的Word文档，可使用：
WordApp.Documents.Open(FileName,ConfirmConversions,ReadOnly，PassWordDocument，PasswordTemplate，Revent，WfitePasswordDecu-ment,WritePassWordTemplate，Format，Encoding,Visible)
WordDoe.ConnectTo(WontApp.Documents.Item(itemlndex))：
(3)文档的编辑：
(4)表格的处理
1、插入表格
可以使用下面的代码插入一个4行5列的规则表，并可根据内容来调整表格宽度：
VarDefaultTableBehavior，AutoFitBehavior：OleVariant；
DefaultTableBehavior：=wdWord9TableBehavior；
AutoFitBehavlor：=wdAutoFitContent；
WordDoc.Tables.Add(WordApp.Selec
文档评论（0）