冒险解谜游戏中文网 ChinaAVG
标题:
[任务10]安装脚本的制作
[打印本页]
作者:
firendless
时间:
2009-3-23 14:02
标题:
[任务10]安装脚本的制作
下载了一个月光奏鸣曲的安装包,解包后得到INNO脚本,贴上来,或许有用
+ l j2 B6 f! S) }9 b' d4 x
# `& z, {+ m' R
在发一个私人用的脚本
; c2 }% [# {$ ?2 e% w0 N" W; B
; 脚本由 Inno Setup 脚本向导 生成!
; 有关创建 Inno Setup 脚本文件的详细资料请查阅帮助文档!
[Setup]
; 注意: AppId 值用于唯一识别该应用程序。
; 禁止对其他应用程序的安装器使用相同的 AppId 值!
; (若要生成一个新的 GUID,请选择“工具 | 生成 GUID”。)
AppId={{E197DE61-1EFE-4468-97C5-167416ACB14E}
AppName=电脑锁定助手
AppVerName=电脑锁定助手 2.2.0.0
AppPublisher=花好月圆[[url]www.promiseforever.com[/url]]
AppPublisherURL=http://www.promiseforever.com/
AppSupportURL=http://www.promiseforever.com/
AppUpdatesURL=http://www.promiseforever.com/
DefaultDirName={pf}\电脑锁定助手
DefaultGroupName=电脑锁定助手
AllowNoIcons=yes
LicenseFile=C:\电脑锁定助手\Docs\license.txt
InfoBeforeFile=C:\电脑锁定助手\Docs\history.txt
InfoAfterFile=C:\电脑锁定助手\Docs\tips.txt
OutputBaseFilename=PcLocker-Setup
SetupIconFile=C:\电脑锁定助手\图标.ico
UninstallDisplayName=电脑锁定助手
UninstallDisplayIcon=C:\电脑锁定助手\卸载.ico
WizardImageFile=C:\电脑锁定助手\b.bmp
WizardSmallImageFile=C:\电脑锁定助手\s.bmp
Compression=lzma
SolidCompression=yes
VersionInfoCompany=http://www.promiseforever.com
VersionInfoDescription=电脑锁定助手安装程序
VersionInfoVersion=2.2.0.0
VersionInfoCopyright=Copyright (C)2009-2012 花好月圆
VersionInfoProductName=电脑锁定助手
VersionInfoProductVersion=2.2.0.0
VersionInfoTextVersion=2.2.0.0
[Languages]
Name: "chinese"; MessagesFile: "compiler:Default.isl"
[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
Name: "quicklaunchicon"; Description: "{cm:CreateQuickLaunchIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
[Files]
Source: "C:\电脑锁定助手\电脑锁定助手.EXE"; DestDir: "{app}"; Flags: ignoreversion
Source: "C:\电脑锁定助手\设置工具.EXE"; DestDir: "{app}"; Flags: ignoreversion
Source: "C:\电脑锁定助手\Data\MSVBVM60.DLL"; DestDir: "{sys}"; CopyMode: alwaysskipifsameorolder; Flags: restartreplace sharedfile regserver
Source: "C:\电脑锁定助手\Data\STDOLE2.TLB"; DestDir: "{sys}"; CopyMode: alwaysskipifsameorolder; Flags: restartreplace sharedfile
Source: "C:\电脑锁定助手\Data\secur32.dll"; DestDir: "{sys}"; CopyMode: alwaysskipifsameorolder; Flags: restartreplace sharedfile
Source: "C:\电脑锁定助手\Data\wshom.ocx"; DestDir: "{sys}"; CopyMode: alwaysskipifsameorolder; Flags: restartreplace sharedfile
[Icons]
Name: "{group}\电脑锁定助手"; Filename: "{app}\电脑锁定助手.EXE"
Name: "{group}\{cm:ProgramOnTheWeb,电脑锁定助手}"; Filename: "http://www.promiseforever.com/";IconFilename: "C:\电脑锁定助手\网址.ico"
Name: "{group}\{cm:UninstallProgram,电脑锁定助手}"; Filename: "{uninstallexe}";IconFilename: "C:\电脑锁定助手\卸载.ico"
Name: "{commondesktop}\电脑锁定助手"; Filename: "{app}\电脑锁定助手.EXE"; Tasks: desktopicon
Name: "{userappdata}\Microsoft\Internet Explorer\Quick Launch\电脑锁定助手"; Filename: "{app}\电脑锁定助手.EXE"; Tasks: quicklaunchicon
[Messages]
BeveledLabel= 电脑锁定助手 2.2.0.0 制作:花好月圆
;卸载对话框说明
ConfirmUninstall=您真的想要从电脑中卸载 电脑锁定助手 吗?%n%n卸载后,你将无法在使用本软件锁定电脑。%n%n按 [是] 则完全删除 %1 以及它的所有组件; %n按 [否]则让软件继续留在您的电脑上.
[Run]
Filename: "{app}\电脑锁定助手.EXE"; Description: "{cm:LaunchProgram,电脑锁定助手}"; Flags: nowait postinstall skipifsilent
Filename: "http://www.promiseforever.com"; Description: "访问作者网站"; Flags: postinstall shellexec skipifsilent
[Code]
procedure AboutButtonOnClick(Sender: TObject);
begin
MsgBox('更多信息,请访问我的网站。', mbInformation, mb_Ok);
end;
procedure URLLabelOnClick(Sender: TObject);
var
ErrorCode: Integer;
begin
ShellExec('open', 'http://www.promiseforever.com', '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode);
end;
procedure InitializeWizard();
var
AboutButton, CancelButton: TButton;
URLLabel: TNewStaticText;
BackgroundBitmapImage: TBitmapImage;
BackgroundBitmapText: TNewStaticText;
LabelDate:Tlabel;
begin
CancelButton := WizardForm.CancelButton;
AboutButton := TButton.Create(WizardForm);
AboutButton.Left := WizardForm.ClientWidth - CancelButton.Left - CancelButton.Width;
AboutButton.Top := CancelButton.Top;
AboutButton.Width := CancelButton.Width;
AboutButton.Height := CancelButton.Height;
AboutButton.Caption := '关于';
AboutButton.OnClick := @AboutButtonOnClick;
AboutButton.Parent := WizardForm;
URLLabel := TNewStaticText.Create(WizardForm);
URLLabel.Caption := '访问 作者网站';
URLLabel.Cursor := crHand;
URLLabel.OnClick := @URLLabelOnClick;
URLLabel.Parent := WizardForm;
URLLabel.Font.Style := URLLabel.Font.Style + [fsUnderline];
URLLabel.Font.Color := clBlue;
URLLabel.Top := AboutButton.Top + AboutButton.Height - URLLabel.Height - 2;
URLLabel.Left := AboutButton.Left + AboutButton.Width + ScaleX(20);
WizardForm.WelcomeLabel2.Height:=100
WizardForm.PAGENAMELABEL.Font.Color:= clRed;
WizardForm.PAGEDESCRIPTIONLABEL.Font.Color:= clBlack;
WizardForm.WELCOMELABEL1.Font.Color:= clBlack;
WizardForm.WELCOMELABEL2.Font.Color:= clOlive;
LabelDate:=Tlabel.Create(WizardForm)
LabelDate.Caption:='欢迎使用电脑锁定助手绿色安装包'#10#13' '#10#13'软件对系统绝无副作用'#10#13' '#10#13'所有安装文件在卸载时都可清除'#10#13' '#10#13'如要获取其他信息欢迎访问我的网站'#10#13' '#10#13'PromiseForever.Com';
LabelDate.Left:=WizardForm.WelcomeLabel2.Left;
LabelDate.Top:= WizardForm.WelcomeLabel2.Top + WizardForm.WelcomeLabel2.Height+10;
LabelDate.Parent := WizardForm.WelcomePage;
end;
复制代码
欢迎光临 冒险解谜游戏中文网 ChinaAVG (https://chinaavg.com/)
Powered by Discuz! X3.2