Win10论坛

Win10正式版系统下载主题平板

重定义Modern UI,打造完美Windows全新体验

Windows10下载|安装|新手宝典|必备软件

搜索
查看: 354|回复: 0

[求助] nno setup 程序卸载[Code]段求助。 [复制链接]

Rank: 9

UID
852420
帖子
4043
PB币
1578
贡献
0
技术
15
活跃
429
发表于 2018-11-28 16:34:48 |显示全部楼层
本帖最后由 ldflmh 于 2018-11-28 17:25 编辑

我纯小白一个,下面的命令,只对第一条有用,后面两条都是直接删除了,不受判断控制,要怎么写才对呢。
[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;
自己解决了。。。
[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;

回顶部
Copyright (C) 2005-2021 pcbeta.com, All rights reserved
Powered by Discuz!  苏ICP备17027154号
请勿发布违反中华人民共和国法律法规的言论,会员观点不代表远景论坛官方立场。
远景在线 | 远景论坛 | 苹果论坛 | Win10论坛 | Win8论坛 | Win7论坛 | WP论坛 | Office论坛 | 电脑硬件 | 安卓软件