0
点赞
收藏
分享

微信扫一扫

INNO SETUP 获得命令行参数

千妈小语 2022-05-20 阅读 61

[Code]


function GetMyParam(PName:String):String;

var

  CmdLine : String;

  CmdLineLen : Integer;

  i : Integer;

begin

    CmdLineLen:=ParamCount();

    for i:=0 to CmdLineLen do

    begin

    CmdLine:=ParamStr(i);

    if CmdLine= PName then

      begin

          CmdLine:=ParamStr(i+1);

          Result := CmdLine;

          Exit;

      end;

    end;

end;





举报

相关推荐

0 条评论