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

Question

考虑以下:

我有两个文件，例如 XXX.txt 和 YYY.txt

我想将它们安装到一个文件夹(假设 files )，其中已经有 XXX.txt 和 YYY.txt 文件

我想“备份”两个原始文件，将它们重命名为 XXX.txt.backup 和 YYY.txt.backup

在卸载时我想将这两个文件恢复到它们的原始状态

如何使用 Inno Setup 实现这一目标？

Answer 1

添加

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