Inno自定义界面学习笔记（五）之关闭与最小化

Inno自定义界面学习笔记（五）之关闭与最小化

上一章讲了如何设置自定义按钮。如法炮制，增加关闭按钮 。却发现点关闭后会崩溃。

关闭的问题

我们在关闭的回调函数中调用 WizardForm.Close();

//主界面关闭按钮按下时执行的脚本
procedure button_close_on_click(hBtn : hwnd);
begin
 
  WizardForm.Close();
end;

通过 这个方法关闭安装程序。但在结束时会有崩溃

这显然不是我们想看到的。

要解决这个问题，也很简单，只要重写DeinitializeSetup 并在内部调用 gdipShutdown

procedure DeinitializeSetup();
begin
  gdipShutdown;
end;

最小化窗口

这个也很简单，在最小化按钮 的回调中，发送最小化的消息就可以 了

//主界面最小化按钮按下时执行的脚本
procedure button_minimize_on_click(hBtn : hwnd);
begin
  SendMessage(WizardForm.Handle, WM_SYSCOMMAND, 61472, 0);
end;