用Delphi开发ActiveForm的一些问题(200分)

  • 主题发起人 主题发起人 csgcsw
  • 开始时间 开始时间
问题虽然没解决,分还是要给的!
 
真想要分,但来晚了。可是问题总是要解决的。

在调试程序时出错误,‘操作无法使用’。

这是在

function ActiveWord:Variant;
begin
try
Result:=Getactiveoleobject('word.application');
except
try
Result:=createoleobject('word.application');
except
messagedlg('word may not be installed', mterror, [mbok], 0);
abort;
end;
end;
end;

时出现,其实这个问题不是什么问题,当没有找到Word时,程序转而去执行except
这时程序就以为是出错了,所以给出了告警。这时可以继续执行程序。

而在退出调试状态后,执行就正常了。这个问题还可以用改变DEBUG设置,让Delphi不出现except告警来解决。
 
后退
顶部