Est-il possible d'accepter les paramètres de ligne de commande personnalisés avec Inno Setup?

Question

Je prépare un programme d'installation avec Inno Setup. Mais je voudrais ajouter une commande supplémentaire (aucun des paramètres disponibles) des paramètres de ligne de commande et que vous souhaitez obtenir la valeur du paramètre, comme:

setup.exe /do something 

Vérifiez si /do est donnée, puis obtenir la valeur de quelque chose. C'est possible? Comment puis-je faire ceci?

Answer 1

J'ai trouvé la réponse: GetCmdTail.

Answer 2

Oui, il est possible, vous pouvez utiliser la fonction ParamStr en PascalScript pour accéder à tous les paramètres de la ligne de commande. La fonction ParamCount vous donnera le nombre de paramètres de la ligne de commande.

Une autre possibilité est d'utiliser GetCmdTail

Answer 3

Vous pouvez passer des paramètres à vos scripts d'installation. Installez le Inno Setup Preprocessor et lisez la documentation sur le passage des paramètres de ligne de commande personnalisés.

Answer 4

Si vous souhaitez analyser les arguments de la ligne de commande à partir du code dans inno, utilisez une méthode similaire à celle-ci. Il suffit d'appeler le script Inno de la ligne de commande comme suit:

c:\MyInstallDirectory>MyInnoSetup.exe -myParam parameterValue 

Ensuite, vous pouvez appeler le GetCommandLineParam comme ceci où que vous soyez:

myVariable := GetCommandLineParam('-myParam'); 

{ ================================================================== } 
{ Allows for standard command line parsing assuming a key/value organization } 
function GetCommandlineParam (inParam: String):String; 
var 
    LoopVar : Integer; 
    BreakLoop : Boolean; 
begin 
    { Init the variable to known values } 
    LoopVar :=0; 
    Result := ''; 
    BreakLoop := False; 

    { Loop through the passed in arry to find the parameter } 
    while ((LoopVar < ParamCount) and 
      (not BreakLoop)) do 
    begin 
    { Determine if the looked for parameter is the next value } 
    if ((ParamStr(LoopVar) = inParam) and 
     ((LoopVar+1) <= ParamCount)) then 
    begin 
     { Set the return result equal to the next command line parameter } 
     Result := ParamStr(LoopVar+1); 

     { Break the loop } 
     BreakLoop := True; 
    end; 

    { Increment the loop variable } 
    LoopVar := LoopVar + 1; 
    end; 
end; 

Answer 5

C'est la fonction J'ai écrit, ce qui est une amélioration de la réponse de Steven Dunn. Vous pouvez l'utiliser comme:

c:\MyInstallDirectory>MyInnoSetup.exe /myParam="parameterValue" 

myVariable := GetCommandLineParam('/myParam'); 

