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,则将文档添至"文件"菜单中最近使用的文档列表中

原文地址:https://www.cnblogs.com/westsoft/p/8964779.html