【结贴】再问关于word的控制问题

lxh_78

通过前帖学习了在X3平台中将word文档中某字符替换成当前数据的方法，如果在word文档中插入复选框怎么控制呀？

shangxy

自己录制一个插入控件复选框的宏看看吧。

lxh_78

有没有例子呀，自己实在弄不明白

shangxy

没有插入复选框的例子

lxh_78

插入了一个复选框的宏，如下：
  ActiveDocument.FormFields("check1").CheckBox.Value = True
我的X3代码如下：
var
  StrFile : string ;

  FWord bject;
  FApp,FDocs :system.DispatchHelper ;
  lFormFields : system.DispatchHelper;  
begin
StrFile ：= 'c:\test.doc'
FWord := ComObj.CreateOleObject('Word.Application');
  FApp := system.DispatchHelper.Create(FWord);
  FApp.PropertyPut('Visible', [True]);

  FDocs := system.DispatchHelper.Create(FApp.PropertyGet('Documents',  []));
  FDocs.InvokeMethod('Open', [StrFile]);

  lFormFields := system.DispatchHelper.Create(FApp.PropertyGet('FormFields', []));
...........
end;
运行时lFormFields := system.DispatchHelper.Create(FApp.PropertyGet('FormFields', []));
总是报错，版主给看看什么原因？

shangxy

请贴全完整代码和错误内容。
还有：
  FDocs := system.DispatchHelper.Create(FApp.PropertyGet('Documents',  []));
不要使用这样的用法，
要把FApp.PropertyGet('Documents',  [])单独赋给一个Object变量，最后释放，否则word进程释放不掉。

lxh_78

搞定了，结吧