聊聊 inno 封装过程中关于对应系统的判断问题
inno的高手，若您路过此地，HELP me,非常感谢了~~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; 我的目的是：
inno初始化安装时，判断，若系统是64位，就：
MsgBox('您的系统为32位,请对应去下载安装本工具的32位版本!', mbInformation, MB_OK)
ShellExec('open', 'http://www.test.com.cn/soft/test.rar', '', '', SW_SHOWNORMAL, ewNoWait,ErrorCode)然后退出安装。
反复修改调试，均失败。初接触INNO 不知错在哪儿了。。感谢您的帮助先。
页:
[1]