INNO 补丁制作技术, 打开 INNO 补丁制作方法的第一页

作者:xin 日期:2005-09-23

字体大小: 小中大

VPatch 在 INNO 中的应用。

VPatch 属于专为 NSIS 开发的补丁插件，通过本人开发的调用插件 callvpatch.dll 进行调用。在 INNO 中得到很好的应用。（注意：你可以在 VPatch 的官方网站“http://www.tibed.net/vpatch/”得到源代码，从而编译成一个适合在 INNO 中直接利用的 DLL，这里我为了通用性跟方便性，使用了 NSIS 通用调用插件，方便以后随时在 NSIS 的安装包中得到 VPatch 的已编译的 DLL）

以下是在本例子中的练习步骤，通过这个练习，你将会领略到 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. 脚本如下，功能包含了自动检测以前的安装路径，自动备份原文件。

引用来自 Patch.iss,2007-5-25 21:54:03

; -- 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;

INNO 脚本附件：
http://restools.hanzify.org/inno/vpatch/Inno_VPatch.zip

声明：以上内容来自用户投稿及互联网公开渠道收集整理发布，本网站不拥有所有权，未作人工编辑处理，也不承担相关法律责任，若内容有误或涉及侵权可进行投诉：投诉/举报工作人员会在5个工作日内联系你，一经查实，本站将立刻删除涉嫌侵权内容。

联系
我们

首页 > 代码库 > INNO 补丁制作技术, 打开 INNO 补丁制作方法的第一页