wandong 发表于 2014-11-3 19:21:09

如何将一个图层改为不打印图层

如何将一个已有图层改为不打印图层?

lyqiezi 发表于 2014-11-3 19:35:27

(command ".layer" "p" "n" "不打印的图层名称" "")

wandong 发表于 2014-11-3 19:40:52

本帖最后由 wandong 于 2014-11-3 19:45 编辑

非常感谢提示。

llsheng_73 发表于 2014-11-3 19:51:30

可以通过修改图层DXF数据的290组来实现...
(defun setprint(la f / a);;la图层名 f为nil设为不可打印
(if(setq la(TBLOBJNAME"layer"la))
    (entmod(setq la(entget la)a(assoc 290 la)
                la(subst(cons 290(if f 1 0))a la)))))
(SETPRINT "0" nil);;;将图层"0"设置为不可打印
(SETPRINT "0" t);;;参数F非nil时设置炎可打印
(SETPRINT "0" 1)
(SETPRINT "0" "A")

ghxc 发表于 2014-11-4 08:13:42

好!刚好在找!谢谢!

wangxf888 发表于 2015-1-30 12:01:45

留个记号谢谢
页: [1]
查看完整版本: 如何将一个图层改为不打印图层