Delphi + Word = 数据库 + 公文处理

关键字：Delphi + Word    Delphi擅长做数据库类的MIS开发，但对于OA就有点力不从心了。不过随着Microsoft的COM技术逐渐成熟，现在普通Windows应用已经可以和Office 97无缝结合了，尤其是在Delphi 5中提供了一组Servers组件，更是简化了程序开发。 

    最近接触了一个用户的案例，用Delphi控制Word做一个合同管理程序。办公人员先根据业务需要，写好合同的文字，但在用户名称、产品名称等变化的位置填写指定的标记字符串，然后通过Delphi把数据库中的实际数据替换掉Word中的文字，最后让Word打印出合同。 

    Delphi自带了一个简单的Word例题，但功能太简单。通过查找VBA的说明，再对照Delphi的VCL，编写了如下代码，实现了基本的公文管理功能。 

启动Word时用如下代码： 
begin
try 
Wordapplication.Connect; 
except 
MessageDlg(’Word may not be installed’, mtError, [mbOk], 0); 
Abort; 
end; 
Wordapplication.Visible := True; 
WordApplication.Caption := ’Delphi automation’; 
end; 

原文转自：http://www.ltesting.net