隐藏Inno Setup进度页面中的文件名 [英] Hide the file names from the Inno Setup progress page

问题描述

如何从安装进度栏上方的标签中隐藏或删除正在安装的文件的名称，而仅留下"ex:install"?

How can I hide or remove the names of files being installed from the label above the installation progress bar leaving only "ex: install"?

它在解压缩文件时出现.

It appears as the files are being unpacked.

LabelCurrFileName.Caption :=
  ExpandConstant('{cm:ExtractedFile} ') + 
  MinimizePathName(
    CurrentFile, LabelCurrFileName.Font, LabelCurrFileName.Width - ScaleX(100));

LabelCurrFileName.Caption := ExpandConstant('{cm:ExtractedFile} ');

推荐答案

我认为您想替换

I think you want to replace the FilenameLabel label with your custom one. How to specify custom texts for different languages and how to use them with a custom label, that will be placed instead of FilenameLabel label you can find in the following script:

[Languages]
Name: en; MessagesFile: "compiler:Default.isl"
Name: br; MessagesFile: "compiler:Languages\BrazilianPortuguese.isl"

[CustomMessages]
en.InstallingLabel=Installing...
br.InstallingLabel=Instalando...

[Code]

procedure InitializeWizard;
begin
  with TNewStaticText.Create(WizardForm) do
  begin
    Parent := WizardForm.FilenameLabel.Parent;
    Left := WizardForm.FilenameLabel.Left;
    Top := WizardForm.FilenameLabel.Top;
    Width := WizardForm.FilenameLabel.Width;
    Height := WizardForm.FilenameLabel.Height;
    Caption := ExpandConstant('{cm:InstallingLabel}');
  end;
  WizardForm.FilenameLabel.Visible := False;
end;

---

@MartinPrikryl有关完整的实现，请参见 Inno设置-如何使用我想要的名称创建个性化FilenameLabel?

这篇关于隐藏Inno Setup进度页面中的文件名的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！