组件方式实现多目录安装

admin

1. ;自定义页面实现多个安装目录的脚本
   
2. 
   
3. !include "MUI.nsh"
   
4. 
   
5.   Name "Test App"
   
6.   OutFile "test.exe"
   
7. 
   
8.   !insertmacro MUI_PAGE_COMPONENTS
   
9.   Page custom SetCustom LeaveCustom
   
10.   !insertmacro MUI_PAGE_INSTFILES
    
11. 
    
12.   !insertmacro MUI_LANGUAGE "SimpChinese"
    
13. 
    
14. ;--------------------------------
    
15. 
    
16. Section "SectionA" SecA
    
17.   ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 4" State
    
18.   MessageBox MB_OK "SectionA 的安装路径为：$0"
    
19. SectionEnd
    
20. 
    
21. Section "SectionB" SecB
    
22.   ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 5" State
    
23.   MessageBox MB_OK "SectionB 的安装路径为：$0"
    
24. SectionEnd
    
25. 
    
26. Section "SectionC" SecC
    
27.   ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 6" State
    
28.   MessageBox MB_OK "SectionC 的安装路径为：$0"
    
29. SectionEnd
    
30. 
    
31. 
    
32. Function .Oninit
    
33.   InitPluginsDir
    
34.   File /oname=$PLUGINSDIR\test.ini ".\test.ini"
    
35. FunctionEnd
    
36. 
    
37. Function SetCustom
    
38. ; 判断勾选的组件，并把未勾选组件的安装路径控件设为不可用
    
39.   SectionGetFlags ${SecA} $0
    
40.   StrCmp $0 0 0 +2
    
41.     WriteINIStr "$PLUGINSDIR\test.ini" "Field 4" "Flags" "Disabled"
    
42.   StrCmp $0 1 0 +2    ; 如果组件勾选了，还需要去掉 Disabled，这两行代码不能省略
    
43.     WriteINIStr "$PLUGINSDIR\test.ini" "Field 4" "Flags" ""
    
44.    
    
45.   SectionGetFlags ${SecB} $0
    
46.   StrCmp $0 0 0 +2
    
47.     WriteINIStr "$PLUGINSDIR\test.ini" "Field 5" "Flags" "Disabled"
    
48.   StrCmp $0 1 0 +2
    
49.     WriteINIStr "$PLUGINSDIR\test.ini" "Field 5" "Flags" ""
    
50.    
    
51.   SectionGetFlags ${SecC} $0
    
52.   StrCmp $0 0 0 +2
    
53.     WriteINIStr "$PLUGINSDIR\test.ini" "Field 6" "Flags" "Disabled"
    
54.   StrCmp $0 1 0 +2
    
55.     WriteINIStr "$PLUGINSDIR\test.ini" "Field 6" "Flags" ""
    
56. 
    
57. ; 预定义组件安装路径
    
58.   WriteINIStr "$PLUGINSDIR\test.ini" "Field 4" "State" "$ProgramFiles"
    
59.   WriteINIStr "$PLUGINSDIR\test.ini" "Field 5" "State" "$DeskTop"
    
60.   WriteINIStr "$PLUGINSDIR\test.ini" "Field 6" "State" "$WinDir"
    
61. 
    
62.   InstallOptions::initDialog /NOUNLOAD "$PLUGINSDIR\test.ini"
    
63.   !insertmacro MUI_HEADER_TEXT "选择各组件的安装路径" "必须输入有效路径"
    
64.   InstallOptions::show
    
65.   Pop $R0
    
66. 
    
67. FunctionEnd
    
68. 
    
69. Function LeaveCustom
    
70. ; 判断用户输入的路径是否合法。
    
71. 
    
72.   ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 4" "State"
    
73.   StrCmp $0 "" 0 +3
    
74.   MessageBox MB_OK|MB_ICONSTOP "组件 A 的安装路径不能为空！"
    
75.   Abort
    
76.     IfFileExists "$0\*" +4
    
77.     MessageBox MB_YESNO|MB_ICONQUESTION "组件 A 的安装路径的安装目录不存在，是否创建该文件夹？" IDYES +2
    
78.     Abort
    
79.     CreateDirectory $0
    
80.       
    
81.   ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 5" "State"
    
82.   StrCmp $0 "" 0 +3
    
83.   MessageBox MB_OK|MB_ICONSTOP "组件 B 的安装路径不能为空！"
    
84.   Abort
    
85.     IfFileExists "$0\*" +4
    
86.     MessageBox MB_YESNO|MB_ICONQUESTION "组件 B 的安装路径的安装目录不存在，是否创建该文件夹？" IDYES +2
    
87.     Abort
    
88.     CreateDirectory $0
    
89. 
    
90.   ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 6" "State"
    
91.   StrCmp $0 "" 0 +3
    
92.   MessageBox MB_OK|MB_ICONSTOP "组件 C 的安装路径不能为空！"
    
93.   Abort
    
94.     IfFileExists "$0\*" +4
    
95.     MessageBox MB_YESNO|MB_ICONQUESTION "组件 C 的安装路径的安装目录不存在，是否创建该文件夹？" IDYES +2
    
96.     Abort
    
97.     CreateDirectory $0
    
98. FunctionEnd

复制代码