社区 › 源码共享 › 批量冻结非打印图层及批量块置为0层的插件

CAD智能@未来 发表于 2018-11-2 14:35:29

批量冻结非打印图层及批量块置为0层的插件

从接触编程到现在也快一年了，还是发一个贴吧！最近用DBX写了个批量冻结非打印图层及批量块置为0层的插件!
功能：1、批量将块置为0层（支持块中块的情况）；
             2、批量冻结非打印图层；
         使用前应确保图纸全部处于关闭状态！

bai2000 发表于 2018-11-4 11:45:56

这是源码共享空间，源码呢？

wxa123wl 发表于 2019-1-31 10:06:48

(defun C:DJFDYC ()

(setvar "clayer" "0")
(vlax-for lyr        (vla-get-Layers (vla-get-activedocument (vlax-get-acad-object)))
    (if        (zerop (vlax-get lyr 'Plottable))
      (vla-put-freeze lyr :vlax-true)
    )
)


(princ)
)

上善若水！@# 发表于 2019-4-24 10:52:34

wxa123wl 发表于 2019-1-31 10:06
(defun CJFDYC ()

(setvar "clayer" "0")


有没有批量冻结不显示图层的命令

tensir 发表于 2024-7-31 07:56:47

感谢作者的分享！

查看完整版本: 批量冻结非打印图层及批量块置为0层的插件