yaokui25 发表于 2016-7-29 06:46:35

楼主，这个功能有没有最新版的可以共享一下吗？谢谢

masterlong 发表于 2016-7-29 11:20:45

点击“添加路径”没反应的具体原因
我也不知道
因为我这里一切正常

解决的办法有一个
见21楼
跳过函数中的第1句即可

;;添加路径没反应时，用下面函数代替（不懂lisp的，直接粘贴到lisp最末尾，重新加载即可）
(defun addpath( / lastpath thispath )
(setq thispath (dos_getdir "指定文件夹" "" "选择要批量操作的文件夹" Nil))
(if thispath
(if (assoc thispath alldwg)
   (if (= 6 (dos_msgbox "已添加此路径。\n\n是否重新搜索？" "提示" 4 3))
    (addpath_main thispath)
   )
   (addpath_main thispath)
)
(mode_tile "cancel" 2)
)
(princ)
)

jh3030912 发表于 2023-9-24 19:44:28

这个不错呀。试一试

jh3030912 发表于 2024-8-18 06:28:29

有没有最新版本的呢？
页: 1 2 3 [4]
查看完整版本: 文件夹批量处理·pldir（测试版）