delphi操作word2007.docVIP

delphi操作word 2007-07-06 18:51:56 分类： delphi操作word一、Delphi程序启动Word采用CreateOleObjects的方法来启动Word，调用VBA代码，具体实现过程为：首先使用GetActiveOleObject(Word.Application)判断当前内存中是否存在Word程序，如果存在，则直接连接，如果没有Word程序，则使用CreateOleObject(Word.Application)启动Word 二、Delphi程序新建Word文稿格式：WordDocuments.Add(Template,NewTemplate,DocumentType,Visible)Template： 使用模板的名称，NewTemplate： 新建文档的类型，True表示为模板，False表示为文档DocumentType： 文档类型，默认为空白文档Visible： 打捞的窗口是否可见 举例：Doc_Handle:=Word_Ole.Documents.Add(Template:=C:\Temlate.dot,NewTemplate:=False); 三、Delphi程序打开Word文稿格式：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); 四、Delphi程序保存Word文稿格式：WordDocuments.SaveAs(FileName, FileFormat, LockComments, Password,AddToRecentFiles, WritePassword, ReadOnlyRecommended,EmbedTrueTypeFonts, SaveNativePictureFormat, SaveFormsData,SaveAsAOCELetter) FileName： 文件名。默认为当前文件夹和文件名。FileFormat 文档保存的格式。LockComments 如果为 True，则此文档只允许进行批注。Password 打开文档时的口令。AddToRecentFiles 如果为True，则将文档添至文件菜单中最近使用的文档列表中。WritePassword 保存对文档的修改所需的口令。ReadOnlyRecommended 如果为 True，在每次打开文档时，Word 将建议用户采用只读方式。EmbedTrueTypeFonts 如果为 True，则将文档与 TrueType 字体一起保存。SaveNativePictureFormat 如果为 True，则从其他系统平台（例如 Macintosh）导入的图形仅保存其 Windows 版本。SaveFormsData 如果为 True，则将窗体中用户输入的数据存为一条数据记录。SaveAsAOCELetter 如果文档包含一个附加，当此属性值为 True 时，将文档存为一篇 AOCE 信笺（同时保存邮件）。 举例：Word_Ole.Documents.SaveAs(FileName:=Doc_File,FileFormat=wdFormatDocument,AddToRecentFiles=False); 五、从数据库读取文件到本地硬盘和从本地硬盘读取文件到数据库 在数据库上使用Image二进制字段保存，