注册表删除

[code]
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
  if CurUninstallStep = usPostUninstall then
  begin
    if RegKeyExists(HKEY_CLASSES_ROOT, 'Test') then
      if MsgBox('你想要删除注册表吗?',
        mbConfirmation, MB_YESNO) = IDYES
      then
        RegDeleteKeyIncludingSubkeys(HKEY_CLASSES_ROOT, 'Test'); //删除这个还有其他的 还得继续删除
  end;
end;