热点推荐

查看: 90|回复: 0
收起左侧

[资料] Halcon安全删除目录(全部目录和文件)20190129

[复制链接]
  • TA的每日心情
    耍酷
    昨天 08:14
  • 签到天数: 515 天

    连续签到: 12 天

    [LV.9]以坛为家II

    346

    主题

    1273

    帖子

    5932

    积分

    Rank: 9

    积分
    5932

    突出贡献优秀版主荣誉管理论坛元老优质会员最佳新人

    发表于 2019-1-29 22:06:13 | 显示全部楼层 |阅读模式

    51Halcon诚邀您的加入,专注于机器视觉开发与应用技术,我们一直都在努力!

    您需要 登录 才可以下载或查看,没有帐号?会员注册

    x
         自带的算子只能删除空目录,否则会报错,所以扩写了一个算子delete_dir_safely来实现安全的删除所有二级或者多级文件和目录,最后再删除最上层目录,这样就不会出现删除顶层目录,里面有文件的时候就报错的问题了!

    核心代码:
    1. try
    2.     list_files (Dir, ['files','directories'], Files)
    3.     for Index:=0 to |Files|-1 by 1
    4.         strLen:=strlen(Files[Index])
    5.         Pos:=strrchr(Files[Index], '.')
    6.         if(-1 == Pos)
    7.             Pos1:=strrchr(Files[Index], '\\')
    8.             if(Pos1+1 == strLen)
    9.                 *记得添加自己到函数目录,否则无法加载自身
    10.                 delete_dir_safely(Files[Index])
    11.             endif
    12.         else
    13.             delete_file (Files[Index])
    14.         endif
    15.     endfor
    16.     remove_dir (Dir)
    17. catch (Exception)
    18.    
    19. endtry
    20. return ()
    复制代码


    懒人请自行下载:
    游客,如果您要查看本帖隐藏内容请回复
    无效附件更新 权限提升操作 删帖申请 举报以及其他需要帮助请加入QQ群:214663141 广告位招商 有意者联系
    您需要登录后才可以回帖 会员登录 | 会员注册

    本版积分规则

    经营性网站备案信息 经营性网站
    备案信息

    中国互联网举报中心 中国互联网
    举报中心

    中国文明网传播文明 中国文明网
    传播文明

    诚信网站

    深圳市市场监督管理局企业主体身份公示 工商网监
    电子标识