NSIS 自定义界面布局简介 （学习四）

;自定义欢迎页面
Page custom WelcomePage

;初始化必须要调用的组件
Function .onInit
 InitPluginsDir
 ;Call DiskFrameWorkSpaceCheck ;检测磁盘
 ;Call DefineReadINI #读取INI文件中的内容
 Call IsProgramRunning #检测程序是否正在运行
 Call CompareVersion #检查程序的版本号
 
 ;显示动态的图片
 File `/oname=$PLUGINSDIR\index.htm` `images\index.htm`
 File `/oname=$PLUGINSDIR\loading_pic1.bmp` `images\loading_pic1.bmp`
 File `/oname=$PLUGINSDIR\loading_pic2.bmp` `images\loading_pic2.bmp`
 File `/oname=$PLUGINSDIR\loading_pic3.bmp` `images\loading_pic3.bmp`
 File `/oname=$PLUGINSDIR\loading_pic4.bmp` `images\loading_pic4.bmp`
 File `/oname=$PLUGINSDIR\license.rtf` `license\license.rtf`
 File `/oname=$PLUGINSDIR\License.html` `images\License.html`
 ;背景图片
 File `/ONAME=$PLUGINSDIR\bg.bmp` `images\bg.bmp`
 ;顶部图片
 File `/ONAME=$PLUGINSDIR\welcome.bmp` `images\welcome.bmp`
 File `/ONAME=$PLUGINSDIR\a.png` `images\a.png`
 ;关闭按钮
 File `/oname=$PLUGINSDIR\btn_close.bmp` `images\btn_close.bmp`
 ;立即安装的图片
 File `/oname=$PLUGINSDIR\btn_install.bmp` `images\btn_install.bmp`
 ;退出的背景图片
 File `/ONAME=$PLUGINSDIR\quit.bmp` `images\quit.bmp`
 ;改变路径的按钮图片
 File `/oname=$PLUGINSDIR\btn_agreement1.bmp` `images\btn_agreement1.bmp`
 File `/oname=$PLUGINSDIR\btn_agreement2.bmp` `images\btn_agreement2.bmp`
 File `/oname=$PLUGINSDIR\checkbox1.bmp` `images\checkbox1.bmp`
 File `/oname=$PLUGINSDIR\checkbox2.bmp` `images\checkbox2.bmp`
 ;安装界面的图片
 File `/oname=$PLUGINSDIR\installation.bmp` `images\installation.bmp`
 File `/oname=$PLUGINSDIR\loading1.bmp` `images\loading1.bmp`
 File `/oname=$PLUGINSDIR\loading2.bmp` `images\loading2.bmp`
 #更改路径的界面
 File `/oname=$PLUGINSDIR\btn_change.bmp` `images\btn_change.bmp`
 #安装完成界面
 File `/oname=$PLUGINSDIR\bg_finish.bmp` `images\bg_finish.bmp` ;安装完成的背景图片
 File `/oname=$PLUGINSDIR\btn_complete.bmp` `images\btn_complete.bmp`
 
 SkinBtn::Init "$PLUGINSDIR\btn_install.bmp"
 SkinBtn::Init "$PLUGINSDIR\btn_close.bmp"
 SkinBtn::Init "$PLUGINSDIR\btn_quit.bmp"
 SkinBtn::Init "$PLUGINSDIR\btn_cancel.bmp"
 SkinBtn::Init "$PLUGINSDIR\btn_agreement1.bmp"
 SkinBtn::Init "$PLUGINSDIR\btn_agreement2.bmp"
 SkinBtn::Init "$PLUGINSDIR\checkbox1.bmp"
 SkinBtn::Init "$PLUGINSDIR\checkbox2.bmp"
 SkinBtn::Init "$PLUGINSDIR\btn_change.bmp"
 SkinBtn::Init "$PLUGINSDIR\btn_complete.bmp"

FunctionEnd

;初始化的函数
Function onGUIInit
 ;消除边框
 System::Call `user32::SetWindowLong(i$HWNDPARENT,i${GWL_STYLE},0x9480084C)i.R0`
 ;隐藏一些既有控件
 GetDlgItem $0 $HWNDPARENT 1034
 ShowWindow $0 ${SW_HIDE}
 GetDlgItem $0 $HWNDPARENT 1035
 ShowWindow $0 ${SW_HIDE}
 GetDlgItem $0 $HWNDPARENT 1036
 ShowWindow $0 ${SW_HIDE}
 GetDlgItem $0 $HWNDPARENT 1037
 ShowWindow $0 ${SW_HIDE}
 GetDlgItem $0 $HWNDPARENT 1038
 ShowWindow $0 ${SW_HIDE}
 GetDlgItem $0 $HWNDPARENT 1039
 ShowWindow $0 ${SW_HIDE}
 GetDlgItem $0 $HWNDPARENT 1256
 ShowWindow $0 ${SW_HIDE}
 GetDlgItem $0 $HWNDPARENT 1028
 ShowWindow $0 ${SW_HIDE}
FunctionEnd

;处理无边框移动
Function onGUICallback
 ${If} $MSG = ${WM_LBUTTONDOWN}
 SendMessage $HWNDPARENT ${WM_NCLBUTTONDOWN} ${HTCAPTION} $0
 ${EndIf}
FunctionEnd

Function onWarningGUICallback
 ${If} $MSG = ${WM_LBUTTONDOWN}
 SendMessage $WarningForm ${WM_NCLBUTTONDOWN} ${HTCAPTION} $0
 ${EndIf}
