NSIS 自定义安装部署实例

admin

1. ;安装目录
   
2. Var LoadFileLabrary
   
3. #自定义页面中的变量
   
4. ;var txt_LicensePage
   
5. ;界面上半部分的图片
   
6. Var TopImage
   
7. ;界面的背景图片
   
8. Var BGImage
   
9. Var ImageHandle
   
10. ;界面上立即安装的按钮
    
11. Var Btn_Install
    
12. ;Var Bool_Install ;定义的一个Bool值，用于是否显示
    
13. ;界面关闭按钮
    
14. Var Btn_Close
    
15. 
    
16. #安装路径的变量
    
17. Var Btn_LoadPath
    
18. ;创建checkBox
    
19. Var Ck_AgreeLicense ;界面上同意协议check框
    
20. Var Bool_AgreeLicense ;界面上同意协议check框的bool判定
    
21. Var Lbl_AgreeLicense ;界面上同意协议lbl文字
    
22. 
    
23. ;正在安装的界面
    
24. #正在安装
    
25. ;进度条变量
    
26. Var PB_ProgressBar
    
27. ;正在安装的变量
    
28. var Lbl_Sumary
    
29. ;网页控件
    
30. Var WebImg
    
31. ;背景图片
    
32. Var BGInstallImage
    
33. Var Btn_LoadingPage_Close ;关闭安装界面
    
34. Var Lbl_ProgressPercent   ;1%
    
35. Var ProgressPercent ;进度条中间值
    
36. Var txt_ImgPage ;动态图片显示在txt框中
    
37. 
    
38. #更改目录的界面
    
39. ;文本框
    
40. Var Txt_Browser
    
41. ;按钮
    
42. Var Btn_Browser
    
43. ;返回前一页的按钮
    
44. Var Btn_BackPath
    
45. Var Btn_PathPage_Close ;关闭按钮
    
46. 
    
47. #安装完成的界面
    
48. Var Bg_FinishImage
    
49. Var Btn_Finish ;完成的按钮
    
50. Var Btn_FinishPage_Close ;关闭界面的按钮
    
51. Var Lbl_DesktopShortCut  ;桌面的快捷方式文本
    
52. Var Ck_DesktopShortCut   ;桌面的快捷方式checkbox
    
53. Var Lbl_taskbarpin       ;任务栏的快捷方式文本
    
54. Var Ck_taskbarpin        ;任务栏的快捷方式checkbox
    
55. Var Bool_DesktopShortCut ;桌面的快捷方式的bool值判定
    
56. Var Bool_taskbarpin      ;任务栏的快捷方式的bool值判定
    
57. 
    
58. Var J3
    
59. Var PRODUCT_NAME
    
60. Var PRODUCT_NAMEEXE
    
61. Var PRODUCT_INSTALL_KEY
    
62. Var PRODUCT_UNINST_KEY
    
63. Var PRODUCT_VERSION_NAME
    
64. Var PRODUCT_VERSION_NO
    
65. Var PRODUCT_OUTFILE_MAIN7z
    
66. 
    
67. ; 该脚本使用 HM VNISEdit 脚本编辑器向导产生
    
68. ; 安装程序初始定义常量
    
69. !define PRODUCT_NAME "pkpm"
    
70. !define PRODUCT_VERSION "1.0"
    
71. !define PRODUCT_PUBLISHER "My company, Inc."
    
72. !define PRODUCT_UNINST_KEY "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_NAME}"
    
73. !define PRODUCT_INSTALL_KEY "Software\Microsoft\Windows\CurrentVersion\Install\${PRODUCT_NAME}"
    
74. 
    
75. !define PRODUCT_UNINST_ROOT_KEY "HKLM"
    
76. 
    
77. SetCompressor lzma
    
78. ;BrandingText "${EM_BrandingText}"
    
79. SetCompress force
    
80. XPStyle on
    
81. 
    
82. ; ------ MUI 现代界面定义 (1.67 版本以上兼容) ------
    
83. 
    
84. !include "MUI.nsh"
    
85. !include "MUI2.nsh"
    
86. !include "WinCore.nsh"
    
87. ;引用文件函数头文件
    
88. !include "FileFunc.nsh"
    
89. !include "nsWindows.nsh"
    
90. !include "LoadRTF.nsh"
    
91. !include "WinMessages.nsh"
    
92. ;循环语句需要的头文件操作
    
93. !include "LogicLib.nsh"
    
94. 
    
95. ; MUI 预定义常量
    
96. !define MUI_ABORTWARNING
    
97. ;安装图标的路径名字
    
98. !define MUI_ICON "images\fav.ico"
    
99. ;卸载图标的路径名字
    
100. !define MUI_UNICON "images\fav.ico"
     
101. 
     
102. ;自定义初始化
     
103. !define MUI_CUSTOMFUNCTION_GUIINIT onGUIInit
     
104. ;自定义欢迎页面
     
105. Page custom WelcomePage
     
106. ;自定义修改安装路径的页面
     
107. Page custom PathPage
     
108. ;自定义安装进度页面
     
109. Page custom LoadingPage
     
110. ;自定义安装完成页面
     
111. Page custom FinishPage
     
112. 
     
113. ; 欢迎页面
     
114. !insertmacro MUI_PAGE_WELCOME
     
115. ;许可协议页面
     
116. !define MUI_LICENSEPAGE_CHECKBOX
     
117. !insertmacro MUI_PAGE_LICENSE "aa.txt"
     
118. ; 安装目录选择页面
     
119. !insertmacro MUI_PAGE_DIRECTORY
     
120. ; 安装过程页面
     
121. !insertmacro MUI_PAGE_INSTFILES
     
122. ; 安装完成页面
     
123. !insertmacro MUI_PAGE_FINISH
     
124. 
     
125. ; 安装卸载过程页面
     
126. !insertmacro MUI_UNPAGE_INSTFILES
     
127. ; 安装界面包含的语言设置
     
128. !insertmacro MUI_LANGUAGE "SimpChinese"
     
129. ; 安装预释放文件
     
130. !insertmacro MUI_RESERVEFILE_INSTALLOPTIONS
     
131. ; ------ MUI 现代界面定义结束 ------
     
132. 
     
133. Name "${PRODUCT_NAME} ${PRODUCT_VERSION}"
     
134. OutFile "pkpm.exe"
     
135. ;InstallDir "$PROGRAMFILES\pkpm"
     
136. ;InstallDir "$INSTDIR\pkpm"
     
137. ShowInstDetails show
     
138. ShowUnInstDetails show
     
139. 
     
140. !define /math PBM_SETRANGE32 ${WM_USER} + 6 #定义nsis未包含的进度条相关常量
     
141. #编写：水晶石
     
142. InstallDir  "C:\pkpm"
     
