软件简介
Inno Setup 是一个免费的安装制作软件,小巧、简便、精美是其最大特点,支持pascal脚本,能快速制作出标准Windows2000风格的安装界面,足以完成一般安装任务。该软件用Delphi写成,其官方网站同时也提供源程序免费下载。
它虽不能与 Installshield 这类恐龙级的安装制作软件相比,但也当之无愧算是后起之秀。
增强安装版
包含Ansi和Unicode版本。
加入加密组件ISCrypt.dll。
加入Inno Setup预处理器。
加入一些辅助工具。
加和了大量的插件详细的就看图片吧。
集成了网上最全面的插件
创建安装程序的方式:脚本
安装程序用编译脚本的方式创建,脚本其实就是一个类似.INI 文件格式的 ASCII 码文本文件。(它不象你想象的那么复杂!)。 Unicode Inno Setup支持 UTF-8 编码文本文件。
脚本用一个“.iss”(表示 Inno Setup Script脚本) 的扩展名。脚本控制着安装程序的所有方面。由它指定哪些文件将被安装到什么地方,在哪里创建快捷方式,且被命名为什么。
脚本文件一般可以用安装程序编译器程序内置的编辑器进行编辑。在你编写完脚本后,下一个最终步骤就是选择安装程序编译器中的“编译”。创建完成后,就可以运行根据你脚本编译的安装程序了。按默认,这个安装程序创建在包含脚本文件目录下的名为“输出”目录中。
如果你想看看它是怎样工作的,启动安装程序编译器,单击“文件 | 打开”,并选择位于 Inno Setup 安装目录下的Examples 子目录中的一个脚本文件。(你也可以将这些示例脚本作为你自己编写脚本的模板。)
Inno setup脚本示范(注释)
[Setup]
;程序名
AppName=ISsample
;版本号
AppVerName=ISsample 1.0.0.0
;发布者名
AppPublisher=Hkiss
;相关连接
AppPublisherURL=http://www.yan.com/
AppSupportURL=http://www.yan.com/
AppUpdatesURL=http://www.yan.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原始文件title.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原始文件Taskstasks_1.txt";DestDir: "{app}Tasks"; Flags: ignoreversion ;Tasks : Tasks_1
Source: "C:Example原始文件Taskstasks_2.txt";DestDir: "{app}Tasks"; Flags: ignoreversion ;Tasks :Tasks_2
Source: "C:Example原始文件Taskstasks_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 a2a3;
;用户注册自定义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原始文件test.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: FullCompact Custom ;
Name: a2; Description: "安装Components_2"; Types :FullCompact
Name: a3; Description: "安装Components_3"; Types : Full
;开始菜单,桌面快捷方式
[Icons]
Name:"{group}ISsample"; Filename: "{app}ISsample.exe"
Name:"{group}{cm:ProgramOnTheWeb,ISsample}"; Filename:"http://www.yan.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: postinstallskipifsilent shellexec
;更改显示在程序中显示的消息文本
[Messages]
BeveledLabel=HKiss科技
;卸载对话框说明
ConfirmUninstall=您真的想要从电脑中卸载ISsample吗?%n%n按[是]则完全删除%1以及它的所有组件;%n按[否]则让软件继续留在您的电脑上.
;定义解压说明
;StatusExtractFiles=解压并复制主程序文件及相关库文件...
;用与在用户系统中创建,修改或删除注册表健值
[Registry]
Root: HKLM;SubKey:"SoftwareISsample";ValueType:dword;ValueName:config;ValueData:10;Flags:uninsdeletevalue
;在执行脚本
;注意:下面是code,因为与论坛使用的代码标签重名,改为了c0de,需要改回去。
[c0de]
//全局变量
var MyProgChecked: Boolean;
//判断程序是否存在
//初始华程序事件
function InitializeSetup():boolean;
var Isbl: boolean;//声明变量
var Isstr: string;
begin//开始
Isbl := true;//变量赋值
Isstr := '欢迎';
ifRegValueExists(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}tmp.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 'Youselected: ''' + WizardDirValue + '''.', mbInformation, MB_OK);//WizardDirValue路径
wpSelectProgramGroup:
MsgBox('NextButtonClick:' #13#13 'Youselected: ''' + WizardGroupValue + '''.', mbInformation, MB_OK); //开始菜单名
wpReady:
begin
if notRegValueExists(HKEY_LOCAL_MACHINE, 'SOFTWARETest', 'config') thenbegin
if MsgBox('程序执行需要Test.ext,是否安装!', mbConfirmation, MB_YESNO) =idYes then begin
ExtractTemporaryFile('test.exe');
if notExec(ExpandConstant('{tmp}test.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;