加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

inno-setup – 使用InnoSetup备份文件并在卸载时恢复它们?

发布时间:2020-12-15 10:06:22 所属栏目:大数据 来源:网络整理
导读:考虑以下: 我有两个文件,例如XXX.txt和YYY.txt 我想将它们安装到一个文件夹(比方说文件),其中已有XXX.txt和YYY.txt文件 我想“备份”两个原始文件,将它们重命名为XXX.txt.backup和YYY.txt.backup 在卸载时,我想将两个文件恢复到其原始状态 如何通过Inno Set
考虑以下:

>我有两个文件,例如XXX.txt和YYY.txt
>我想将它们安装到一个文件夹(比方说文件),其中已有XXX.txt和YYY.txt文件
>我想“备份”两个原始文件,将它们重命名为XXX.txt.backup和YYY.txt.backup
>在卸载时,我想将两个文件恢复到其原始状态

如何通过Inno Setup实现这一目标?

解决方法

[Files]
; Backup Function_Template
Source: "{app}XXX.txt"; DestDir: "{app}"; DestName: "XXX.txt.bkup"; Flags: external skipifsourcedoesntexist uninsneveruninstall

这将移动现有文件,并且标志将阻止卸载它.现在你可以放入代码

[Code] 
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
var
  OldFile: string;
begin
  case CurUninstallStep of    
    usPostUninstall:
      begin
        OldFile := ExpandConstant('{app}XXX.txt.bkup');
        if FileExists(OldFile) then
          RenameFile(OldFile,ExpandConstant('{app}XXX.txt'));
      end;
  end;
end;

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读