143. !define PRODUCT_OUTFILE_MAIN "Main.7z"   #对应主程序压缩包名称
     
144. /*
     
145. 该属性让安装程序去检测一注册表里的一个字串，
     
146. 如果该字串可用那么把它用来作为安装目录。
     
147. 如果预置了该属性，当指定的注册表键可用时它会越过 InstallDir 指定的字串，
     
148. 否则使用默认的 InstallDir 指定值。查询注册表时，该命令将自动截去引号
     
149. */
     
150. ;!define PRODUCT_INSTALL_KEY "SOFTWARE\PKPM\Electron"
     
151. ;InstallDirRegKey HKLM Software\NSIS "" 根键 子键 键名
     
152. ;InstallDirRegKey HKLM "$PRODUCT_INSTALL_KEY" "C:\pkpm"
     
153. 
     
154. Section MainSetup
     
155. SectionEnd
     
156. 
     
157. #检测程序是否正在运行
     
158. Function IsProgramRunning
     
159. FindProcDLL::FindProc "Electron.exe"
     
160. Pop $R0
     
161. IntCmp $R0 1 0 no_run
     
162. MessageBox MB_ICONSTOP "安装程序检测到 Electron.exe 正在运行，请退出程序后重试"
     
163. Quit
     
164. no_run:
     
165. FunctionEnd
     
166. 
     
167. #检查程序的版本号
     
168. Function CompareVersion
     
169. ReadRegStr $0 HKLM ${PRODUCT_INSTALL_KEY} "Version"   ;PRODUCT_VERSION      ;用户变量(输出) 根键 子键 项
     
170. ${IF} $0 != ""
     
171. IntCmp ${PRODUCT_VERSION} $0 0 Old New
     
172. MessageBox MB_YESNO  "安装程序检测到 $PRODUCT_NAME 已经安装，是否覆盖安装" IDYES Y IDNO N
     
173. N:
     
174. Quit
     
175. Old:
     
176. MessageBox MB_ICONSTOP "安装程序检测到 $PRODUCT_NAME 已经安装了更新版本"
     
177. Quit
     
178. New:
     
179. MessageBox MB_ICONSTOP "安装程序检测到 $PRODUCT_NAME 已经安装了旧版本，继续更新安装"
     
180. ${ENDIF}
     
181. Y:
     
182. FunctionEnd
     
183. 
     
184. Function DefineReadINI
     
185. SetOutPath $TEMP
     
186. SetOverwrite on
     
187. File "setup.ini"
     
188. ReadINIStr $PRODUCT_NAME $TEMP\setup.ini SETUP_define PRODUCT_NAME
     
189. ReadINIStr $PRODUCT_NAMEEXE $TEMP\setup.ini SETUP_define PRODUCT_NAMEEXE
     
190. ReadINIStr $PRODUCT_INSTALL_KEY $TEMP\setup.ini SETUP_define PRODUCT_INSTALL_KEY
     
191. ReadINIStr $PRODUCT_UNINST_KEY $TEMP\setup.ini SETUP_define PRODUCT_UNINST_KEY
     
192. ReadINIStr $PRODUCT_VERSION_NAME $TEMP\setup.ini SETUP_define PRODUCT_VERSION_NAME
     
193. ReadINIStr $PRODUCT_VERSION_NO $TEMP\setup.ini SETUP_define PRODUCT_VERSION_NO
     
194. ReadINIStr $PRODUCT_OUTFILE_MAIN7z $TEMP\setup.ini SETUP_define PRODUCT_OUTFILE_MAIN7z
     
195. FunctionEnd
     
196. 
     
197. ;初始化必须要调用的组件
     
198. Function .onInit
     
199. InitPluginsDir
     
200. Call IsProgramRunning   #检测程序是否正在运行
     
201. Call CompareVersion     #检查程序的版本号
     
202. 
     
203. ;显示动态的图片
     
204. File `/oname=$PLUGINSDIR\index.html` `images\index.html`
     
205. File `/oname=$PLUGINSDIR\loading_pic1.bmp` `images\loading_pic1.bmp`
     
206. File `/oname=$PLUGINSDIR\loading_pic2.bmp` `images\loading_pic2.bmp`
     
207. File `/oname=$PLUGINSDIR\loading_pic3.bmp` `images\loading_pic3.bmp`
     
208. File `/oname=$PLUGINSDIR\loading_pic4.bmp` `images\loading_pic4.bmp`
     
209. File `/oname=$PLUGINSDIR\license.rtf` `license\license.rtf`
     
210. File `/oname=$PLUGINSDIR\License.html` `images\License.html`
     
211. ;背景图片
     
212. File `/ONAME=$PLUGINSDIR\bg.bmp` `images\bg.bmp`
     
213. ;顶部图片
     
214. File `/ONAME=$PLUGINSDIR\welcome.bmp` `images\welcome.bmp`
     
215. File `/ONAME=$PLUGINSDIR\a.png` `images\a.png`
     
216. ;关闭按钮
     
217. File `/oname=$PLUGINSDIR\btn_close.bmp` `images\btn_close.bmp`
     
218. ;立即安装的图片
     
219. File `/oname=$PLUGINSDIR\btn_install.bmp` `images\btn_install.bmp`
     
220. ;退出的背景图片
     
221. File `/ONAME=$PLUGINSDIR\quit.bmp` `images\quit.bmp`
     
222. ;改变路径的按钮图片
     
223. File `/oname=$PLUGINSDIR\btn_agreement1.bmp` `images\btn_agreement1.bmp`
     
224. File `/oname=$PLUGINSDIR\btn_agreement2.bmp` `images\btn_agreement2.bmp`
     
225. File `/oname=$PLUGINSDIR\checkbox1.bmp` `images\checkbox1.bmp`
     
226. File `/oname=$PLUGINSDIR\checkbox2.bmp` `images\checkbox2.bmp`
     
227. ;安装界面的图片
     
228. File `/oname=$PLUGINSDIR\installation.bmp` `images\installation.bmp`
     
229. File `/oname=$PLUGINSDIR\loading1.bmp` `images\loading1.bmp`
     
230. File `/oname=$PLUGINSDIR\loading2.bmp` `images\loading2.bmp`
     
231. #更改路径的界面
     
232. File `/oname=$PLUGINSDIR\btn_change.bmp` `images\btn_change.bmp`
     
233. #安装完成界面
     
234. File `/oname=$PLUGINSDIR\bg_finish.bmp` `images\bg_finish.bmp`  ;安装完成的背景图片
     
235. File `/oname=$PLUGINSDIR\btn_complete.bmp` `images\btn_complete.bmp`
     
236. 
     
237. SkinBtn::Init "$PLUGINSDIR\btn_install.bmp"
     
238. SkinBtn::Init "$PLUGINSDIR\btn_close.bmp"
     
