INNO 卸载时 强制删除安装目录

直接附代码了.

 

[code]
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);

begin

if CurUninstallStep = usUninstall then

if MsgBox('您是否要删除用户配置信息？', mbConfirmation, MB_YESNO) = IDYES then

//删除 {app} 文件夹及其中所有文件

DelTree(ExpandConstant('{app}'), True, True, True);

end;