十五年专注于
液压缸筒生产

全国咨询热线:
400-086-9833

   热门关键词修理 加工 活塞杆 缸筒 不锈钢

无标题文档

天圆液压产品中心

当前位置:主页 > 行业资讯 >

AutoCAD图珩磨管层的解锁及解冻使用

时间:2017-03-12 10:01来源:天圆网站 作者:天圆液压 点击:
(defun UnLock_All_Layers () (vlax-for n (vla-get-layers (vla-get-ActiveDocument (vlax-get-acad-object)) ) (vla-put-lock n :vlax-false) ) ) 解冻所有图层 (defun UnFreeze_All_Layers () (vlax-for n (vla-get-layers (vla-get-ActiveDocument (vl

  (defun UnLock_All_Layers ()

  (vlax-for n (vla-get-layers

  (vla-get-ActiveDocument (vlax-get-acad-object))

  )

  (vla-put-lock n :vlax-false)

  )

  )

  解冻所有图层

  (defun UnFreeze_All_Layers ()

  (vlax-for n (vla-get-layers

  (vla-get-ActiveDocument (vlax-get-acad-object))

  )

  (if (/= (vla-get-name n) (getvar "clayer"))

  ;;也可以用 (not (equal (vla-get-activelayer adoc) item))判断

  (vla-put-Freeze n :vlax-false)

  )

  )

(责任编辑:admin)
分享按钮
------分隔线----------------------------