明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1926|回复: 7

如何才能实现这样一个对图层管理?

[复制链接]
发表于 2005-11-16 07:42 | 显示全部楼层 |阅读模式

好长时间没发贴了,这次遇到一个难题,来请教大家了。

假设一张CAD图纸,有A、B、C、D四个图层。其中A、B、C是给客户看的。D是自用的。想将图发到客户后,不让客户看到D层(不是简单的关闭D层的显示),也不能对D层进行任何的修改,不让客户知道D层的存在。客户可以将A、B、C层做修改。然后发回图纸给我后,我还能看到D层,也可以对D层进行管理。如何才能实现这一目的呢?

曾经看过一个朋友的公司的图纸是这样做的。不知道应该怎么做?请高手指教!万分感谢!!!

发表于 2005-11-16 08:20 | 显示全部楼层
发给客户的图纸只有A,B,C图层的内容,图纸发回来后你再把D层内容加进去,OK?
发表于 2005-11-16 09:02 | 显示全部楼层

如果客户是菜鸟的话,隐藏一下就可以了,

(defun c:hideobj( / ss i ents);隐藏对象
  (setq ss (ssget "x" '((8 . "D"))))
  (setq i 0)
  (repeat (sslength ss)
    (setq ents (entget (ssname ss i)))
    (if (assoc 60 ents)
      (setq ents (subst '(60 . 1) (assoc 60 ents) ents))
      (setq ents (append ents (list '(60 . 1))))
    )
    (entmod ents)
    (setq i (1+ i))
  )
  (princ)
)
(defun c:disbj( / ss i ents);显示对象
  (setq ss (ssget "x" '((8 . "D"))))
  (setq i 0)
  (repeat (sslength ss)
    (setq ents (entget (ssname ss i)))
    (if (assoc 60 ents)
      (setq ents (subst '(60 . 0) (assoc 60 ents) ents))
      (setq ents (append ents (list '(60 . 0))))
    )
    (entmod ents)
    (setq i (1+ i))
  )
  (princ)
)

发表于 2005-11-16 09:06 | 显示全部楼层
如果客户是FLYING版主的话,怎么办呢?还是用最土的法子 :D层内容用外部参照做得了.
 楼主| 发表于 2005-11-16 17:55 | 显示全部楼层

飞哥,太好了,想要的就是你所写的。客户应该不知道D层。所以也就不会去刻意找了,哈哈,谢谢飞哥。还有2楼的方法不错,但是麻烦了点。四楼的也是好主意,谢谢三位了

发表于 2005-11-26 23:27 | 显示全部楼层
怎么使用啊?
发表于 2005-12-28 01:19 | 显示全部楼层
好!!飞哥的方法非常好!!又学到了好东西。
发表于 2005-12-28 19:09 | 显示全部楼层
aa
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-6-14 21:28 , Processed in 0.993921 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表