delphi控制 word的几种方法--转 - westsoft?

delphi控制 word的几种方法--转

对几种方法的难易程度的判别

a.通过Delphi的控件TOleContainer 将Word嵌入

这是最简单的Ole嵌入,能够直接将Word文档调用,只需要使用ToleContainer.Run就可以

将Word文

档直接启动。且这样启动的Word文档与Delphi程序是一个整体(从界面上看),但是它存

在不可克

服的缺点,即不能通过Delphi控制Word文档,也就不能实现将灵活操纵Word的目的。

b.使用Delphi提供的Servers控件调用Word,使用Word的属性

使用Delphi的Servers控件来操纵Word,在编程时Delphi能够实现代码提示,总体上看能

够较好的实

现Delphi对Word的控制,但是还有一些Word的功能不能在Delphi中调用(比如自己编写的

VBA宏代码)。

且实现功能时本来在VBA代码中可选则参数在Delphi调用的时候必须添加,否则,连编译

都不能通过。

本方式启动的Word与Delphi程序分属两个窗体。

此办法仅能作为一个参考。

c.通过真正的Com技术,将Office软件目录中文件MSWORD9.OLB中的类库全部导入Delphi中

利用Com技术编程

利用真正的Com技术,将MsWord9.OLD文件类库导入,然后利用Com技术进行使用。

整体上类似使用Delphi的Servers控件,稍微比Servers控件麻烦,优缺点与Servers控件

相同。

d.使用CreateOleObject将启动Word,然后以Ole方式对Word进行控制。

本办法是使用以CreateOleObjects方式调用Word,实际上还是Ole,但是这种方式能够真

正做到完全

控制Word文件,能够使用Word的所有属性,包括自己编写的VBA宏代码。

与Servers控件和com技术相比,本方法能够真正地使用Word的各种属性,和在VBA中编写

自己的代码

基本一样,可以缺省的代码也不需要使用。

本方式启动的Word与Delphi程序分属两个窗体。

缺点是使用本方法没有Delphi代码提示,所有异常处理均需要自己编写,可能编写时探索

性知识比较多。

[b]五、Word命令宏的详细描述[/b]

Word本身的命令函数包含很多,但是无论是word联机帮助还是MSDN帮助,都没有这方面的

介绍,因此只能

凭自己的实验取探索,初步探测的函数如下:

宏名 解释 注释

FileNew 新建

FileNewDefault 新建空白文档

FileSaveAs 另存为

FileOpen 打开

FileClose 关闭

FilePrint 打印

FilePrintPreview 打印预览

ToolsCustomize 工具栏里面的自定义

ToolsOptions 工具选项

ToolsRevisions 突出显示修订

ToolsReviewRevisions 接受或拒绝修订

ToolsRevisionMarksAccept 接受修订

ToolsRevisionMarksReject 拒绝修订

ToolsRevisionMarksToggle 修订

ToolsMacro 宏

ToolsRecordMacroToggle 录制新宏

ViewSecurity 安全性

ViewVBCode 查看VB编辑器环境

FileTemplates 模板和可加载项

ToolsProtectUnprotectDocument 解除对文档的保护

InsertHyperlink 插入超级链接

EditHyperlink 编辑超级链接

DeleteHyperlink 删除超级链接

EditLinks 查看、删除链接

EditPasteAsHyperlink 粘贴超级链接

FormatStyle 样式

EditBookMark 书签

[b]一、Delphi程序启动Word[/b]

采用CreateOleObjects的方法来启动Word,调用VBA代码,具体实现过程为:

首先使用GetActiveOleObject(\'Word.Application\')判断当前内存中是否存在Word程序,如果存在, 则直接连接,如果没有Word程序,则使用CreateOleObject(\'Word.Application\')启动Word

[b]二、Delphi程序新建Word文稿[/b]

格式:WordDocuments.Add(Template,NewTemplate,DocumentType,Visible)

Template: 使用模板的名称,

NewTemplate: 新建文档的类型,True表示为模板,False表示为文档

DocumentType: 文档类型,默认为空白文档

Visible: 打捞的窗口是否可见

举例:Doc_Handle:=Word_Ole.Documents.Add

(Template:=\'C:\Temlate.dot\',NewTemplate:=False);

[b]三、Delphi程序打开Word文稿[/b]

格式:WordDocuments.Open

(FileName,ConfirmConversions,ReadOnly,PassWordDocument,

PasswordTemplate,Revent,WritePasswordDocument,WritePassWordTemplate,Format,Encoding,

Visible)

FileName: 文档名(包含路径)

Confirmconversions: 是否显示文件转换对话框

ReadOnly: 是否以只读方式打开文档

AddToRecentFiles: 是否将文件添加到"文件"菜单底部的最近使用文件列表中

PassWordDocument: 打开此文档时所需要的密码

PasswordTemplate: 打开此模板时所需要的密码

Revert: 如果文档已经,是否重新打开文档

WritePasswordDocument: 保存对文档更改时所需要的密码

WritePasswordTemplate: 保存对模板进行更改时所需要的密码

Format: 打开文档时所需使用的文件转换器

Encoding: 所使用的文档代码页

Visible: 打开文档的窗口是否可见

举例:

Doc_Handle:=Word_Ole.Documents.open(FileName:=Doc_File,ReadOnly:=False,

AddToRecentFiles:=False);

[b]四、Delphi程序保存Word文稿[/b]

格式:WordDocuments.SaveAs(FileName, FileFormat, LockComments, Password, AddToRecentFiles, WritePassword, ReadOnlyRecommended, EmbedTrueTypeFonts,

SaveNativePictureFormat, SaveFormsData,

SaveAsAOCELetter)

FileName: 文件名。默认为当前文件夹和文件名。

FileFormat 文档保存的格式。

LockComments 如果为 True,则此文档只允许进行批注。

Password 打开文档时的口令。

AddToRecentFiles 如果为True,则将文档添至"文件"菜单中最近使用的文档列表中

posted on 2018-04-27 22:02 westsoft 阅读(448) 评论(0) 编辑收藏举报