博客网 >

给甲方图之前简单处理下图纸
作者:分类:默认分类标签:
代码:

;;给甲方图之前简单处理下图纸
;;修改所有实体至 0 图层
;;不要用源图,一定要用 save as 的图纸!!!
(defun ea:chglay (/ for-item docment modelspace)
(setq docment (vla-get-activedocument (vlax-get-acad-object))
modelspace (vla-get-modelspace docment)
)
(vlax-for for-item modelspace
(vla-put-layer for-item "0")
)
)
;;如果有块处理不了用下面的再处理
;;处理图块定义
(defun ea:chgblklay (/ docment for-item blocks)
(setq docment (vla-get-activedocument (vlax-get-acad-object))
blocks (vla-get-blocks docment)
)
(vlax-for for-item blocks
(vlax-for obj for-item
(vla-put-layer obj "0")
)
)
)
;;修理完成后在 purge all
<< 删除图层过滤器 / 使用vlisp在Ms Acces... >>

专题推荐

不平凡的水果世界

不平凡的水果世界

平凡的水果世界,平凡中的不平凡。 今朝看水果是水果 ,看水果还是水果 ,看水果已不是水果。这境界,谁人可比?在不平凡的水果世界里,仁者见仁,智者见智。

中国春节的那些习俗

中国春节的那些习俗

正月是农历新年的开始,人们往往将它看作是新的一年年运好坏的兆示期。所以,过年的时候“禁忌”特别多。当然,各个地方的风俗习惯不一样,过年的禁忌也是不一样的。

评论
0/200
表情 验证码:

eachy

  • 文章总数0
  • 画报总数0
  • 画报点击数0
  • 文章点击数0
个人排行
        博文分类
        日期归档