Inno Setup 迅雷安装脚本

Share

1. [Setup]
   
2. 
   
3. AppName=迅雷5
   
4. 
   
5. AppVerName=迅雷 5.7.2.371 DDR1.5 去广告版
   
6. 
   
7. DefaultDirName={pf}\Thunder\
   
8. 
   
9. DefaultGroupName=迅雷5
   
10. 
    
11. OutputBaseFilename=Thunder-ddr5.7.2.371Setup
    
12. 
    
13. Compression=lzma
    
14. 
    
15. SolidCompression=yes
    
16. 
    
17. WizardImageFile=embedded\WizardImage.bmp
    
18. 
    
19. WizardSmallImageFile=embedded\WizardSmallImage.bmp
    
20. 
    
21. AppMutex=thunder5_app_mutex
    
22. 
    
23. [Types]
    
24. 
    
25. Name: "default"; Description: "默认安装"
    
26. 
    
27. Name: "custom"; Description: "自定义安装"; Flags: iscustom
    
28. 
    
29. Name: "full"; Description: "完全安装"
    
30. 
    
31. [Components]
    
32. 
    
33. Name: "main"; Description: "迅雷5"; Types:default custom full; Flags: fixed
    
34. 
    
35. Name: "Plugins"; Description: "其他插件"; Types: full
    
36. 
    
37. Name: "Plugins\kankan"; Description: "迅雷看看"; Types: full
    
38. 
    
39. Name: "Plugins\gougou"; Description: "狗狗搜索排行"; Types: full
    
40. 
    
41. Name: "Plugins\tingting"; Description: "迅雷听听1.2"; Types: full
    
42. 
    
43. [Tasks]
    
44. 
    
45. Name: desktopicon; Description: "创建桌面快捷方式"; Flags: checkedonce
    
46. 
    
47. Name: associate; Description: "在开始菜单创建程序组";Flags: checkedonce
    
48. 
    
49. [Files]
    
50. 
    
51. ;主文件安装
    
52. 
    
53. Source: "pureThunder\*"; DestDir: "{app}"; Flags: recursesubdirs  createallsubdirs ignoreversion
    
54. 
    
55. ;配置文件安装
    
56. 
    
57. Source: "Profiles\*"; DestDir: "{app}\Profiles"; Flags:uninsneveruninstall onlyifdoesntexist
    
58. 
    
59. ;注册文件安装
    
60. 
    
61. Source: "comfile\*"; DestDir: "{app}\ComDlls"; Flags:ignoreversion regserver  restartreplace  uninsrestartdelete
    
62. 
    
63. ;迅雷看看安装
    
64. 
    
65. Source: "KanKan\files\*"; DestDir: "{app}\Components\KanKan"; Components: Plugins\kankan; Flags:ignoreversion
    
66. 
    
67. Source: "KanKan\regdll\*"; DestDir: "{app}\Components\KanKan"; Components: Plugins\kankan; Flags:ignoreversion regserver  restartreplace  uninsrestartdelete
    
68. 
    
69. ;狗狗搜索安装
    
70. 
    
71. Source: "plugins\GouGouTop\*"; DestDir: "{app}\plugins\GouGouTop";Components: Plugins\gougou; Flags: ignoreversion
    
72. 
    
73. ;听听安装
    
74. 
    
75. Source: "plugins\TingTing\*"; DestDir: "{app}\plugins\TingTing";Components: Plugins\tingting; Flags: ignoreversion
    
76. 
    
77. ;复制vc6运行库
    
78. 
    
79. Source: "msvcp60.dll"; DestDir:"{sys}"; Flags: onlyifdoesntexist uninsneveruninstall
    
80. 
    
81. [INI]
    
82. 
    
83. ;狗狗搜索插件信息写入
    
84. 
    
85. Filename: "{app}\Program\addins.ini"; Section: "{{1FC7CAC6-2DA8-4cb0-B440-C069956CC0CA}"; Key: "Name"; String: "狗狗搜索排行";Components: Plugins\gougou
    
86. 
    
87. Filename: "{app}\Program\addins.ini"; Section: "{{1FC7CAC6-2DA8-4cb0-B440-C069956CC0CA}"; Key: "File"; String: "..\Plugins\GouGouTop\GouGouTop.dll"  ;Components: Plugins\gougou
    
88. 
    
89. Filename: "{app}\Program\addins.ini"; Section: "{{1FC7CAC6-2DA8-4cb0-B440-C069956CC0CA}"; Key: "Enable"; String: "1" ;Components: Plugins\gougou
    
90. 
    
91. ;迅雷听听插件信息写入
    
92. 
    