239. SkinBtn::Init "$PLUGINSDIR\btn_quit.bmp"
     
240. SkinBtn::Init "$PLUGINSDIR\btn_cancel.bmp"
     
241. SkinBtn::Init "$PLUGINSDIR\btn_agreement1.bmp"
     
242. SkinBtn::Init "$PLUGINSDIR\btn_agreement2.bmp"
     
243. SkinBtn::Init "$PLUGINSDIR\checkbox1.bmp"
     
244. SkinBtn::Init "$PLUGINSDIR\checkbox2.bmp"
     
245. SkinBtn::Init "$PLUGINSDIR\btn_change.bmp"
     
246. SkinBtn::Init "$PLUGINSDIR\btn_complete.bmp"
     
247. 
     
248. FunctionEnd
     
249. 
     
250. ;初始化的函数
     
251. Function onGUIInit
     
252. ;消除边框
     
253. System::Call `user32::SetWindowLong(i$HWNDPARENT,i${GWL_STYLE},0x9480084C)i.R0`
     
254. ;隐藏一些既有控件
     
255. GetDlgItem $0 $HWNDPARENT 1034
     
256. ShowWindow $0 ${SW_HIDE}
     
257. GetDlgItem $0 $HWNDPARENT 1035
     
258. ShowWindow $0 ${SW_HIDE}
     
259. GetDlgItem $0 $HWNDPARENT 1036
     
260. ShowWindow $0 ${SW_HIDE}
     
261. GetDlgItem $0 $HWNDPARENT 1037
     
262. ShowWindow $0 ${SW_HIDE}
     
263. GetDlgItem $0 $HWNDPARENT 1038
     
264. ShowWindow $0 ${SW_HIDE}
     
265. GetDlgItem $0 $HWNDPARENT 1039
     
266. ShowWindow $0 ${SW_HIDE}
     
267. GetDlgItem $0 $HWNDPARENT 1256
     
268. ShowWindow $0 ${SW_HIDE}
     
269. GetDlgItem $0 $HWNDPARENT 1028
     
270. ShowWindow $0 ${SW_HIDE}
     
271. FunctionEnd
     
272. 
     
273. ;处理无边框移动
     
274. Function onGUICallback
     
275. ${If} $MSG = ${WM_LBUTTONDOWN}
     
276. SendMessage $HWNDPARENT ${WM_NCLBUTTONDOWN} ${HTCAPTION} $0
     
277. ${EndIf}
     
278. FunctionEnd
     
279. 
     
280. Function onWarningGUICallback
     
281. ${If} $MSG = ${WM_LBUTTONDOWN}
     
282. SendMessage $WarningForm ${WM_NCLBUTTONDOWN} ${HTCAPTION} $0
     
283. ${EndIf}
     
284. FunctionEnd
     
285. 
     
286. ;关闭函数
     
287. Function SkinBtn_Close
     
288. SkinBtn::Set /IMGID=$PLUGINSDIR\btn_close.bmp $1
     
289. FunctionEnd
     
290. 
     
291. ;安装的函数
     
292. Function SkinBtn_Install
     
293. SkinBtn::Set /IMGID=$PLUGINSDIR\btn_install.bmp $1
     
294. FunctionEnd
     
295. 
     
296. ;取消
     
297. Function SkinBtn_Cancel
     
298. SkinBtn::Set /IMGID=$PLUGINSDIR\btn_cancel.bmp $1
     
299. FunctionEnd
     
300. 
     
301. ;退出
     
302. Function SkinBtn_Quit
     
303. SkinBtn::Set /IMGID=$PLUGINSDIR\btn_quit.bmp $1
     
304. FunctionEnd
     
305. 
     
306. ;改变路径的按钮
     
307. Function SkinBtn_Modify
     
308. SkinBtn::Set /IMGID=$PLUGINSDIR\btn_agreement1.bmp $1
     
309. FunctionEnd
     
310. ;checkBox
     
311. Function SkinBtn_Checked
     
312. SkinBtn::Set /IMGID=$PLUGINSDIR\checkbox2.bmp $1
     
313. FunctionEnd
     
314. 
     
315. Function SkinBtn_UnChecked
     
316. SkinBtn::Set /IMGID=$PLUGINSDIR\checkbox1.bmp $1
     
317. FunctionEnd
     
318. 
     
319. Function SkinBtn_HtmlLicense
     
320. SkinBtn::Set /IMGID=$PLUGINSDIR\btn_agreement2.bmp $1
     
321. FunctionEnd
     
322. 
     
323. #更改路径页面
     
324. ;浏览按钮
     
325. Function SkinBtn_Browser
     
326. SkinBtn::Set /IMGID=$PLUGINSDIR\btn_change.bmp $1
     
327. FunctionEnd
     
328. 
     
329. ;返回前一页的按钮
     
330. Function SkinBtn_BackPath
     
331. SkinBtn::Set /IMGID=$PLUGINSDIR\btn_agreement1.bmp $1
     
332. FunctionEnd
     
333. 
     
334. #安装完成页面
     
335. Function SkinBtn_Finish
     
336. SkinBtn::Set /IMGID=$PLUGINSDIR\btn_complete.bmp $1
     
337. FunctionEnd
     
338. 
     
339. ############################################欢迎页面中的事件############################################
     
340. ;点击许可协议的按钮
     
341. Function onClickHtmlLicense
     
342. ;MessageBox MB_OK '两个都为空!'
     
343. ExecShell open "$PLUGINSDIR\License.html"
     
344. FunctionEnd
     
345. 
     
346. ;点击checkBox同意协议与不同意协议时的处理事件
     
347. Function OnClick_CheckAgreeLicense
     
348. ${IF} $Bool_AgreeLicense == 1
     
349. IntOp $Bool_AgreeLicense $Bool_AgreeLicense - 1
     
350. StrCpy $1 $Ck_AgreeLicense
     
351. Call SkinBtn_UnChecked
     
352. EnableWindow $Btn_Install 0 ;是否显示按钮
     
353. ${ELSE}
     
354. IntOp $Bool_AgreeLicense $Bool_AgreeLicense + 1
     
355. StrCpy $1 $Ck_AgreeLicense
     
356. Call SkinBtn_Checked
     
357. EnableWindow $Btn_Install 1
     
358. ${EndIf}
     
359. FunctionEnd
     
360. 
     
361. ;点击修改路径按钮的事件，跳转到修改路径的页面
     
362. Function OnClick_Modify
     
363. StrCpy $R9 1 ;Goto the next page
     
364. ;执行下一个页面
     
365. Call RelGotoPage
     
366. Abort   ;修改的地方
     
367. FunctionEnd
     
368. 
     
369. ;点击右上角关闭按钮
     
370. Function onClickClose
     
