win7操作word出错，没辙了。。。

Question

try
  myWord:= GetActiveOleObject('Word.Application') as WordApplication; //如果word没有打开, 则打开word
except
  myWord:= CoWordApplication.Create;
end;XP下没问题，win7下运行到上述两处代码处就提示“Invalid variant operation.”，关了uac还是出错，用管理员权限运行也出错。不知道怎么办好了，请大家帮帮忙，谢谢了。系统：windows 7
office：2003专业版

Answer 1

已解决，修改如下解决。
try
  myWord:= GetActiveOleObject('Word.Application'); //如果word没有打开, 则打开word
except
  myWord:= CreateOleObject('Word.Application');
end;