在使用 Inno Setup 默认向导制作生成的安装包在安装步骤中有些步骤其实是可以忽略掉不显示,同时有些用户喜欢追求细节方面。比如,我们今天要解决的是使用 Inno Setup 在安装过程中不展示出安装路径以仅显示文件名。默认情况我们可以通过手动更改语言文件以及通过以下代码实现,以下就是给大家整理好的 Inno Setup 隐藏安装进度安装路径仅显示文件名代码。
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
[Code ]
var
myLabel: TNewStaticText;
procedure InitializeWizard();
begin
WizardForm.FilenameLabel.Visible := false;
MyLabel := TNewStaticText.Create(WizardForm.InstallingPage);
MyLabel.Parent := WizardForm.InstallingPage;
MyLabel.Top := WizardForm.FilenameLabel.Top;
MyLabel.Left := WizardForm.FilenameLabel.Left;
MyLabel.Width := WizardForm.FilenameLabel.Width;
MyLabel.Visible := True;
MyLabel.Caption := ”;
end;
procedure DisplayFileName();
begin
MyLabel.Caption := ExtractFileName(CurrentFileName);
end;
[Files]
Source: “{app}\*”; DestDir: “{app}”; Flags: ignoreversion recursesubdirs; AfterInstall: DisplayFileName
|
复制以上 Inno Setup 代码粘贴并保存到 Inno Setup 脚本中即可,网站上给大家提供了有很多个不同类型的 Inno Setup 方面的脚本,大家在对脚本进行整合的时候也要灵活运用。