[任务10]安装脚本的制作

firendless

下载了一个月光奏鸣曲的安装包，解包后得到INNO脚本，贴上来，或许有用
. Z  g# L: g, v! y, a# i) K! ^
在发一个私人用的脚本

1. ; 脚本由 Inno Setup 脚本向导 生成！
2. ; 有关创建 Inno Setup 脚本文件的详细资料请查阅帮助文档！
4. [Setup]
5. ; 注意: AppId 值用于唯一识别该应用程序。
6. ; 禁止对其他应用程序的安装器使用相同的 AppId 值！
7. ; (若要生成一个新的 GUID，请选择“工具 | 生成 GUID”。)
8. AppId={{E197DE61-1EFE-4468-97C5-167416ACB14E}
9. AppName=电脑锁定助手
10. AppVerName=电脑锁定助手 2.2.0.0
11. AppPublisher=花好月圆[[url]www.promiseforever.com[/url]]
12. AppPublisherURL=http://www.promiseforever.com/
13. AppSupportURL=http://www.promiseforever.com/
14. AppUpdatesURL=http://www.promiseforever.com/
15. DefaultDirName={pf}\电脑锁定助手
16. DefaultGroupName=电脑锁定助手
17. AllowNoIcons=yes
18. LicenseFile=C:\电脑锁定助手\Docs\license.txt
19. InfoBeforeFile=C:\电脑锁定助手\Docs\history.txt
20. InfoAfterFile=C:\电脑锁定助手\Docs\tips.txt
21. OutputBaseFilename=PcLocker-Setup
22. SetupIconFile=C:\电脑锁定助手\图标.ico
23. UninstallDisplayName=电脑锁定助手
24. UninstallDisplayIcon=C:\电脑锁定助手\卸载.ico
25. WizardImageFile=C:\电脑锁定助手\b.bmp
26. WizardSmallImageFile=C:\电脑锁定助手\s.bmp
28. Compression=lzma
29. SolidCompression=yes
31. VersionInfoCompany=http://www.promiseforever.com
32. VersionInfoDescription=电脑锁定助手安装程序
33. VersionInfoVersion=2.2.0.0
34. VersionInfoCopyright=Copyright (C)2009-2012 花好月圆
35. VersionInfoProductName=电脑锁定助手
36. VersionInfoProductVersion=2.2.0.0
37. VersionInfoTextVersion=2.2.0.0
39. [Languages]
40. Name: "chinese"; MessagesFile: "compiler:Default.isl"
42. [Tasks]
43. Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
44. Name: "quicklaunchicon"; Description: "{cm:CreateQuickLaunchIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
46. [Files]
47. Source: "C:\电脑锁定助手\电脑锁定助手.EXE"; DestDir: "{app}"; Flags: ignoreversion
48. Source: "C:\电脑锁定助手\设置工具.EXE"; DestDir: "{app}"; Flags: ignoreversion
50. Source: "C:\电脑锁定助手\Data\MSVBVM60.DLL"; DestDir: "{sys}"; CopyMode: alwaysskipifsameorolder; Flags: restartreplace sharedfile regserver
51. Source: "C:\电脑锁定助手\Data\STDOLE2.TLB"; DestDir: "{sys}"; CopyMode: alwaysskipifsameorolder; Flags: restartreplace sharedfile
52. Source: "C:\电脑锁定助手\Data\secur32.dll"; DestDir: "{sys}"; CopyMode: alwaysskipifsameorolder; Flags: restartreplace sharedfile
53. Source: "C:\电脑锁定助手\Data\wshom.ocx"; DestDir: "{sys}"; CopyMode: alwaysskipifsameorolder; Flags: restartreplace sharedfile
55. [Icons]
56. Name: "{group}\电脑锁定助手"; Filename: "{app}\电脑锁定助手.EXE"
57. Name: "{group}\{cm:ProgramOnTheWeb,电脑锁定助手}"; Filename: "http://www.promiseforever.com/";IconFilename: "C:\电脑锁定助手\网址.ico"
58. Name: "{group}\{cm:UninstallProgram,电脑锁定助手}"; Filename: "{uninstallexe}";IconFilename: "C:\电脑锁定助手\卸载.ico"
59. Name: "{commondesktop}\电脑锁定助手"; Filename: "{app}\电脑锁定助手.EXE"; Tasks: desktopicon
60. Name: "{userappdata}\Microsoft\Internet Explorer\Quick Launch\电脑锁定助手"; Filename: "{app}\电脑锁定助手.EXE"; Tasks: quicklaunchicon
64. [Messages]
65. BeveledLabel= 电脑锁定助手 2.2.0.0 制作：花好月圆
66. ;卸载对话框说明
67. ConfirmUninstall=您真的想要从电脑中卸载 电脑锁定助手 吗?%n%n卸载后，你将无法在使用本软件锁定电脑。%n%n按 [是] 则完全删除 %1 以及它的所有组件;　%n按 [否]则让软件继续留在您的电脑上.
70. [Run]
71. Filename: "{app}\电脑锁定助手.EXE"; Description: "{cm:LaunchProgram,电脑锁定助手}"; Flags: nowait postinstall skipifsilent
72. Filename: "http://www.promiseforever.com"; Description: "访问作者网站"; Flags: postinstall shellexec skipifsilent
74. [Code]
75. procedure AboutButtonOnClick(Sender: TObject);
76. begin
77. MsgBox('更多信息，请访问我的网站。', mbInformation, mb_Ok);
79. end;
81. procedure URLLabelOnClick(Sender: TObject);
82. var
83. ErrorCode: Integer;
84. begin
85. ShellExec('open', 'http://www.promiseforever.com', '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode);
86. end;
88. procedure InitializeWizard();
89. var
90. AboutButton, CancelButton: TButton;
91. URLLabel: TNewStaticText;
92. BackgroundBitmapImage: TBitmapImage;
93. BackgroundBitmapText: TNewStaticText;
94. LabelDate:Tlabel;
95. begin
96. CancelButton := WizardForm.CancelButton;
98. AboutButton := TButton.Create(WizardForm);
99. AboutButton.Left := WizardForm.ClientWidth - CancelButton.Left - CancelButton.Width;
100. AboutButton.Top := CancelButton.Top;
101. AboutButton.Width := CancelButton.Width;
102. AboutButton.Height := CancelButton.Height;
103. AboutButton.Caption := '关于';
104. AboutButton.OnClick := @AboutButtonOnClick;
105. AboutButton.Parent := WizardForm;
107. URLLabel := TNewStaticText.Create(WizardForm);
108. URLLabel.Caption := '访问 作者网站';
109. URLLabel.Cursor := crHand;
110. URLLabel.OnClick := @URLLabelOnClick;
111. URLLabel.Parent := WizardForm;
112. URLLabel.Font.Style := URLLabel.Font.Style + [fsUnderline];
113. URLLabel.Font.Color := clBlue;
114. URLLabel.Top := AboutButton.Top + AboutButton.Height - URLLabel.Height - 2;
115. URLLabel.Left := AboutButton.Left + AboutButton.Width + ScaleX(20);
117. WizardForm.WelcomeLabel2.Height:=100
118. WizardForm.PAGENAMELABEL.Font.Color:= clRed;
119. WizardForm.PAGEDESCRIPTIONLABEL.Font.Color:= clBlack;
120. WizardForm.WELCOMELABEL1.Font.Color:= clBlack;
121. WizardForm.WELCOMELABEL2.Font.Color:= clOlive;
123. LabelDate:=Tlabel.Create(WizardForm)
124. LabelDate.Caption:='欢迎使用电脑锁定助手绿色安装包'#10#13' '#10#13'软件对系统绝无副作用'#10#13' '#10#13'所有安装文件在卸载时都可清除'#10#13' '#10#13'如要获取其他信息欢迎访问我的网站'#10#13' '#10#13'PromiseForever.Com';
125. LabelDate.Left:=WizardForm.WelcomeLabel2.Left;
126. LabelDate.Top:= WizardForm.WelcomeLabel2.Top + WizardForm.WelcomeLabel2.Height+10;
127. LabelDate.Parent := WizardForm.WelcomePage;
128. end;

复制代码