qq_23388925的博客

[Code] procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep); begin if CurUninstallStep = usDone then if MsgBox(‘您是否要删除用户配置信息？’, mbConfirmation, MB_YESNO) = IDYES then //删除 {app} 文件夹及其中所有文件 DelTree(ExpandConstant(’{app}’), True, True, True);