正式会员享受无限制浏览网站功能和高速网盘下载,赶快加入本站吧!
您需要 登录 才可以下载或查看,没有账号?立即注册
x
- [code]
- procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
- begin
- if CurUninstallStep = usUninstall then
- begin
- CreateDir('D:\Backup'); //创建文件夹
- FileCopy('C:\AAA.txt', 'D:\Backup\AAA.txt', False);
- FileCopy('C:\BBB.txt', 'D:\Backup\BBB.txt', False);
- end
- if CurUninstallStep = usPostUninstall then
- begin
- FileCopy('D:\Backup\AAA.txt', 'C:\AAA.txt', False);
- FileCopy('D:\Backup\BBB.txt', 'C:\BBB.txt', False);
- DelTree('D:\Backup',True,True,True);
- end
- end;
复制代码
|