{ util method, equivalent to C# string.StartsWith } 
function StartsWith(SubStr, S: String): Boolean; 
begin 
    Result:= Pos(SubStr, S) = 1; 
end; 

{ util method, equivalent to C# string.Replace } 
function StringReplace(S, oldSubString, newSubString: String): String; 
var 
    stringCopy: String; 
begin 
    stringCopy := S; { Prevent modification to the original string } 
    StringChange(stringCopy, oldSubString, newSubString); 
    Result := stringCopy; 
end; 

{ ================================================================== } 
function GetCommandlineParam(inParamName: String): String; 
var 
    paramNameAndValue: String; 
    i: Integer; 
begin 
    Result := ''; 

    for i := 0 to ParamCount do 
    begin 
    paramNameAndValue := ParamStr(i); 
    if (StartsWith(inParamName, paramNameAndValue)) then 
    begin 
     Result := StringReplace(paramNameAndValue, inParamName + '=', ''); 
     break; 
    end; 
    end; 
end; 

Answer 6

Avec InnoSetup 5.5.5 (et peut-être d'autres versions), il suffit de passer tout ce que vous voulez en tant que paramètre, préfixé par un /

c:\> myAppInstaller.exe /foo=wiggle 

et

Le |waggle|waggle fournit une valeur par défaut si aucun paramètre ne correspond à la valeur . La configuration d'Inno n'est pas sensible à la casse. C'est une façon particulièrement agréable de gérer les options de la ligne de commande: elles ne font que naître. J'aurais aimé que les utilisateurs sachent à quels paramètres de la ligne de commande l'installateur se soucie.

BTW, cela rend les réponses de @ knguyen et de @ steve-dunn quelque peu redondantes. Les fonctions utilitaires font exactement ce que fait la syntaxe intégrée {param:}.

Answer 7

En réponse à:

"Avec InnoSetup 5.5.5 (et peut-être d'autres versions), passez tout ce que vous voulez en tant que paramètre, préfixé par un/» « @NickG, oui, chaque constante que vous pouvez étendre par la fonction ExpandConstant »

• Ce n'est pas le cas .. Essayer d'utiliser un paramètre de ligne de commande dans ExpandConstant en InnoSetup 5.5.6 provoque une erreur d'exécution

PS: J'aurais ajouté un commentaire directement, mais apparemment je n'ai pas « réputation » assez

Answer 8

plus à la réponse @DanLocks, le {param: ParamName | DefaultValue} constante est documenté près du bas de la page Constantes:

http://www.jrsoftware.org/ishelp/index.php?topic=consts

je l'ai trouvé très pratique pour supprimer le cas échéant la page de licence. Voici tout ce que je besoin d'ajouter (à l'aide Inno Setup 5.5.6 (a)):

[code] 
{ If there is a command-line parameter "skiplicense=true", don't display license page } 
function ShouldSkipPage(PageID: Integer): Boolean; 
begin 
    Result := False 
    if PageId = wpLicense then 
    if ExpandConstant('{param:skiplicense|false}') = 'true' then 
     Result := True; 
end; 

Answer 9

J'ai modifié réponse un peu knguyen. Maintenant, il est insensible à la casse (vous pouvez écrire en console/myParam ou/MYPARAM) et il peut accepter la valeur par défaut. J'ai aussi corrigé le cas lorsque vous avez reçu un paramètre plus grand que prévu (par ex:/myParamOther = "parameterValue" à la place de/myParam = "parameterValue" .MonParamOther ne correspond pas).

function GetCommandlineParam(inParamName: String; defaultParam: String): String; 
var 
    paramNameAndValue: String; 
    i: Integer; 
begin 
    Result := defaultParam; 

    for i := 0 to ParamCount do 
    begin 
    paramNameAndValue := ParamStr(i); 
    if (Pos(Lowercase(inParamName)+'=', AnsiLowercase(paramNameAndValue)) = 1) then 
    begin 
     Result := Copy(paramNameAndValue, Length(inParamName)+2, Length(paramNameAndValue)-Length(inParamName)); 
     break; 
    end; 
    end; 
end; 

Answer 10

Inno Setup supporte directement les interrupteurs avec la syntaxe /Name=Value utilisant {param} constant.

---

Vous pouvez utiliser la constante directement dans les sections, bien que cette utilisation soit assez limitée.

Un exemple:

[Registry] 
Root: HKCU; Subkey: "Software\My Company\My Program\Settings"; ValueType: string; \ 
    ValueName: "Mode"; ValueData: "{param:Mode|DefaultMode}" 

---

Vous voulez plus susceptibles d'utiliser des commutateurs à Pascal Script.

Si votre commutateur a la syntaxe /Name=Value, la façon la plus simple de lire sa valeur est d'utiliser ExpandConstant function.

Par exemple:

if ExpandConstant('{param:Mode|DefaultMode}') = 'DefaultMode' then 
begin 
    Log('Installing for default mode'); 
end 
    else 
begin 
    Log('Installing for different mode'); 
end; 

---

Si vous souhaitez utiliser une valeur de commutateur pour basculer les entrées dans les sections, vous pouvez utiliser Check parameter et une fonction auxiliaire, comme:

[Files] 
Source: "Client.exe"; DestDir: "{app}"; Check: SwitchHasValue('Mode', 'Client') 
Source: "Server.exe"; DestDir: "{app}"; Check: SwitchHasValue('Mode', 'Server') 

[Code] 

function SwitchHasValue(Name: string; Value: string): Boolean; 
begin 
    Result := CompareText(ExpandConstant('{param:' + Name + '}'), Value) = 0; 
end; 

---

Ironiquement, il est plus di difficile de vérifier la présence d'un simple interrupteur (sans valeur).

utilisation peut utiliser une fonction CmdLineParamExists de @ réponse de TLama à Passing conditional parameter in Inno Setup

function CmdLineParamExists(const Value: string): Boolean; 
var 
    I: Integer; 
begin 
    Result := False; 
    for I := 1 to ParamCount do 
    if CompareText(ParamStr(I), Value) = 0 then 
    begin 
     Result := True; 
     Exit; 
    end; 
end; 

Vous pouvez évidemment utiliser la fonction de Pascal Script:

if CmdLineParamExists('/DefaultMode') then 
begin 
    Log('Installing for default mode'); 
end 
    else 
begin 
    Log('Installing for different mode'); 
end; 

Mais vous pouvez même l'utiliser dans les sections, la plupart généralement en utilisant Check paramètre:

[Files] 
Source: "MyProg.hlp"; DestDir: "{app}"; Check: CmdLineParamExists('/InstallHelp')