inno-setup - 从多个条目将参数传递给 Inno Setup Check 函数

Question

我有很多[components]，我只想编写一个函数来检查它们的特定注册表项。我可以为每个条目编写一个函数，但我想将它们总结在一个函数中。有任何想法吗？ :)

试图说明:

[components]  
Name: "MyProgram for A"; (...); Check: CheckRegKey  
Name: "MyProgram for B"; (...); Check: CheckRegKey  
Name: "MyProgram for C"; (...); Check: CheckRegKey  
...  


[code]  
function CheckRegKey: Boolean; 
  begin 
    Result:=RegValueExists(HKLM64, '...', '...')
    //check if A is installed
    //check if B, C,... or a mix of them is installed

Answer 1

我不太确定我是否答对了你的问题，但是好吧，为了写一个 Check不同组件条目的参数函数 您将需要一个输入参数，通过该参数您可以区分这些组件。在代码中是这样的:

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program

[Components]
Name: "A"; Description: "MyProgram for A"; Check: CheckRegKey(1)
Name: "B"; Description: "MyProgram for B"; Check: CheckRegKey(2)
Name: "C"; Description: "MyProgram for C"; Check: CheckRegKey(3)

[Code]
function CheckRegKey(CompType: Integer): Boolean;
begin
  Result := False;
  case CompType of
    1: Result := RegValueExists(...);
    2: Result := RegValueExists(...);
    3: Result := RegValueExists(...);
  end;
end;