Inno Setup Compiler卸载时删除注册表

卸载时询问是否删除或是保留注册信息，可以使安装程序更加人性化。

界面预览：

在[Code]段添加如下代码：

procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);

begin

if CurUninstallStep = usUninstall then

if MsgBox('您是否要删除注册信息？', mbConfirmation, MB_YESNO) = IDYES then

RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\My Prog')

end;

使用时请将代码中红色部分替换为实际要保留的注册表信息。

如果想要 卸载时询问是否保留注册信息，可以把代码中蓝色部分改为 IDNO。

如果想要删除 文件或文件夹 ，可使用以下代码：

//删除 {app} 文件夹中的My Prog.exe

DeleteFile(ExpandConstant('{app}\My Prog.exe'));

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

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

//删除 {app} 文件夹中的所有文件，但保留它本身

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