371. #关闭窗体的方法一：
     
372. FindProcDLL::FindProc "pkpm.exe"
     
373. Sleep 10
     
374. Pop $R0
     
375. ${If} $R0 != 0
     
376. KillProcDLL::KillProc "pkpm.exe"
     
377. ${EndIf}
     
378. #关闭窗体的方法二：
     
379. ;SendMessage $hwndparent ${WM_CLOSE} 0 0
     
380. FunctionEnd
     
381. 
     
382. ;点击关闭按钮响应的函数
     
383. Function onClose
     
384. Call onClickClose ;点击关闭响应的事件
     
385. FunctionEnd
     
386. 
     
387. ############################################安装页面中的事件############################################
     
388. 
     
389. ;安装界面的函数
     
390. Function NSD_TimerFun
     
391. GetFunctionAddress $0 NSD_TimerFun
     
392. nsDialogs::KillTimer $0
     
393. !if 1   ;是否在后台运行,1有效
     
394. GetFunctionAddress $0 DiskFrameWorkSpaceCheck
     
395. BgWorker::CallAndWait
     
396. !else
     
397. Call DiskFrameWorkSpaceCheck   ;调用背景图片
     
398. !endif
     
399. FunctionEnd
     
400. 
     
401. ;点击安装按钮的事件,进入到安装界面
     
402. Function OnClick_Install
     
403. StrCpy $R9 2 ;Goto the next page
     
404. ;执行下一个页面
     
405. Call RelGotoPage
     
406. Abort
     
407. FunctionEnd
     
408. 
     
409. ;跳转下一个页面的函数
     
410. Function RelGotoPage
     
411. IntCmp $R9 0 0 Move Move
     
412. StrCmp $R9 "X" 0 Move
     
413. StrCpy $R9 "120"
     
414. Move:
     
415. SendMessage $HWNDPARENT "0x408" "$R9" ""
     
416. FunctionEnd
     
417. 
     
418. #############################更改路径页面的事件###########################################
     
419. #磁盘检查
     
420. Function DiskFrameWorkSpaceCheck
     
421. StrCpy $2 $INSTDIR 3
     
422. ${DriveSpace}  "$2" "/D=F /S=M" $R0
     
423. ReadRegStr $8 HKLM 'Hardware\Description\System\CentralProcessor\0' Identifier
     
424. StrCpy $9 $8 3
     
425. ${If} $9 == 'x86'
     
426. ${If} $R0 < 90
     
427. MessageBox MB_ICONINFORMATION|MB_OK "安装空间不够"
     
428. Abort
     
429. ;Call onClickClose ;点击关闭响应的事件
     
430. ${EndIf}
     
431. ${Else}
     
432. ${If} $R0 < 610
     
433. MessageBox MB_ICONINFORMATION|MB_OK "安装空间不够"
     
434. ;Call onClickClose ;点击关闭响应的事件
     
435. Abort
     
436. ${EndIf}
     
437. ${EndIf}
     
438. FunctionEnd
     
439. 
     
440. ;主程序小于50mb判断
     
441. Function DiskProgramSpaceCheck
     
442. StrCpy $2 $INSTDIR 3
     
443. ${DriveSpace}  "$2" "/D=F /S=M" $R0
     
444. ${If} $R0 < 10
     
445. MessageBox MB_ICONINFORMATION|MB_OK "主程序安装空间不够"
     
446. Abort
     
447. ${EndIf}
     
448. FunctionEnd
     
449. 
     
450. ;改变安装的路径
     
451. Function OnChange_DirRequest
     
452. ${NSD_GetText} $Txt_Browser $6   ;获取控件文本状态，这里是指安装目录框的文字，也就是安装路径。
     
453. StrCpy $INSTDIR $6  ;将值赋予常量
     
454. ${GetRoot} "$INSTDIR" $R3   ;获取安装根目录
     
455. StrCpy $R0 "$R3"
     
456. StrCpy $R1 "invalid"
     
457. ${GetDrives} "ALL" "HDDDetection"            ;获取将要安装的根目录磁盘类型
     
458. FunctionEnd
     
459. 
     
460. Function HDDDetection
     
461. ${if} $R0 == $9    ;$9是盘符;$8是属性
     
462. StrCpy $R1 $8
     
463. ${endif}
     
464. Push $0
     
465. FunctionEnd
     
466. 
     
467. ;点击浏览按钮的事件
     
468. Function OnClick_BrowseButton
     
469. Pop $0
     
470. Push $INSTDIR ; input string "C:\Program Files\ProgramName"
     
471. Call GetParent
     
472. Pop $R0 ; first part "C:\Program Files"
     
473. 
     
474. Push $INSTDIR ; input string "C:\Program Files\ProgramName"
     
475. Push "" ; input chop char
     
476. Call GetLastPart
     
477. Pop $R1 ; last part "ProgramName"
     
478. 
     
479. nsDialogs::SelectFolderDialog "请选择 $R0 安装的文件夹:" "$R0"
     
480. Pop $0
     
481. ${If} $0 == "error" # returns 'error' if 'cancel' was pressed?
     
482. Return
     
483. ${EndIf}
     
484. ${If} $0 != ""
     
485. StrCpy $INSTDIR "$0\$R1"
     
486. system::Call `user32::SetWindowText(i $Txt_Browser, t "$INSTDIR")`
     
487. ${EndIf}
     
488. FunctionEnd
     
489. 
     
490. ;得到选中目录用于拼接安装程序名称
     
491. Function GetParent
     
492. Exch $R0 ; input string
     
493. Push $R1
     
494. Push $R2
     
495. Push $R3
     
496. StrCpy $R1 0
     
497. StrLen $R2 $R0
     
498. loop:
     
499. IntOp $R1 $R1 + 1
     
500. IntCmp $R1 $R2 get 0 get
     
501. StrCpy $R3 $R0 1 -$R1
     
502. StrCmp $R3 "" get
     
503. Goto loop
     
504. get:
     
505. StrCpy $R0 $R0 -$R1
     
506. Pop $R3
     
507. Pop $R2
     
508. Pop $R1
     
509. Exch $R0 ; output string
     
510. FunctionEnd
     
511. 
     
512. ;截取选中目录
     
513. Function GetLastPart
     
514. Exch $0 ; chop char
     
515. Exch
     
516. Exch $1 ; input string
     
517. Push $2
     
518. Push $3
     
519. StrCpy $2 0
     
520. loop:
     
521. IntOp $2 $2 - 1
     
522. StrCpy $3 $1 1 $2
     
523. StrCmp $3 "" 0 +3
     
524. StrCpy $0 ""
     
525. Goto exit2
     
526. StrCmp $3 $0 exit1
     
527. Goto loop
     
528. exit1:
     
529. IntOp $2 $2 + 1
     
