nyistjz 发表于 2023-7-14 21:34:12

批量视口隔离

布局中视口多的时候，会影响运行刷新速度，这个时候，就可以只显示部分视口，隔离其它，就用到了下面的这个程序 。
但是这个程序也有个问题，就是视口多的时候，这个开关的速度也是不能让人满意的。

有没有朋友可以对这个程序进行优化，加快这个视口开关的速度 ？


;显示特定视口
(defun c:actvp(/ n ss)
      (setvar "cmdecho" 0)
      (if (= (getvar "tilemode") 1) (setvar "tilemode" 0))
      (princ "\n请选择需要显示的特定视口(回车全显)")
      (cond
                ((setq ss (ssget (list (cons 0 "viewport"))))
                        (setq n (sslength ss))
                        (setvar "maxactvp" (1+ n))
                        (vl-cmdf "vports" "on" ss "")
                        
                )
                (t (setvar "maxactvp" 64))
      )
      (setvar "cmdecho" 1)
      (princ)
)

nsh935 发表于 2023-7-15 00:28:12

谢谢分享！明经由您更酱菜！

ssyfeng 发表于 2023-7-15 11:41:19

你这个速度慢可能是因为你打开视口时对象比较多显示的慢，不是这个程序问题。

中位数Median 发表于 2023-7-18 09:32:34

最讨厌一个布局里放几十张图纸上百个视口的人了，自己画图不觉得卡吗？老老实实一个布局一张图不好吗

jkop 发表于 2023-7-18 09:56:43

收藏，未来有机会用到！顶！

KO你 发表于 2023-7-19 23:16:39

本帖最后由 KO你 于 2023-7-19 23:18 编辑

怎么用你这个命令后命令行显示的提示是乱码

pxt2001 发表于 2023-7-20 22:12:49

中位数Median 发表于 2023-7-18 09:32
最讨厌一个布局里放几十张图纸上百个视口的人了，自己画图不觉得卡吗？老老实实一个布局一张图不好吗

别人的画图习惯，不要去讨厌。其实这种画图方法很直观，画图方便。只不过CAD没有解决多视口显示慢的问题。否则巨多人会使用大量视口。

lxl217114 发表于 2023-7-21 15:53:51

本帖最后由 lxl217114 于 2023-7-21 15:55 编辑

去年我也有类似的需求
大佬start4444帮忙解决了，可以看看是不是差不多的需求。
帖子地址 http://bbs.mjtd.com/thread-186789-1-1.html
页: [1]
查看完整版本: 批量视口隔离