inno setup询问用户是否要卸载文件

Question

在安装过程中,我添加了文件夹:
Source:{#DBPath}; DestDir:"{app}\DataBase";
我希望在卸载中,inno-setup会询问用户是否
要删除文件.

我怎样才能做到这一点 ？
谢谢,Avi.

Answer 1

如果你想保留一个文件夹,那么你应该添加uninsneveruninstall标志来指示inno-setup在卸载过程中不要删除这个文件夹.然后你可以用Pascal脚本有条件地删除这个文件夹

以下是如何执行此操作:

[Files]
Source: {#DBPath}; DestDir: {app}\DataBase; Flags: uninsneveruninstall

[Code]
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
  if CurUninstallStep = usPostUninstall then
  begin
    if MsgBox('Do You Want To Delete DataBase Folder?', mbConfirmation, MB_YESNO or MB_DEFBUTTON2) = IDYES then
    //this is the msg that will display after uninstall,change is as you prefer 
    begin
        DelTree(ExpandConstant('{app}\DataBase'), True, True, True);
    end;
  end;
end;