530. StrCpy $0 $1 "" $2
     
531. exit2:
     
532. Pop $3
     
533. Pop $2
     
534. Pop $1
     
535. Exch $0 ; output string
     
536. FunctionEnd
     
537. 
     
538. ;跳转前一页面的事件
     
539. Function OnClick_BackPath
     
540. StrCpy $R9 -1 ;Goto the next page
     
541. ;执行下一个页面
     
542. Call RelGotoPage
     
543. Abort
     
544. FunctionEnd
     
545. 
     
546. ;执行安装界面的事件
     
547. Function OnClick_Install1
     
548. Call DiskFrameWorkSpaceCheck ;检查磁盘的空间
     
549. StrCpy $R9 1 ;Goto the next page
     
550. ;执行下一个页面
     
551. Call RelGotoPage
     
552. Abort
     
553. FunctionEnd
     
554. #################################安装完成############################################
     
555. ;点击checkBox桌面快捷方式的处理事件
     
556. Function OnClick_CheckDesktopShortCut
     
557. ${IF} $Bool_DesktopShortCut == 1
     
558. IntOp $Bool_DesktopShortCut $Bool_DesktopShortCut - 1
     
559. StrCpy $1 $Ck_DesktopShortCut
     
560. Call SkinBtn_UnChecked
     
561. ;EnableWindow $Btn_Install 0 ;是否显示按钮
     
562. ${ELSE}
     
563. IntOp $Bool_DesktopShortCut $Bool_DesktopShortCut + 1
     
564. StrCpy $1 $Ck_DesktopShortCut
     
565. Call SkinBtn_Checked
     
566. ;EnableWindow $Btn_Install 1
     
567. ${EndIf}
     
568. FunctionEnd
     
569. 
     
570. ;点击checkBox桌面任务栏快捷方式的处理事件
     
571. Function OnClick_taskbarpin
     
572. ${IF} $Bool_taskbarpin == 1
     
573. IntOp $Bool_taskbarpin $Bool_taskbarpin - 1
     
574. StrCpy $1 $Ck_taskbarpin
     
575. Call SkinBtn_UnChecked
     
576. ${ELSE}
     
577. IntOp $Bool_taskbarpin $Bool_taskbarpin + 1
     
578. StrCpy $1 $Ck_taskbarpin
     
579. Call SkinBtn_Checked
     
580. ${EndIf}
     
581. FunctionEnd
     
582. 
     
583. Function OnClick_Finish
     
584. ;当选择了生成快捷方式的combox的选择框时
     
585. ${If} $Bool_taskbarpin == 1
     
586. ${AndIf} $Bool_DesktopShortCut == 1
     
587. ;生成桌面的快捷方式
     
588. CreateShortCut "$DESKTOP\Electron.lnk" "$INSTDIR\Electron.exe"
     
589. ;生成任务栏的快捷方式
     
590. ExecShell "taskbarpin" "$DESKTOP\Electron.lnk"
     
591. ${ElseIf} $Bool_taskbarpin == 1
     
592. ;生成安装目录的快捷方式
     
593. CreateShortCut "$INSTDIR\Electron.lnk" "$INSTDIR\Electron.exe"
     
594. ;创建任务栏快捷方式
     
595. ExecShell "taskbarpin" "$DESKTOP\Electron.lnk"
     
596. ${ElseIf} $Bool_DesktopShortCut == 1
     
597. ;生成桌面的快捷方式
     
598. CreateShortCut "$DESKTOP\Electron.lnk" "$INSTDIR\Electron.exe"
     
599. ${Else}
     
600. ${EndIf}
     
601. Call onClickClose ;点击关闭响应的事件
     
602. FunctionEnd
     
603. 
     
604. ##################################################################################################################
     
605. #########################################自定义的欢迎页面#########################################################
     
606. ##################################################################################################################
     
607. 
     
608. ;自定义的欢迎页面 （如果此页面为空，则会调用原来的默认的页面）
     
609. Function WelcomePage
     
610. GetDlgItem $0 $HWNDPARENT 1
     
611. ShowWindow $0 ${SW_HIDE}
     
612. GetDlgItem $0 $HWNDPARENT 2
     
613. ShowWindow $0 ${SW_HIDE}
     
614. GetDlgItem $0 $HWNDPARENT 3
     
615. ShowWindow $0 ${SW_HIDE}
     
616. ;初始化的定义一个窗口
     
617. nsDialogs::Create 1044
     
618. Pop $0
     
619. ${If} $0 == error
     
620. Abort
     
621. ${EndIf}
     
622. SetCtlColors $0 ""  transparent ;背景设成透明
     
623. ;加入头文件"nsWindows.nsh"
     
624. ${NSW_SetWindowSize} $HWNDPARENT 508 296 ;改变窗体大小
     
625. ${NSW_SetWindowSize} $0 508 296 ;改变Page大小
     
626. 
     
627. ;关闭按钮
     
628. ${NSD_CreateButton} 490 5 15 15 ""
     
629. Pop $Btn_Close
     
630. StrCpy $1 $Btn_Close
     
631. Call SkinBtn_Close
     
632. GetFunctionAddress $3 onClose
     
633. SkinBtn::onClick $1 $3
     
634. 
     
635. ;立即安装的按钮
     
636. ;${NSD_CreateButton} 240 260 88 25 ""
     
637. ${NSD_CreateButton} 183 225 153 39 ""
     
638. Pop $Btn_Install
     
639. StrCpy $1 $Btn_Install
     
640. Call SkinBtn_Install
     
641. EnableWindow $Btn_Install 1
     
642. ;定义的一个Bool值，用于是否显示
     
643. ;StrCpy $Bool_Install 1
     
644. GetFunctionAddress $3 OnClick_Install
     
645. SkinBtn::onClick $1 $3
     
646. 
     
647. ;右下方更改安装路径的控件使用
     
648. ${NSD_CreateButton} 400 280 95 15 ""
     
649. Pop $Btn_LoadPath
     
650. StrCpy $1 $Btn_LoadPath
     
651. Call SkinBtn_Modify
     
652. GetFunctionAddress $3 OnClick_Modify
     
653. SkinBtn::onClick $1 $3
     
654. 
     
655. ;CheckBox选中项
     
656. ${NSD_CreateButton} 23 280 15 15 ""
     
657. Pop $Ck_AgreeLicense
     
658. StrCpy $1 $Ck_AgreeLicense
     
659. Call SkinBtn_Checked
     
660. GetFunctionAddress $3 OnClick_CheckAgreeLicense
     
661. SkinBtn::onClick $1 $3
     
662. StrCpy $Bool_AgreeLicense 1
     
663. ${NSD_CreateLabel} 43 280 100 15 "我已阅读并同意"
     
