|
正式会员享受无限制浏览网站功能和高速网盘下载,赶快加入本站吧!
您需要 登录 才可以下载或查看,没有账号?立即注册
x
Patch 属于专为NSIS开发的补丁插件,通过本人开发的调用插件 callvpatch.dll 进行调用。在 INNO 中得到很好的应用。(注意:你可以在 VPatch 的官方网站“http://www.tibed.net/vpatch/”得到源代码,从而编译成一个适合在 INNO 中直接利用的 DLL,这里我为了通用性跟方便性,使用了NSIS通用调用插件,方便以后随时在NSIS的安装包中得到 VPatch 的已编译的 DLL)
以下是在本例子中的练习步骤,通过这个练习,你将会领略到 VPatch 在补丁安装程序方面的巨大作用。
VPatch(DIR)
| |-- EnglishAppSetup(DIR)
| | |---- Example1.iss --英文版软件安装脚本
| | |---- MyProg.exe --英文版软件主程序
| | |---- MyProg.hlp --英文版软件帮助
| | |---- Readme.txt --英文版软件自读文件
| | |---- English.isl --英文版软件安装程序英文界面语言文件
| |
| |
| |-- ChineseApp(DIR)
| | |---- MyProg.exe --汉化版软件中文主程序
| | |---- MyProg.hlp --汉化版软件中文帮助
| | |---- Readme.txt --汉化版软件中文自读文件
| |
| |
| |-- PatchSetup(DIR)
| |---- callvpatch.dll --我编写的调用 vpatch.dll 的中间插件
| |---- Patch.iss --补丁安装程序脚本
| |---- VPatch.dll --NSIS 补丁插件
|
|
|---- GenPat.exe --补丁文件生成工具
|---- Readme.txt --你正在看的本文件
|---- VPatch.html --VPatch 概述
1. 目录下的 EnglishAppSetup 里面是一个英文版例子的安装程序,你需要自己编译成安装程序进行安装。
2. 接着我们安装第一步产生的英文版安装程序,……,好了,现在我们已经安装了一个英文版程序在你的电脑中了。
3. 目录下的 ChineseApp 里面是汉化好的文件,这里的汉化版软件不会直接打包进安装程序的,这只是用来生成补丁文件时用的。
4. 好,现在看看补丁的生成。VPatch 有一个生成补丁的程序,GenPat.exe (可在 NSIS\Bin 目录下找到)
关于 GenPat.exe 的详细使用方法请看 VPatch.html 文档。
命令行生成补丁:
进入 VPatch 目录,输入如下命令:
GenPat "EnglishAppSetup\MyProg.exe" "ChineseApp\MyProg_cn.exe" "PatchSetup\MyPatch.dat"
GenPat "EnglishAppSetup\MyProg.hlp" "ChineseApp\MyProg_cn.hlp" "PatchSetup\MyPatch.dat"
GenPat "EnglishAppSetup\Readme.txt" "ChineseApp\Readme_cn.txt" "PatchSetup\MyPatch.dat" 注意:以上全部命令连续执行,GenPat 会自动把所有这些文件的补丁合成在 MyPatch.dat 中。
5. 如无意外 MyPatch.dat 会在 PatchSetup 目录中产生,补丁生成后,进行下一步的补丁程序安装制作了。
6. 脚本如下,功能包含了自动检测以前的安装路径,自动备份原文件。
- ; -- Example1.iss --
- ; 补丁安装程序制作脚本
- ; 脚本编写:restools (http://restools.yeah.net)
- [Setup]
- AppName=Test Program
- AppVerName=Test Program version 1.5
- UsePreviousAppDir=yes
- DefaultDirName={pf}\My Program
- Uninstallable=false
- Compression=lzma
- SolidCompression=yes
- OutputDir=.
- [Files]
- Source: "callvpatch.dll"; Flags: dontcopy
- Source: "VPatch.dll"; Flags: dontcopy
- Source: "MyPatch.dat"; Flags: dontcopy
- [code]
- const
- BackupDir = 'PatchBackup';
- PatchFile = 'MyPatch.dat';
-
- function vpatch(parentwnd: Integer; pluginname,funcname,param1,param2,param3: PChar): Integer;
- external 'vpatch@files:callvpatch.dll stdcall';
- function PatchFileFunc(FileName: String): Integer;
- begin
- Result := vpatch(0,ExpandConstant('{tmp}\VPatch.dll'),'vpatchfile',ExpandConstant('{tmp}\'+PatchFile),
- ExpandConstant('{app}\'+BackupDir+'\'+FileName),ExpandConstant('{app}\'+FileName));
- // Result :
- // 0 = 成功
- // 1 = 失败
- end;
- procedure BackupFile(FileName: String);
- begin
- if not FileExists(ExpandConstant('{app}\'+BackupDir+'\'+Filename)) then
- FileCopy(ExpandConstant('{app}\'+Filename),ExpandConstant('{app}\'+BackupDir+'\'+Filename),True);
- end;
- procedure RestoreFile(FileName: String);
- begin
- FileCopy(ExpandConstant('{app}\'+BackupDir+'\'+Filename),ExpandConstant('{app}\'+Filename),False);
- DeleteFile(ExpandConstant('{app}\'+BackupDir+'\'+Filename));
- end;
- procedure InitializeWizard();
- begin
- ExtractTemporaryFile('VPatch.dll');
- ExtractTemporaryFile('MyPatch.dat');
- end;
- function NextButtonClick(CurPageID: Integer): Boolean;
- begin
- if CurPageID = wpSelectDir then
- Result := FileExists(ExpandConstant('{app}\MyProg.exe'))
- else
- Result := True;
- if not Result then
- MsgBox('你选择的目录没有需要补丁的程序,请选择正确的目录!', mbInformation, MB_OK);
- end;
- procedure CurPageChanged(CurPageID: Integer);
- begin
- if CurPageID = wpInstalling then
- begin
- CreateDir(ExpandConstant('{app}\'+BackupDir));
-
- BackupFile('MyProg.exe');
- if PatchFileFunc('MyProg.exe') = 1 then
- RestoreFile('MyProg.exe')
- WizardForm.PROGRESSGAUGE.POSITION := 33;
-
- BackupFile('MyProg.hlp');
- if PatchFileFunc('MyProg.hlp') = 1 then
- RestoreFile('MyProg.hlp')
- WizardForm.PROGRESSGAUGE.POSITION := 66;
-
- BackupFile('Readme.txt');
- if PatchFileFunc('Readme.txt') = 1 then
- RestoreFile('Readme.txt')
- WizardForm.PROGRESSGAUGE.POSITION := 100;
- end;
- end;
复制代码
|
|