file-io - 使用 Inno Setup 如何重命名用户选择的文件(图像)并将其复制到程序文件目录

Question

我了解如何创建自定义向导页面。只是不确定如何添加文件选择器，并将其限制为 .jpg 文件类型。我有一个在安装结束时运行的代码部分，用于在设置过程中获取用户定义的输入并修改设置文件，只需要了解如何获取他们在设置屏幕步骤中选择的文件的值，然后复制它，重命名，并将其转储到程序文件文件夹中。

Answer 1

如何创建过滤输入文件向导页面项？

出于文件选择的目的，您应该使用单独的输入文件向导页面，您可以通过 CreateInputFilePage 创建该页面。 .然后，Add TInputFileWizardPage 的方法页面对象类包含 AFilter参数，您可以在其中指定可通过其关联的文件打开对话框选择的文件的过滤器。在这个例子中，我们只允许用户选择 *.jpg 文件:

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program

[Code]
var
  InputPage: TInputFileWizardPage;

procedure InitializeWizard;
begin
  // create the input file wizard page
  InputPage := CreateInputFilePage(wpWelcome, 'Caption', 'Description',
    'SubCaption');
  // and insert one item in which the user will be restricted to select
  // only *.jpg files
  InputPage.Add('Prompt', 'JPG files (*.jpg)|*.jpg', '.jpg');
end;

如何手动调用过滤后的文件打开对话框？

如果那个输入文件向导页面不适合您的设计，而您想自己制作，那么您需要 GetOpenFileName 函数来显示一个打开的文件对话框。即使这个函数包含一个参数，您可以在其中指定过滤器字符串。在这种情况下，它是 Filter范围。在此脚本示例中，显示了如何使用 *.jpg 文件过滤器调用文件打开对话框:

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program

[Code]
procedure InitializeWizard;
var
  FileName: string;
begin
  if GetOpenFileName('Prompt', FileName, 'C:\InitialDirectory',
    'JPG files (*.jpg)|*.jpg', '.jpg')
  then
    MsgBox(Format('Selected file: %s', [FileName]), mbInformation, MB_OK);
end;

如何构建过滤字符串？

正如你在上面的代码中看到的，过滤字符串由标题部分和过滤部分组成，由 | 分隔。字符。您还可以通过 | 分隔每个过滤器字符串来指定多个过滤器。 char，或者您可以通过用 ; 分隔扩展名来为单个过滤器指定多个扩展名.

所以，例如创建一个名为 JPG files 的过滤器仅过滤您可以编写的 *.jpg 文件:

JPG files|*.jpg

要制作两个过滤器，假设一个用于 *.jpg 文件，另一个用于 *.jpeg 文件，您可以编写:

JPG files|*.jpg|JPEG files|*.jpeg

最后，要为 *.jpg 和 *.jpeg 文件制作单个过滤器，您可以编写:

JPEG files|*.jpg;*.jpeg

有关详细信息，我会向您推荐 TOpenDialog.Filter 的 Delphi 引用页面。属性(property)。