664. Pop $Lbl_AgreeLicense
     
665. SetCtlColors $Lbl_AgreeLicense ""  transparent ;背景设成透明
     
666. 
     
667. ;checkBox按钮右侧的许可协议按钮，点击这个按钮可以打开html连接，显示网页的效果
     
668. ${NSD_CreateButton} 130 280 100 15 ""
     
669. Pop $Btn_LoadPath
     
670. StrCpy $1 $Btn_LoadPath
     
671. Call SkinBtn_HtmlLicense
     
672. GetFunctionAddress $3 onClickHtmlLicense
     
673. SkinBtn::onClick $1 $3
     
674. 
     
675. ;界面的上方图片
     
676. ${NSD_CreateBitmap} 0 0 520 230 ""
     
677. Pop $TopImage
     
678. ${NSD_SetImage} $TopImage $PLUGINSDIR\welcome.bmp $ImageHandle
     
679. 
     
680. ;贴背景大图
     
681. ${NSD_CreateBitmap} 0 0 100% 100% ""
     
682. Pop $BGImage
     
683. ${NSD_SetImage} $BGImage $PLUGINSDIR\bg.bmp $ImageHandle
     
684. 
     
685. GetFunctionAddress $0 onGUICallback
     
686. WndProc::onCallback $BGImage $0 ;处理无边框窗体移动
     
687. nsDialogs::Show
     
688. ${NSD_FreeImage} $ImageHandle
     
689. 
     
690. ;当加上以下的代码后，背景图片以及界面的上方图片显示出来
     
691. GetFunctionAddress $0 onGUICallback
     
692. WndProc::onCallback $BGImage $0 ;处理无边框窗体移动
     
693. nsDialogs::Show
     
694. ;释放背景图片的语句
     
695. ${NSD_FreeImage} $ImageHandle
     
696. FunctionEnd
     
697. 
     
698. Function Callback
     
699. ;Call OnCancelInstall
     
700. Pop $R8
     
701. Pop $R9
     
702. System::Int64Op $R8 * 100
     
703. Pop $R0
     
704. System::Int64Op $R0 / $R9
     
705. Pop $R3
     
706. SendMessage $8 ${PBM_SETPOS} $R3 0
     
707. ${NSD_SetText} $9 "已经安装$R3%"
     
708. ${if} $R8 = $R9
     
709. ${NSD_SetText} $9 "安装完成"
     
710. #由于计算方式的四舍五入特性，进度条到安装完成时会有字节级别的误差，此处消除。
     
711. SendMessage $8 ${PBM_SETPOS} 100 0
     
712. System::Call "user32::InvalidateRect(i$hwndparent,i0,i 1)"
     
713. ;MessageBox MB_OK "停止运行程序2！"
     
714. ${endif}
     
715. FunctionEnd
     
716. 
     
717. Function .onRebootFailed
     
718. MessageBox MB_OK|MB_ICONSTOP "安装失败，请重新安装。" /SD IDOK
     
719. #当程序运行失败的时候，调用这个方法，删除生成的目录文件
     
720. Call OnCancelInstall
     
721. FunctionEnd
     
722. 
     
723. Function OnDialogTimer
     
724. ${NSD_KillTimer} OnDialogTimer
     
725. SendMessage $8 ${PBM_SETRANGE32} 1 100      ;设置区间
     
726. GetFunctionAddress $0 Extractfunc
     
727. ;MessageBox MB_OK "停止运行111111111111111111112！"
     
728. BgWorker::CallAndWait #启动一个低优先级的后台线程
     
729. ;MessageBox MB_OK "停止运行111111111111111111111！"
     
730. FunctionEnd
     
731. 
     
732. Function Extractfunc
     
733. SetOutPath $INSTDIR
     
734. MessageBox MB_OK "$INSTDIR"
     
735. /*
     
736. 该命令设置了由 File 命令使用的覆盖标记来决定目标文件已存在时是否覆盖。如果覆盖标记为 on，则目标文件被覆盖 (这个是默认值)。
     
737. 如果覆盖标记为 off，则已存在的文件不会被覆盖。如果覆盖标记为 try，文件仅当可以被覆盖时 (就是说假如文件不能写入，它会自动略过而不需要用户决定) 才会覆盖目标文件。
     
738. 如果覆盖标记为 ifnewer，则仅当已存在的文件比新文件旧时才会覆盖目标文件。如果覆盖标记为 ifdiff，则仅当已存在的文件比新文件旧或新时才会覆盖目标文件。
     
739. 注意在 ifnewer 或 ifdiff 模式下，目标文件的日期都会被设为新文件的日期，而不管 SetDateSave 是怎么设置的。
     
740. */
     
741. SetOverwrite ifnewer
     
742. File "Main.7z"
     
743. GetFunctionAddress $R9 Callback
     
744. MessageBox MB_OK "停止运行111111111111111111113！"
     
745. Nsis7z::ExtractWithCallback  "Main.7z" $R9  ;必须使用这一句
     
746. /*
     
747. WriteUninstaller "$INSTDIR\uninst.exe"  ;生成卸载exe，自动调用section Uninstall
     
748. WriteRegStr HKLM "$PRODUCT_INSTALL_KEY" "InstallDir" "$INSTDIR"
     
749. WriteRegStr HKLM "$PRODUCT_UNINST_KEY" "Version" "${PRODUCT_VERSION}"
     
750. ;WriteRegStr HKLM "$PRODUCT_INSTALL_KEY" "Version" "$PRODUCT_VERSION_NAME"
     
751. WriteRegStr HKLM "$PRODUCT_UNINST_KEY" "DisplayName" "$(^Name)"
     
752. WriteRegStr HKLM "$PRODUCT_UNINST_KEY" "UninstallString" "$INSTDIR\uninst.exe"
     
753. WriteRegStr HKLM "$PRODUCT_UNINST_KEY" "DisplayIcon" "$INSTDIR\$PRODUCT_NAMEEXE"
     
754. WriteRegStr HKLM "$PRODUCT_UNINST_KEY" "DisplayVersion" "$PRODUCT_VERSION_NAME"
     
755. Delete "$OUTDIR\$PRODUCT_OUTFILE_MAIN7z"
     
756. */
     
757. WriteUninstaller "$INSTDIR\uninst.exe"  ;生成卸载exe，自动调用section Uninstall
     
758. WriteRegStr HKLM "${PRODUCT_INSTALL_KEY}" "Version" "${PRODUCT_VERSION}"   ; 根键 子键 项 值
     
759. 
     
760. ;MessageBox MB_OK "停止运行程序！"
     
761. #跳到下一个界面
     
762. StrCpy $R9 1 ;Goto the next page
     
763. Call RelGotoPage
     
764. 
     
765. ;MessageBox MB_OK "停止运行程序1！"
     
