inno setup 程序卸载[Code]段求助。

[ldflmh]

我纯小白一个，下面的命令，只对第一条有用，后面两条都是直接删除了，不受判断控制，要怎么写才对呢。
[Code]
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
if CurUninstallStep = usUninstall then
if MsgBox('您是否要删除个人配置信息？', mbConfirmation, MB_YESNO) = IDYES then
RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\aaa')
RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\bbb')
DelTree(ExpandConstant('{app}'), True, True, True);
end;

[ldflmh]

[Code] procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep); begin if CurUninstallStep = usUninstall then if MsgBox('您是否要删除个人配置信息？', mbConfirmation, MB_YESNO) = IDYES then begin RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\aaa') RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\bbb') DelTree(ExpandConstant('{app}'), True, True, True); end end;