//删除所有配置文件以达到干净卸载的目的

procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);

    begin

        if CurUninstallStep = usUninstall then

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

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

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

    end;