聊聊 inno 封装过程中关于对应系统的判断问题

boyhong

inno的高手，若您路过此地，HELP me,非常感谢了~~

[Code]
function InitializeSetup(): Boolean;
var ErrorCode: Integer;
begin
  if Is64BitInstallMode then
    begin
     if MsgBox('您的系统为32位,请对应去下载安装本工具的32位版本!', mbInformation, MB_OK)=IDOK then
      begin
       ShellExec('open', 'http://www.test.com.cn/soft/test.rar', '', '', SW_SHOWNORMAL, ewNoWait,ErrorCode)
       Result :=false //安装程序退出
      end
    end
  else
      Result :=true;
end;

boyhong

我的目的是：
inno初始化安装时，判断，若系统是64位，就：
MsgBox('您的系统为32位,请对应去下载安装本工具的32位版本!', mbInformation, MB_OK)
ShellExec('open', 'http://www.test.com.cn/soft/test.rar', '', '', SW_SHOWNORMAL, ewNoWait,ErrorCode)然后退出安装。

反复修改调试，均失败。初接触INNO 不知错在哪儿了。。感谢您的帮助先。