如何判断系统中是否安装了word?(0分)

  • 主题发起人 主题发起人 mjl_119
  • 开始时间 开始时间
M

mjl_119

Unregistered / Unconfirmed
GUEST, unregistred user!
不知道哪位大侠能帮帮忙?
 
uses
comobj;
var
myword:variant;
button1.onclick(sender:tobject);
begin
try
myword:=createoleobject('word.application');
showmessage('安装了WORD');
except
showmessage('没有安装WORD');
end;
end;
 
检查系统注册表,看看有没有关于Microsofe Word的键值!!
看.doc文件的关联程序是不是Word!!
 
如果只判断有没有word,二楼的方法比较好
如果还要打开word,三楼的好
 
后退
顶部