Inno自定义界面学习笔记（六）之自定义卸载界面

妙笔花生

已于 2022-03-18 14:19:01 修改

阅读量1.5k

点赞数

分类专栏： Inno学习文章标签：学习自定义卸载界面 Inno 卸载

于 2022-03-17 15:01:34 首次发布

本文链接：https://blog.csdn.net/sspdfn/article/details/123550182

版权

Inno自定义界面学习笔记（六）之自定义卸载界面

自定义卸载界面与自定义安装界面大体上是一样的，但是在细节却有很多点要注意。否则就要浪费大把时间了。

自定义卸载界面

思路：是在 procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep); 中使用TForm.Create创建一个新的窗口。然后在窗口中绘制界面。


 //开始卸载
procedure CreateUninstallSetpForm();
 begin

 UnStartForm := TForm.Create(UninstallProgressForm);
 UninstallProgressForm.Hide;
   try
      UnStartForm.Width := WIZARDFORM_WIDTH_NORMAL;
      UnStartForm.Height := WIZARDFORM_HEIGHT_NORMAL;
      UnStartForm.BorderStyle := bsNone;
      //UnStartForm.OnMouseDown := @UnStartFormMouseDown;

      //卸载背景
      UninstallImage := ImgLoad(UnStartForm.Handle,ExpandConstant('{tmp}\bkg_Uninstall_welcome.png'),0,0,623,423,false,True);

      UnCloseButton := TButton.Create(UnStartForm);
      UnCloseButton.Parent := UnStartForm;
      UnCloseButton.ModalResult := mrCancel;
      UnCloseButton.Cancel :&#