在主题中,是否可能?并且,如果参数(例如传递给exe文件的参数)设置为true,我想在安装程序的一页上显示它们。
我知道如何显示某些页面:
if dev then
PageWersjePlikow :=
CreateOutputMsgMemoPage(
1, 'Wersje plików zawarte w instalatorze',
'Lista plików niewidoczna dla klienta',
'Pliki:', 'TU WPISAĆ WERSJE PLIKÓW');
我有一些想法,但每个想法都是基于编译exe安装程序时构建的.txt文件,然后从中读取...
答案 0 :(得分:3)
使用GetVersionNumbers
或GetVersionNumbersString
支持功能。
GetVersionNumbersString
以[{1}}格式返回版本。
如果您需要其他格式,则需要使用Major.Minor.Rev.Build
并根据需要格式化版本组件(例如GetVersionNumbers
):
Major.Minor.Rev
答案 1 :(得分:0)
谢谢!我找到了检查cmd参数的解决方案:
function GetParam: Boolean;
var
param: string;
i: integer;
begin
Result := False;
for i:= 0 to ParamCount do
begin
param := ParamStr(i);
if (param = '-p') then
begin
Result := True;
break;
end;
end;
end;
使用我的功能,我可以用' -p'运行我的安装程序。参数,它将显示包含我想要的信息的页面: - )