766. FunctionEnd
     
767. 
     
768. ##################################################################################################################
     
769. #########################################自定义的加载页面#########################################################555555555555555555555555555555555555555555555555555
     
770. ##################################################################################################################
     
771. Function LoadingPage
     
772. GetDlgItem $0 $HWNDPARENT 1
     
773. ShowWindow $0 ${SW_HIDE}
     
774. GetDlgItem $0 $HWNDPARENT 2
     
775. ShowWindow $0 ${SW_HIDE}
     
776. GetDlgItem $0 $HWNDPARENT 3
     
777. ShowWindow $0 ${SW_HIDE}
     
778. 
     
779. nsDialogs::Create 1044
     
780. Pop $0
     
781. ${If} $0 == error
     
782. Abort
     
783. ${EndIf}
     
784. SetCtlColors $0 ""  transparent ;背景设成透明
     
785. ${NSW_SetWindowSize} $HWNDPARENT 509 330 ;改变自定义窗体大小
     
786. ${NSW_SetWindowSize} $0 509 330 ;改变自定义Page大小
     
787. 
     
788. ;创建背景图片的切换动态
     
789. System::Call `*(i,i,i,i)i(1,34,518,200).R0`
     
790. System::Call `user32::MapDialogRect(i$HWNDPARENT,iR0)`
     
791. System::Call `*$R0(i.s,i.s,i.s,i.s)`
     
792. System::Free $R0
     
793. FindWindow $R0 "#32770" "" $HWNDPARENT
     
794. System::Call `user32::CreateWindowEx(i,t"STATIC",in,i${DEFAULT_STYLES}|${SS_BLACKRECT},i1,i34,i518,i200,iR0,i1100,in,in)i.R0`
     
795. StrCpy $WebImg $R0
     
796. MessageBox MB_OK "确定安装？"  #因为动态图片加载的过程中需要时间缓冲，因此加上这个进行缓冲处理
     
797. WebCtrl::ShowWebInCtrl $WebImg "$PLUGINSDIR/index.html"
     
798. 
     
799. ;创建简要说明
     
800. Pop $0
     
801. ${NSD_CreateLabel} 40 243 100 20 "开始安装..."
     
802. Pop $9
     
803. 
     
804. ;进度条的创建
     
805. ${NSD_CreateProgressBar} 24 265 460 20 ""
     
806. SkinProgress::Set $PB_ProgressBar "$PLUGINSDIR\loading2.bmp" "$PLUGINSDIR\loading1.bmp"
     
807. Pop $8
     
808. ${NSD_CreateTimer} OnDialogTimer  100
     
809. 
     
810. ;关闭按钮
     
811. ${NSD_CreateButton} 490 5 15 15 ""
     
812. Pop $Btn_LoadingPage_Close
     
813. StrCpy $1 $Btn_LoadingPage_Close
     
814. Call SkinBtn_Close
     
815. EnableWindow $Btn_LoadingPage_Close 0
     
816. 
     
817. ;贴背景大图
     
818. ${NSD_CreateBitmap} 0 0 100% 100% ""
     
819. Pop $BGInstallImage
     
820. ${NSD_SetImage} $BGInstallImage $PLUGINSDIR\bg.bmp $ImageHandle
     
821. 
     
822. GetFunctionAddress $0 onGUICallback
     
823. WndProc::onCallback $BGInstallImage $0 ;处理无边框窗体移动
     
824. nsDialogs::Show
     
825. ${NSD_FreeImage} $ImageHandle
     
826. FunctionEnd
     
827. ##################################################################################################################
     
828. #########################################自定义的修改路径页面#####################################################
     
829. ##################################################################################################################
     
830. ;修改安装路径的页面
     
831. Function PathPage
     
832. GetDlgItem $0 $HWNDPARENT 1
     
833. ShowWindow $0 ${SW_HIDE}
     
834. GetDlgItem $0 $HWNDPARENT 2
     
835. ShowWindow $0 ${SW_HIDE}
     
836. GetDlgItem $0 $HWNDPARENT 3
     
837. ShowWindow $0 ${SW_HIDE}
     
838. nsDialogs::Create 1044
     
839. Pop $0
     
840. ${If} $0 == error
     
841. Abort
     
842. ${EndIf}
     
843. SetCtlColors $0 ""  transparent ;背景设成透明
     
844. 
     
845. ${NSW_SetWindowSize} $HWNDPARENT 509 330 ;改变自定义窗体大小
     
846. ${NSW_SetWindowSize} $0 509 330 ;改变自定义Page大小
     
847. 
     
848. ;更改目录的文本框
     
849. ${NSD_CreateDirRequest} 35 110 352 23 "$INSTDIR"
     
850. Pop $Txt_Browser
     
851. ${NSD_OnChange} $Txt_Browser OnChange_DirRequest
     
852. 
     
853. ;更改目录的按钮
     
854. ${NSD_CreateBrowseButton} 401 110 76 23 ""
     
855. Pop $Btn_Browser
     
856. StrCpy $1 $Btn_Browser
     
857. Call SkinBtn_Browser
     
858. GetFunctionAddress $3 OnClick_BrowseButton
     
859. SkinBtn::onClick $1 $3
     
860. 
     
861. ;左下角的返回按钮
     
862. ${NSD_CreateButton} 24 294 95 15 ""
     
863. Pop $Btn_BackPath
     
864. StrCpy $1 $Btn_BackPath
     
865. Call SkinBtn_BackPath
     
866. GetFunctionAddress $3 OnClick_BackPath
     
867. SkinBtn::onClick $1 $3
     
868. 
     
869. ;立即安装的按钮  首先判断是否同意安装，若不同意，此处的安装按钮便是灰色的，不可以点击；若同意，直接可以进行点击
     
870. ${NSD_CreateButton} 187 228 153 39 ""
     
871. Pop $Btn_Install
     
872. StrCpy $1 $Btn_Install
     
873. Call SkinBtn_Install
     
874. ${IF} $Bool_AgreeLicense == 0
     
875. EnableWindow $Btn_Install 0 ;否显示按钮
     
876. ${ELSE}
     
877. EnableWindow $Btn_Install1 1
     
878. GetFunctionAddress $3 OnClick_Install1
     
879. SkinBtn::onClick $1 $3
     
880. ${EndIf}
     
881. ;关闭按钮
     
882. ${NSD_CreateButton} 490 5 15 15 ""
     
883. Pop $Btn_PathPage_Close
     
884. StrCpy $1 $Btn_PathPage_Close
     
885. Call SkinBtn_Close
     
886. GetFunctionAddress $3 onClose
     
887. SkinBtn::onClick $1 $3
     
888. 
     
889. ;贴背景大图
     
890. ${NSD_CreateBitmap} 0 0 100% 100% ""
     
