在使用Inno Setup默认向导制作生成的安装包在安装步骤中有些步骤其实是可以忽略掉不显示,同时有些用户喜欢追求细节方面。比如,我们今天要解决的是使用 Inno Setup 在安装过程中不展示出安装路径以仅显示文件名。默认情况我们可以通过手动更改语言文件以及通过以下代码实现,以下就是小编给大家整理好的Inno Setup 隐藏安装进度安装路径仅显示文件名代码。
[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 方面的脚本,大家在对脚本进行整合的时候也要灵活运用。