xiaopan84 发表于 2009-5-22 13:22:00

[求助]有对象隐藏的lisp么？

<p>以前msteel里面有一个对象隐藏，很好用，现在换了2010，那个工具箱不能用了，</p><p>请问哪位达人知道有能有实现对象隐藏功能的lisp。</p><p>另外还有只显示选择对象的lisp！！谢谢谢谢！！</p>

samshs 发表于 2009-5-22 21:10:00

<p>;通过选择隐藏图层 <br/>(defun C:hu(/ l9_ss l9_ent l9_lay l9_clay ii) <br/>(princ "\n选取隐藏图层参考对象: ")<br/>&nbsp; (setvar "CMDECHO" 0)<br/>(setq l9_ss (ssget)) <br/>(setq l9_clay (getvar "clayer")) <br/>(setq ii 0) <br/>(command "-layer") <br/>(repeat (sslength l9_ss) <br/>&nbsp; (setq l9_ent (ssname l9_ss ii)) <br/>&nbsp; (setq l9_lay (cdr (assoc 8 (entget l9_ent)))) <br/>&nbsp; (if (/= l9_lay l9_clay) <br/>&nbsp; (command "off" l9_lay)(command "off" l9_lay"y") )<br/>&nbsp; (setq ii (1+ ii)) )<br/>(command ""))<br/>(setvar "CMDECHO" 1)<br/>(prin1)</p>

jfxia 发表于 2009-5-22 21:44:00

<p>帮你看了一下，</p><p><a href="http://www.mjtd.com/Codes/ArticleShow.asp?ArticleID=988">http://www.mjtd.com/Codes/ArticleShow.asp?ArticleID=988</a></p><p></p><p></p>

ucuc2003 发表于 2013-6-14 21:07:20

http://bbs.mjtd.com/forum.php?mod=viewthread&tid=90120

自贡黄明儒 发表于 2013-6-14 21:56:58

本帖最后由 自贡黄明儒 于 2013-6-15 11:32 编辑

好象给对象添加一个组码，它就隐臧了。
http://bbs.mjtd.com/thread-86014-1-1.html

页: [1]
查看完整版本: [求助]有对象隐藏的lisp么？