891. Pop $BGImage
     
892. ${NSD_SetImage} $BGImage $PLUGINSDIR\bg.bmp $ImageHandle
     
893. 
     
894. GetFunctionAddress $0 onGUICallback
     
895. WndProc::onCallback $BGImage $0 ;处理无边框窗体移动
     
896. nsDialogs::Show
     
897. ${NSD_FreeImage} $ImageHandle
     
898. FunctionEnd
     
899. 
     
900. ##################################################################################################################
     
901. #########################################自定义的安装完成页面#####################################################
     
902. ##################################################################################################################
     
903. Function FinishPage
     
904. GetDlgItem $0 $HWNDPARENT 1
     
905. ShowWindow $0 ${SW_HIDE}
     
906. GetDlgItem $0 $HWNDPARENT 2
     
907. ShowWindow $0 ${SW_HIDE}
     
908. GetDlgItem $0 $HWNDPARENT 3
     
909. ShowWindow $0 ${SW_HIDE}
     
910. nsDialogs::Create 1044
     
911. Pop $0
     
912. ${If} $0 == error
     
913. Abort
     
914. ${EndIf}
     
915. SetCtlColors $0 ""  transparent ;背景设成透明
     
916. ${NSW_SetWindowSize} $HWNDPARENT 509 330 ;改变自定义窗体大小
     
917. ${NSW_SetWindowSize} $0 509 330 ;改变自定义Page大小
     
918. 
     
919. ;关闭按钮
     
920. ${NSD_CreateButton} 490  5 15 15 ""
     
921. Pop $Btn_FinishPage_Close
     
922. StrCpy $1 $Btn_FinishPage_Close
     
923. Call SkinBtn_Close
     
924. EnableWindow $Btn_FinishPage_Close 0
     
925. ;界面的checkBox框（桌面快捷方式，任务栏快捷方式） taskbarpin   ShortCut
     
926. ${NSD_CreateButton} 202 120 15 15 ""
     
927. Pop $Ck_DesktopShortCut
     
928. StrCpy $1 $Ck_DesktopShortCut
     
929. Call SkinBtn_Checked
     
930. GetFunctionAddress $3 OnClick_CheckDesktopShortCut
     
931. SkinBtn::onClick $1 $3
     
932. StrCpy $Bool_DesktopShortCut 1
     
933. ${NSD_CreateLabel} 222 120 100 15 "创建桌面快捷方式"
     
934. Pop $Lbl_DesktopShortCut
     
935. SetCtlColors $Lbl_DesktopShortCut "" transparent ;背景设成透明
     
936. 
     
937. ${NSD_CreateButton} 202 162 15 15 ""
     
938. Pop $Ck_taskbarpin
     
939. StrCpy $1 $Ck_taskbarpin
     
940. Call SkinBtn_Checked
     
941. GetFunctionAddress $3 OnClick_taskbarpin
     
942. SkinBtn::onClick $1 $3
     
943. StrCpy $Bool_taskbarpin 1
     
944. ${NSD_CreateLabel} 222 162 100 15 "创建任务栏快捷方式"
     
945. Pop $Lbl_taskbarpin
     
946. SetCtlColors $Lbl_taskbarpin "" transparent ;背景设成透明
     
947. 
     
948. ;加载界面的完成按钮
     
949. ${NSD_CreateButton} 183 236 150 38 ""
     
950. Pop $Btn_Finish
     
951. StrCpy $1 $Btn_Finish
     
952. Call SkinBtn_Finish
     
953. GetFunctionAddress $3 OnClick_Finish
     
954. SkinBtn::onClick $1 $3
     
955. 
     
956. ;贴背景大图
     
957. ${NSD_CreateBitmap} 0 0 100% 100% ""
     
958. Pop $Bg_FinishImage
     
959. ${NSD_SetImage} $Bg_FinishImage $PLUGINSDIR\bg_finish.bmp $ImageHandle
     
960. GetFunctionAddress $0 onGUICallback
     
961. WndProc::onCallback $Bg_FinishImage $0 ;处理无边框窗体移动
     
962. nsDialogs::Show
     
963. ${NSD_FreeImage} $ImageHandle
     
964. FunctionEnd
     
965. 
     
966. #当程序运行失败的时候，调用这个方法，删除生成的目录文件
     
967. Function OnCancelInstall
     
968. RMDir "$SMPROGRAMS\pkpm"
     
969. RMDir /r "$INSTDIR"
     
970. ;关闭程序的事件
     
971. MessageBox MB_ICONSTOP "程序安装过程出现意外，请停止安装"
     
972. Call onClose
     
973. FunctionEnd
     
974. 
     
975. /******************************
     
976. *  以下是安装程序的卸载部分  *
     
977. ******************************/
     
978. 
     
979. Section Uninstall
     
980. ;删除任务栏快捷方式
     
981. ExecShell "taskbarunpin" "$DESKTOP\Electron.lnk"
     
982. ;删除桌面的快捷方式
     
983. Delete "$DESKTOP\Electron.lnk"
     
984. Delete "$INSTDIR\uninst.exe"   ; 删除自己
     
985. Delete "$SMPROGRAMS\pkpm\Uninstall.lnk"
     
986. RMDir "$SMPROGRAMS\pkpm"
     
987. ;RMDir "$INSTDIR"
     
988. RMDir /r "$INSTDIR"
     
989. ;DeleteRegKey HKLM "$PRODUCT_UNINST_KEY"
     
990. DeleteRegKey HKLM "${PRODUCT_INSTALL_KEY}"
     
991. SetAutoClose true
     
992. SectionEnd
     
993. 
     
994. #-- 根据 NSIS 脚本编辑规则，所有 Function 区段必须放置在 Section 区段之后编写，以避免安装程序出现未可预知的问题。--#
     
995. Function un.onInit
     
996. 
     
997. FindProcDLL::FindProc "Electron.exe"
     
998. Pop $R0
     
999. IntCmp $R0 1 0 no_run
     
1000. MessageBox MB_ICONSTOP "安装程序检测到 Electron.exe 正在运行，请退出程序后重试"
      
1001. Quit
      
1002. no_run:
      
1003. 
      
1004. ;Call IsProgramRunning   #检测程序是否正在运行
      
1005. MessageBox MB_ICONQUESTION|MB_YESNO|MB_DEFBUTTON2 "您确实要完全移除 $(^Name) ，及其所有的组件？" IDYES +2
      
1006. Abort
      
1007. 
      
1008. FunctionEnd
      
1009. 
      
1010. Function un.onUninstSuccess
      
1011. HideWindow
      
1012. MessageBox MB_ICONINFORMATION|MB_OK "$(^Name) 已成功地从您的计算机移除。"
      
1013. FunctionEnd
      
1014. 
      

复制代码