此代码可以实现以下功能 使用wordappalication 组件，代码如下 启动Word时用如下代码： begin try Wordapplication.C...
于 2022-04-26 发布
文件大小:153.11 kB
0 229
下载积分: 2
下载次数: 1
代码说明：
此代码可以实现以下功能 使用wordappalication 组件，代码如下 启动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-this code can be achieved using the following functions wordappalication components, the following code at the start Word with the following code : begin try Wordapplication.Connect except MessageDlg ( "Word may not be installed", mtError, [mbOk], 0) Abort end Wordapplication.Visible : = True WordApplication.Caption : = "Delphi automation" end
下载说明：请别用迅雷下载，失败请重下，重下不扣分！
发表评论
