在Delphi中使用CreateOleObject方法对WORD文件进行操作

最新推荐文章于 2020-12-24 01:52:02 发布

windlazio

最新推荐文章于 2020-12-24 01:52:02 发布

阅读量3.2k

点赞数

分类专栏： Delphi 文章标签： delphi button 文档 office vba exception

本文链接：https://blog.csdn.net/windlazio/article/details/337071

版权

本文档介绍了如何在Delphi应用程序中利用CreateOleObject方法与Word的VBA接口进行交互，实现对Word文档的操作。通过一个简单的示例，展示了如何将文本从Edit控件写入Word文档并自动保存。该方法适用于需要在后台处理Word文档的场景。

摘要由CSDN通过智能技术生成

使用CreateOleObject方法对WORD文档操作具有先天所具备的优势，与delphi所提供的那些控件方式的访问相比，CreateOleObject方法距离WORD核心的操作“更近”，因为它直接使用OFFICE所提供的VBA语言对WORD文档的操作进行编程。

以下是我在本机上所做的实验，机器软件配置如下：

Windows XP+delphi7.0+OFFICE 2003

这个程序很简单，在页面上放置了一个edit和一个button,每单击一次按钮，就会自动把edit中的内容添加在后台中的word文档中，程序关闭时文件自动保存在当前程序的主目录中。

unit main;

interface

//如果要使用CreateOleObject的办法对WORD文档进行操作，应该在uses
//语句中加入Comobj声明和WordXP声明
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Comobj, WordXP, Dialogs, StdCtrls;

type
TForm1 = class(TForm)
    Button1: TButton;
    Edit1: TEdit;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
//    procedure Button2Click(Sender: TObject);
private
    { Private declarations }<