一个比较完整的Inno Setup 安装脚本(转)
一个比较完整的Inno Setup 安装脚本，增加了对ini文件设置的功能，一个安装包常用的功能都具备了。
- [Setup]
- ; 注: AppId的值为单独标识该应用程序。
- ; 不要为其他安装程序使用相同的AppId值。
- ; (生成新的GUID，点击 工具|在IDE中生成GUID。)
- AppId={{A9861883-31C5-4324-BD9A-DC3271EEB675}
- ;程序名
- AppName=ISsample
- ;版本号
- AppVerName=ISsample 1.0.0.0
- ;发布者名
- AppPublisher=Hkiss
- ;相关连接
- AppPublisherURL=http://zwkufo.blog.163.com
- AppSupportURL=http://zwkufo.blog.163.com
- AppUpdatesURL=http://zwkufo.blog.163.com
- ;默认安装目录
- DefaultDirName={pf}ISsample
- ;默认开始菜单名
- DefaultGroupName=ISsample
- ;是否打开->可选安装开始菜单项
- ;AllowNoIcons=yes
- ;安装协议
- ;LicenseFile=C:Example原始文件agreement.txt
- ;安装前查看的文本文件
- ;InfoBeforeFile=C:Example原始文件Setup_New.txt
- ;安装后查看文本文件
- ;InfoAfterFile=C:Example原始文件Setup_Old.txt
- ;输出文件夹
- OutputDir=C:ExampleInnoSetupout
- ;输出文件名
- OutputBaseFilename=setup
- ;安装图标
- SetupIconFile=C:Example原始文件 itle.ico
- ;安装需要输入密码
- ;Password=123
- ;Encryption=yes
- ;压缩相关
- Compression=lzma
- SolidCompression=yes
- ;可以让用户忽略选择语言相关
- ShowLanguageDialog = yes
- ;备注版本信息
- VersionInfoCompany=HTTP://www.Hkiss.COM
- VersionInfoDescription=ISsample 汉化增强版
- VersionInfoVersion=1.0.0.0
- VersionInfoCopyright=Copyright (C) 2007-2008 Hkiss
- ;制作选择语言
- [Languages]
- Name: "chs"; MessagesFile: "compiler:Default.isl" ;LicenSeFile :"C:Example原始文件chsagreement.txt"
- Name: "en"; MessagesFile: "compiler:LanguagesEnglish.isl";LicenSeFile :"C:Example原始文件enagreement.txt"
- ;用户定制任务
- [Tasks]
- Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
- Name: "quicklaunchicon"; Description: "{cm:CreateQuickLaunchIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
- Name: "Tasks_1" ; Description:"用户自定义任务1"; Flags: unchecked
- Name: "Tasks_2" ; Description:"用户自定义任务2"; Flags: unchecked
- ;选择了组件才会出现的定制任务
- Name: "Tasks_3" ; Description:"用户自定义任务3";Components: c1 ; Flags: unchecked
- ;文件安装
- [Files]
- ;多语言安装环境设置 公共参数Languages 来设置
- Source: "C:Example原始文件enfile.txt"; DestDir: "{app}"; Languages: en ; Flags: ignoreversion
- Source: "C:Example原始文件chsfile.txt"; DestDir: "{app}"; Languages: chs ; Flags: ignoreversion
- ;用户自定义任务 Tasks
- Source: "C:Example原始文件Tasks asks_1.txt"; DestDir: "{app}Tasks"; Flags: ignoreversion ;Tasks : Tasks_1
- Source: "C:Example原始文件Tasks asks_2.txt"; DestDir: "{app}Tasks"; Flags: ignoreversion ;Tasks :Tasks_2
- Source: "C:Example原始文件Tasks asks_Components.txt"; DestDir: "{app}Tasks"; Flags: ignoreversion ;Tasks :Tasks_2
- ;用户定义组件安装
- Source: "C:Example原始文件ComponentsComponents_1.txt"; DestDir: "{app}Components"; Flags: ignoreversion ; Components: a1;
- Source: "C:Example原始文件ComponentsComponents_2.txt"; DestDir: "{app}Components"; Flags: ignoreversion ; Components: a2;
- Source: "C:Example原始文件ComponentsComponents_3.txt"; DestDir: "{app}Components"; Flags: ignoreversion ; Components: a3;
- Source: "C:Example 原始文件ComponentsComponents_4.txt"; DestDir: "{app} Components"; Flags: ignoreversion ; Components: a1 a2 a3;
- ;用户注册自定义Dll文件 regserver 注册 noregerror 不显示错误信息
- Source: "C:Example原始文件jmail.dll"; DestDir: "{app}"; Flags: ignoreversion regserver
- ;添加自述文件
- Source: "C:Example原始文件ISsample.txt"; DestDir: "{app}"; Flags: ignoreversion
- ;添加一个文件到缓存文件夹{Tmp} deleteafterinstall 安装后删除
- Source: "C:Example原始文件 est.exe"; DestDir: "{tmp}"; Flags: ignoreversion deleteafterinstall
- Source: "C:Example原始文件ISsample.chm"; DestDir: "{app}"; Flags: ignoreversion
- Source: "C:Example原始文件ISsample.exe"; DestDir: "{app}"; Flags: ignoreversion
- Source: "C:Example原始文件ISsample.dll"; DestDir: "{app}"; Flags: ignoreversion
- Source: "C:Example原始文件ISsample.ini"; DestDir: "{app}"; Flags: ignoreversion
- Source: "C:Example原始文件ISsample.rar"; DestDir: "{app}"; Flags: ignoreversion
- Source: "C:Example原始文件ISsample_sys.dll"; DestDir: "{win}System32"; Flags: ignoreversion
- Source: "C:Example原始文件log*"; DestDir: "{app}log"; Flags: ignoreversion recursesubdirs createallsubdirs
- ; 注意: 不要在任何共享系统文件上使用“Flags: ignoreversion”
- ;安装类型设置
- [Types]
- Name: Full ;Description:"完全安装"; Flags: iscustom
- Name: Compact ;Description:"简洁安装";
- Name: Custom; Description:"自定义安装";
- ;组件安装
- [Components]
- Name: c1; Description: "自定义任务3" ; Types: Full
- Name: a1; Description: "安装Components_1"; Types: Full Compact Custom ;
- Name: a2; Description: "安装Components_2"; Types : Full Compact
- Name: a3; Description: "安装Components_3"; Types : Full
- ;开始菜单，桌面快捷方式
- [Icons]
- Name: "{group}ISsample"; Filename: "{app}ISsample.exe"
- Name: "{group}{cm:ProgramOnTheWeb,ISsample}"; Filename: "http://zwkufo.blog.163.com"
- Name: "{group}{cm:UninstallProgram,ISsample}"; Filename: "{uninstallexe}"
- Name: "{commondesktop}ISsample"; Filename: "{app}ISsample.exe"; Tasks: desktopicon
- Name: "{userappdata}MicrosoftInternet ExplorerQuick LaunchISsample"; Filename: "{app}ISsample.exe"; Tasks: quicklaunchicon
- ;添加一个帮助文挡
- Name: {group}ISsample 1.0.0.0 帮助文档;Filename: {app}ISsample.chm
- ;用来在程序安装完成后 在安装程序显示最终对话框之前执行程序 常用与运行主程序 显示自述文件 删除临时文件
- [Run]
- Filename: "{app}ISsample.exe"; Description: "{cm:LaunchProgram,ISsample}"; Flags: nowait postinstall skipifsilent
- Filename: "{app}ISsample.txt"; Description: "查看显示自述文件"; Flags: postinstall skipifsilent shellexec
- ;更改显示在程序中显示的消息文本
- [Messages]
- BeveledLabel=HKiss科技
- ;卸载对话框说明
- ConfirmUninstall=您真的想要从电脑中卸载ISsample吗?%n%n按 [是] 则完全删除 %1 以及它的所有组件;%n按 [否]则让软件继续留在您的电脑上.
- ;定义解压说明
- ;StatusExtractFiles=解压并复制主程序文件及相关库文件...
- ;用于在用户系统中创建，修改或删除ini文件健值
- [INI]
- Filename: "{app}cfg.ini"; Section: "Startup Options"; Flags: uninsdeletesection
- Filename: "{app}cfg.ini"; Section: "Startup Options"; Key: "server ip"; String: "127.0.0.1"
- Filename: "{app}cfg.ini"; Section: "Startup Options"; Key: "server port"; String: "8080"
- ;用于在用户系统中创建，修改或删除注册表健值
- [Registry]
- Root: HKLM ;SubKey:"SoftwareISsample";ValueType:dword;ValueName:config;ValueData:10 ;Flags:uninsdeletevalue
- ;在执行脚本
- [code]
- //全局变量
- var MyProgChecked: Boolean;
- //判断程序是否存在
- //初始华程序事件
- function InitializeSetup(): boolean;
- var Isbl: boolean; //声明变量
- var Isstr: string;
- begin //开始
- Isbl := true; //变量赋值
- Isstr := '欢迎';
- if RegValueExists(HKEY_LOCAL_MACHINE, 'SOFTWAREISsample', 'config') then
- begin
- MsgBox('已安装过，请先卸载在安装',mbConfirmation, MB_OK);
- isbl := false;
- end else
- begin
- //MsgBox('无值',mbConfirmation, MB_OK);
- isbl := true;
- end;
- //下面是个麻烦的 条件语句 end else 注意
- //if MsgBox(Isstr, mbConfirmation, MB_OKCANCEL) = IDOK then
- //begin
- // isbl := true;
- // MsgBox('执行了', mbConfirmation, MB_OK);
- //end else
- //begin
- // isbl := false;
- //MsgBox('执行了', mbConfirmation, MB_OK);
- //end;
- Result := Isbl;
- end; //结束
- procedure CurStepChanged(CurStep: TSetupStep);
- var Isstr :string;
- begin
- if CurStep=ssInstall then //实际安装前调用
- begin
- //MsgBox('CurStepChanged:实际安装前调用', mbConfirmation, MB_OKCANCEL); //安装完成后调用
- end;
- if CurStep=ssPostInstall then
- begin
- Isstr := ExpandConstant('{tmp} mp.rar');
- // if FileExists(Isstr) then
- // begin
- // MsgBox('文件存在',mbConfirmation, MB_OK);
- // end else
- // begin
- // MsgBox('文件不存在',mbConfirmation, MB_OK);
- // end;
- // MsgBox('CurStepChanged:实际安装后调用', mbConfirmation, MB_OKCANCEL);
- end;
- end;
- //下一步 按钮按钮 事件
- function NextButtonClick(CurPageID: Integer): Boolean;
- var ResultCode: Integer;
- var IsSetup : Boolean;
- begin
- IsSetup := true ;
- case CurPageID of
- wpSelectDir:
- MsgBox('NextButtonClick:' #13#13 'You selected: ''' + WizardDirValue + '''.', mbInformation, MB_OK); //WizardDirValue 路径
- wpSelectProgramGroup:
- MsgBox('NextButtonClick:' #13#13 'You selected: ''' + WizardGroupValue + '''.', mbInformation, MB_OK); //开始菜单名
- wpReady:
- begin
- if not RegValueExists(HKEY_LOCAL_MACHINE, 'SOFTWARETest', 'config') then begin
- if MsgBox('程序执行需要Test.ext,是否安装!', mbConfirmation, MB_YESNO) = idYes then begin
- ExtractTemporaryFile('test.exe');
- if not Exec(ExpandConstant('{tmp} est.exe'), '', '', SW_SHOWNORMAL, ewWaitUntilTerminated, ResultCode) then
- MsgBox('Test.exe出错:' #13#13 ' ' + SysErrorMessage(ResultCode) + '.', mbError, MB_OK);
- end else begin
- IsSetup := false ;
- end ;
- BringToFrontAndRestore();
- end;
- end;
- end;
- Result := IsSetup;
- end;