93. Filename: "{app}\Program\addins.ini"; Section: "{{200A93B9-365D-4F4A-9C4F-57F645A7B9D2}"; Key: "Name"; String: "听听插件";Components: Plugins\tingting
    
94. 
    
95. Filename: "{app}\Program\addins.ini"; Section: "{{200A93B9-365D-4F4A-9C4F-57F645A7B9D2}"; Key: "File"; String: "..\Plugins\TingTing\TingTing.dll"  ;Components: Plugins\tingting
    
96. 
    
97. Filename: "{app}\Program\addins.ini"; Section: "{{200A93B9-365D-4F4A-9C4F-57F645A7B9D2}"; Key: "Enable"; String: "1" ;Components: Plugins\tingting
    
98. 
    
99. [Registry]
    
100. 
     
101. Root: HKLM; Subkey: "SOFTWARE\Thunder Network\ThunderOem\thunder_backwnd"; ValueName: "Path"; ValueType: String; ValueData: "{app}\Thunder.exe"; Flags: uninsdeletekey
     
102. 
     
103. Root: HKLM; Subkey: "SOFTWARE\Thunder Network\ThunderOem\thunder_backwnd"; ValueName: "Version"; ValueType: String; ValueData: "5.7.2.371"; Flags: uninsdeletekey
     
104. 
     
105. Root: HKCU; Subkey: "Software\Microsoft\Internet Explorer\MenuExt\使用迅雷下载全部链接"; ValueType: String; ValueData: "{app}\Program\GetAllUrl.htm"; Flags: uninsdeletevalue
     
106. 
     
107. Root: HKCU; Subkey: "Software\Microsoft\Internet Explorer\MenuExt\使用迅雷下载全部链接"; ValueName: "Contexts"; ValueType: dword; ValueData: 243; Flags: uninsdeletevalue
     
108. 
     
109. Root: HKCU; Subkey: "Software\Microsoft\Internet Explorer\MenuExt\使用迅雷下载"; ValueType: String; ValueData: "{app}\Program\GetUrl.htm"; Flags: uninsdeletevalue
     
110. 
     
111. Root: HKCU; Subkey: "Software\Microsoft\Internet Explorer\MenuExt\使用迅雷下载"; ValueName: "Contexts"; ValueType: dword; ValueData: 34; Flags: uninsdeletevalue
     
112. 
     
113. [Run]
     
114. 
     
115. Filename: "{app}\DDR迅雷设置中心.exe"; Description: "运行迅雷设置中心";
     
116. 
     
117. ;Filename: "{app}\Program\SetupHelper.exe"; Parameters: "/register_plugins";
     
118. 
     
119. ;Filename: "{app}\Program\SetupHelper.exe"; Parameters: "/open_firewall";
     
120. 
     
121. ;Filename: "{app}\Program\SetupHelper.exe"; Parameters: "/for_all_users";
     
122. 
     
123. [Icons]
     
124. 
     
125. Name: "{commondesktop}\迅雷";Filename: "{app}\Thunder.exe";Tasks:desktopicon
     
126. 
     
127. Name: "{group}\启动迅雷"; Filename: "{app}\Thunder.exe";Tasks:associate
     
128. 
     
129. Name: "{group}\DDR迅雷设置中心"; Filename: "{app}\DDR迅雷设置中心.exe";Tasks:associate
     
130. 
     
131. Name: "{group}\卸载迅雷"; Filename: "{uninstallexe}";Tasks:associate
     
132. 
     
133. ;[UninstallRun]
     
134. 
     
135. ;[UninstallDelete]
     
136. 
     
137. ;Type: filesandordirs ; Name: "{app}";
     
138. 
     
139. [Code]
     
140. 
     
141. procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
     
142. 
     
143. var
     
144. 
     
145.   DeleteProfile: string;
     
146. 
     
147.   DeleteConfirm: Boolean;
     
148. 
     
149. begin
     
150. 
     
151.   case CurUninstallStep of
     
152. 
     
153.     //卸载后的收尾工作
     
154. 
     
155.     usPostUninstall:
     
156. 
     
157.       begin
     
158. 
     
159.         // 确认是否删除整个目录
     
160. 
     
161.         DeleteProfile := ExpandConstant('{app}');
     
162. 
     
163.         DeleteConfirm :=MsgBox('是否保留用户配置文件与历史记录?', mbConfirmation, MB_YESNO) = idYes;
     
164. 
     
165.         if DeleteConfirm=False then
     
166. 
     
167.             DelTree(DeleteProfile, True, True, True);
     
168. 
     
169.         if DeleteConfirm=True then
     
170. 
     
171.             DelTree(DeleteProfile+'\Program',True,True,True);
     
172. 
     
173.       end;
     
174. 
     
175.   end;
     
176. 
     
177. end;

复制代码