我的目标是阻止Inno安装程序安装我的程序(如果它已经存在)(我的程序包含除了.exe之外的更多文件我正在检查,这只是一种快速解决问题的方法"是否安装)。我使用/ verysilent参数。
这是我到目前为止所做的:
[Code]
function IsMyProgramInstalled: boolean;
begin
result := FileExists('C:\MyProgramFolder\myprogram.exe');
end;
function InitializeSetup: boolean;
begin
result := IsMyProgramInstalled;
if result then
MsgBox('Some custom message', mbError, MB_OK);
end;
问题是在消息之后设置继续。我知道我需要为安装程序返回错误值才能停止,但我不知道该怎么做。谁知道我怎么能做到这一点?如果不可能,这种方式还有其他选择吗?不幸的是我对Pascal脚本一无所知。提前谢谢。
编辑:Tlama解决方案是正确的:
[Code]
function IsMyProgramInstalled: boolean;
begin
result := FileExists('C:\MyProgramFolder\MyProgram.exe');
end;
function InitializeSetup: boolean;
begin
result := not IsMyProgramInstalled;
if not result then
MsgBox('Some custom message', mbError, MB_OK);
end;