一个吸引人的安装界面不仅能提升用户体验，还能给用户留下深刻的第一印象。Inno Setup 是一款广泛使用的安装程序制作工具，它不仅功能强大，还支持高度定制化。本文大眼仔旭将向您介绍如何使用 ISSkin 库来美化您的 Inno Setup 安装程序，让您能够轻松创建出既美观又实用的安装界面。

开始使用 ISSkin 非常简单，您只需要一份 ISSkin DLL 文件，一个用于美化应用程序的视觉样式文件，以及 Jordan Russell 的 Inno Setup 编译器。

下面的信息将指导您如何在安装程序中使用 ISSkin DLL。

ISSkin 库

第一步：添加 ISSkin 和视觉样式 DLL 文件

首先需要做的是使用 Inno Setup 打开您的安装脚本。找到 [Files] 部分，并添加 ISSkin.dll 和视觉样式 DLL 文件。在这个示例中，我们将使用随下载包提供的 Office2007.cjstyles 文件。

1
2
3
4
5
6
7
[Files]

; 添加用于美化 Inno Setup 安装程序的 ISSkin DLL 文件。

Source: ISSkin.dll; DestDir: {app}; Flags: dontcopy



; 添加包含用于美化的视觉样式资源的文件，

; 您也可以使用 Microsoft 视觉样式资源(*.msstyles)。

Source: Office2007.cjstyles; DestDir: {tmp}; Flags: dontcopy

第二步：声明 API 函数

在将 ISSkin 和视觉样式 DLL 添加到安装脚本之后，接下来需要定义一段代码来加载 ISSkin DLL 并应用视觉样式（美化）到您的安装程序。为此，您需要在安装脚本中找到 [Code] 块。如果还没有定义该块，可以在脚本底部添加一个。

1
2
3
4
5
6
7
8
9
10
11
12
[Code]

// 从 ISSkin.DLL 导入 LoadSkin API

procedure LoadSkin(lpszPath: AnsiString; lpszIniFileName: AnsiString);

external 'LoadSkin@files:isskin.dll stdcall';



// 从 ISSkin.DLL 导入 UnloadSkin API

procedure UnloadSkin();

external 'UnloadSkin@files:isskin.dll stdcall';



// 从 User32.DLL 导入 ShowWindow Windows API

function ShowWindow(hWnd: Integer; uType: Integer): Integer;

external 'ShowWindow@user32.dll stdcall';

我们需要导入 ISSkin DLL 中的 LoadSkin 和 UnloadSkin API 函数以便加载和卸载每个视觉样式（美化）。我们还需要导入 ShowWindow Windows API 函数，在安装程序关闭之前，即卸载美化之前显示窗口。通过下面所示的过程和外部关键字来导入每个函数。

第三步：添加 InitializeSetup() 函数

我们需要添加一个 InitializeSetup() 函数，该函数在 Inno Setup 安装程序初始化时调用。在这里我们将放置加载安装程序视觉样式的代码。在 LoadSkin 函数中，第一个参数传递视觉样式 DLL 的路径，第二个参数传递模式 INI 文件的名称。

1
2
3
4
5
6
function InitializeSetup(): Boolean;

begin

  ExtractTemporaryFile('Office2007.cjstyles');

  LoadSkin(ExpandConstant('{tmp}\Office2007.cjstyles'), '');

  Result := True;

end;

模式 INI 文件包含每个样式的特定细节，并嵌入到视觉样式 DLL 中。如果此参数为空，则使用默认模式。例如，如果您将 NormalAqua.ini 作为 LoadSkin 的第二个参数，则将使用 Aqua 模式而不是默认的 Blue 模式。

第四步：添加 DeinitializeSetup() 函数

最后，我们需要添加一个 DeinitializeSetup() 函数，该函数在 Inno Setup 安装程序关闭时调用。在这里我们将放置卸载视觉样式（美化）的代码，在安装程序退出前执行。

1
2
3
4
5
6
procedure DeinitializeSetup();

begin

  // 在卸载美化前隐藏窗口，以免用户看到关闭前未美化的窗口。

  ShowWindow(StrToInt(ExpandConstant('{wizardhwnd}')), 0);

  UnloadSkin();

end;

遵循上述步骤，您就可以成功地使用 ISSkin 来美化您的 Inno Setup 安装程序了。