[求助]布局空间内视口显示的开关lisp编程
有没有哪位能手有空编一下布局空间视口的显示开和关的lisp，思路如下：输入命令）有‘显示不要关闭的视口和全部打开视口’的选项，全部打开的选项最好在这里用右键执行）接着是左键选择要打开显示的视口而且在同一布局空间内的其他视口都关闭，即使是选择已经打开的视口也能执行。现在在我身边很多人喜欢在图纸中的同一个布局内放置比较多的图纸框，但是修改起来显示刷新比较慢，而且耗缓存资源。以前在论坛中有个图层锁定的lisp比较类似其功能结构。 本帖最后由 作者 于 2008-8-21 18:59:50 编辑 <br /><br /> <p><font color="#000000" size="1">命令: _EBG_Viewporton<br/>命令:<br/>选择视口打开，其余关闭<全选>:<br/>选择对象: 指定对角点: 找到 2 个</font></p><p><font color="#000000" size="1">选择对象:</font></p><p><font color="#000000" size="1">本布局共 6 个视口，其中 2 个打开，4 个关闭。</font></p><p><font color="#000000" size="1">命令:</font></p><p><font color="#810081"></font></p><p>下载： <a><font color="#0000ff" size="3"><u>http://www.mjtd.com/Soft/SoftShow.asp?SoftID=125</u></font></a></p> ;鎖定視口----------------------------------------(defun c:vn ()
(command "-vports" "l" "ON")
(princ)
)
;開視口------------------------------------------------
(defun c:vd ()
(command "-vports" "ON")
(princ)
)
;關視口----------------------------
(defun c:vs ()
(command "-vports" "off")
(princ)
)
非常感谢！！！！！！！！ 这个用的着，谢谢。 samshs 发表于 2008-12-31 18:30 static/image/common/back.gif
谢谢啊，用起来很方便
页:
[1]