FunctionEnd

;关闭函数
Function SkinBtn_Close
 SkinBtn::Set /IMGID=$PLUGINSDIR\btn_close.bmp $1
FunctionEnd

;安装的函数
Function SkinBtn_Install
 SkinBtn::Set /IMGID=$PLUGINSDIR\btn_install.bmp $1
FunctionEnd

;自定义的欢迎页面 （如果此页面为空，则会调用原来的默认的页面）
Function WelcomePage
 GetDlgItem $0 $HWNDPARENT 1
 ShowWindow $0 ${SW_HIDE}
 GetDlgItem $0 $HWNDPARENT 2
 ShowWindow $0 ${SW_HIDE}
 GetDlgItem $0 $HWNDPARENT 3
 ShowWindow $0 ${SW_HIDE}
 ;初始化的定义一个窗口
 nsDialogs::Create 1044
 Pop $0
 ${If} $0 == error
 Abort
 ${EndIf}
 SetCtlColors $0 "" transparent ;背景设成透明
 ;加入头文件"nsWindows.nsh"
 ${NSW_SetWindowSize} $HWNDPARENT 508 296 ;改变窗体大小
 ${NSW_SetWindowSize} $0 508 296 ;改变Page大小
 
 ;关闭按钮
 ${NSD_CreateButton} 490 5 15 15 ""
 Pop $Btn_Close
 StrCpy $1 $Btn_Close
 Call SkinBtn_Close
 GetFunctionAddress $3 onClose
 SkinBtn::onClick $1 $3
 
 ;立即安装的按钮
 ;${NSD_CreateButton} 240 260 88 25 ""
 ${NSD_CreateButton} 183 225 153 39 ""
 Pop $Btn_Install
 StrCpy $1 $Btn_Install
 Call SkinBtn_Install
 EnableWindow $Btn_Install 1
 ;定义的一个Bool值，用于是否显示
 ;StrCpy $Bool_Install 1
 GetFunctionAddress $3 OnClick_Install
 SkinBtn::onClick $1 $3
 
 
 ;右下方更改安装路径的控件使用
 ${NSD_CreateButton} 400 280 95 15 ""
 Pop $Btn_LoadPath
 StrCpy $1 $Btn_LoadPath
 Call SkinBtn_Modify
 GetFunctionAddress $3 OnClick_Modify
 SkinBtn::onClick $1 $3
 ;StrCpy $Bool_License 0 ;初始化值为0
 
 ;CheckBox选中项
 ${NSD_CreateButton} 23 280 15 15 ""
 Pop $Ck_AgreeLicense
 StrCpy $1 $Ck_AgreeLicense
 Call SkinBtn_Checked
 GetFunctionAddress $3 OnClick_CheckAgreeLicense
 SkinBtn::onClick $1 $3
 StrCpy $Bool_AgreeLicense 1
 ${NSD_CreateLabel} 43 280 100 15 "我已阅读并同意"
 Pop $Lbl_AgreeLicense
 SetCtlColors $Lbl_AgreeLicense "" transparent ;背景设成透明
 
 ;checkBox按钮右侧的许可协议按钮，点击这个按钮可以打开html连接，显示网页的效果
 ${NSD_CreateButton} 130 280 100 15 ""
 Pop $Btn_LoadPath
 StrCpy $1 $Btn_LoadPath
 Call SkinBtn_HtmlLicense
 GetFunctionAddress $3 onClickHtmlLicense
 SkinBtn::onClick $1 $3

 ;界面的上方图片
 ${NSD_CreateBitmap} 0 0 520 230 ""
 Pop $TopImage
 ${NSD_SetImage} $TopImage $PLUGINSDIR\welcome.bmp $ImageHandle

 ;贴背景大图
 ${NSD_CreateBitmap} 0 0 100% 100% ""
 Pop $BGImage
 ;${NSD_SetImage} $BGImage $PLUGINSDIR\bg.bmp $ImageHandle
 ${NSD_SetImage} $BGImage $PLUGINSDIR\bg.bmp $ImageHandle
 
 GetFunctionAddress $0 onGUICallback
 WndProc::onCallback $BGImage $0 ;处理无边框窗体移动
 nsDialogs::Show
 ${NSD_FreeImage} $ImageHandle

 ;当加上以下的代码后，背景图片以及界面的上方图片显示出来
 GetFunctionAddress $0 onGUICallback
 WndProc::onCallback $BGImage $0 ;处理无边框窗体移动
 nsDialogs::Show
 ;释放背景图片的语句
 ${NSD_FreeImage} $ImageHandle
FunctionEnd


Section Uninstall
 ;删除任务栏快捷方式
 ExecShell "taskbarunpin" "$DESKTOP\Electron.lnk"
 ;删除桌面的快捷方式
 Delete "$DESKTOP\Electron.lnk"
 Delete "$INSTDIR\uninst.exe" ; 删除自己
 Delete "$SMPROGRAMS\pkpm\Uninstall.lnk"
 RMDir "$SMPROGRAMS\pkpm"
 ;RMDir "$INSTDIR"
 RMDir /r "$INSTDIR"
 ;DeleteRegKey HKLM "$PRODUCT_UNINST_KEY"
 DeleteRegKey HKLM "${PRODUCT_INSTALL_KEY}"
 SetAutoClose true
SectionEnd