GetActiveOleObject - 异常：操作不可用

Question

我的 Inno Setup 遇到问题，它给出了异常 Operation Unavailable。

我什至尝试使用 Inno Setup 提供的示例代码 CodeAutomation.iss ，但它仍然给我同样的错误。如何让 GetActiveOleObject 正常工作？我错过了什么吗？

这是 Inno Setup 示例中的代码：

{--- Word ---}

procedure WordButtonOnClick(Sender: TObject);
var
  Word: Variant;
begin
  if MsgBox('Setup will now check whether Microsoft Word is running. Do you want to continue?', mbInformation, mb_YesNo) = idNo then
    Exit;

  { Try to get an active Word COM Automation object }

  try
    //This is where the error occurs.
    Word := GetActiveOleObject('Word.Application'); 
  except
  end;

  if VarIsEmpty(Word) then
    MsgBox('Microsoft Word is not running.', mbInformation, mb_Ok)
  else
    MsgBox('Microsoft Word is running.', mbInformation, mb_Ok)
end;

提前致谢！

Answer 1

根据以下新闻组帖子：

http://news.jrsoftware.org/news/innosetup/ msg71386.html

http://news.jrsoftware.org/news/innosetup/msg71387.html

这是设计使然，仅在通过 IDE 运行时才会发生。运行编译的安装程序时是否出现错误？我刚刚在 Win7 SP1 x64 机器上尝试了 CodeAutomation.iss 中的代码，它工作正常。