大师们帮忙优化视口功能

--@----- · 发表于 2013-11-20 20:44:59

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

如下图所示，一般我们画图的时候喜欢把绘图区分两个视口，左边视口放一些参考图，平面图之类的，右边就是要画的立面图，什么的。也就是右边的视口成了绘图区。但是视口范围较小画图很不方便。现在希望能有个功能也就是我双击右边的视口可以使右边窗口最大化视口，当我需要参考左边的图元是，我再双击下右边视口，又会出现左右两个视口，左边是作为参考图的画立面需要左边平面图拉引线的。功能就是这么样。绘图区有两个视口，在任意一个视口中双击，就会把当前视口变成一个视口。说直白了就是在CAD绘图区来回双击，可以切换一个视口和两个视口的显示！

--@----- · 发表于 2013-11-20 21:04:47

截个CAD图示意或许更明白些

Lispboy · 发表于 2013-11-20 21:06:19

为啥要双击窗口啊，这样会和其他操作有歧义的，在状态条最下面加个开关不也行吗？

--@----- · 发表于 2013-11-20 21:13:04

是的，我的双击是面板的，会冲突，如果能有个开关更好啦，之前都是从绘图区四边界拉视口线，不适合边参考边画图的，才想出这个功能！

newer · 发表于 2013-11-20 21:14:35

重载鼠标反应器，监视双击事件，然后写你的回调函数。

(vlr-mouse-reactor nil '((:vlr-beginDoubleClick . callback)))

(defun callback(pts)
...
)

写这个callback就行了。

--@----- · 发表于 2013-11-20 21:17:57

我会想不会写啊,LSP文盲{:soso_e113:}

Lispboy · 发表于 2013-11-20 21:40:48

--@----- 发表于 2013-11-20 21:17
我会想不会写啊,LSP文盲

看下面的演示，加状态栏开关

st788796 · 发表于 2013-11-20 22:16:57

屏幕比较小，一个视口看的都费劲，弄俩得配放大镜了

--@----- · 发表于 2013-11-20 22:31:46

st788796 发表于 2013-11-20 22:16
屏幕比较小，一个视口看的都费劲，弄俩得配放大镜了

没办法啊，你画立面，剖面什么图的都要有平面底图参考画的。

kwok · 发表于 2013-11-20 22:58:51

;;;用这个折中办法吧.
(defun C:v1() ;;显示成一个窗口
(vl-cmdf "_.VPORTS" "si" ))
(defun C:v2() ;;;双显窗口
(vl-cmdf "_.VPORTS" "2" "v"))

--@----- · 发表于 2013-11-20 23:15:50

本帖最后由 --@----- 于 2013-11-20 23:21 编辑

kwok 发表于 2013-11-20 22:58
;;;用这个折中办法吧.
(defun C:v1() ;;显示成一个窗口
(vl-cmdf "_.VPORTS" "si" ))

这个分合视口还是很方便的，不过跟我说的边画图边参考的还是不太实用，分俩视口，还是一个视口，图都变小居中了。如果你现在是单视口变回双视口，这个双视口最好还是上次的对图的那种样子。不然你还得去放大找到对图的那个地方，还有变成单个视口也是一样。单边双，还是双变单。最好和上次的是一样，也就是切换它。不是从新定义划分。要求比较高了{:soso_e100:}

st788796 · 发表于 2013-11-21 00:18:44

本帖最后由 st788796 于 2013-11-21 00:23 编辑

--@----- 发表于 2013-11-20 23:15
这个分合视口还是很方便的，不过跟我说的边画图边参考的还是不太实用，分俩视口，还是一个视口，图都变 ...

供参考,比命令好像快, 这个视口可以保存, 不过 VV 要判断是否已经存在,存在的时候不要再 split

(defun c:vv (/ aVp acdoc)
(vl-load-com)
(setq aVp
(vla-Add
(vla-get-Viewports
(setq acdoc (vla-get-activedocument (vlax-get-acad-object)))
)
"MyVPrt"
)
)
(vla-Split aVp acViewport2Vertical)
(vla-put-ActiveViewport acdoc aVp)
(princ)
)
(defun c:vvv (/)
(vlax-for vp (vla-get-viewports
(vla-get-activedocument (vlax-get-acad-object))
)
(vla-delete vp)
)
(vl-cmdf ".viewports" "si")
(princ)
)

--@----- · 发表于 2013-11-21 00:44:45

本帖最后由 --@----- 于 2013-11-21 00:57 编辑

st788796 发表于 2013-11-21 00:18
供参考,比命令好像快, 这个视口可以保存, 不过 VV 要判断是否已经存在,存在的时候不要再 split

不行哦，与我所表达的还是不一样。谢谢大侠花时间整这个，还是拉窗口好啦，只是图点小方便{:soso_e100:}
记得以前好像有人发过是按下TAB键切换的帖子，或者相关的内容吧，不清楚是切换视口的不,不过我这要求又大多了，切换单双视口的

--@----- · 发表于 2013-11-21 02:44:36

本帖最后由 --@----- 于 2013-11-21 02:46 编辑

再发表下新想法或许能实现。也就是我绘图区本来就是两个视口，只是左右视口所占的比例不一样，当我对图参考时，左右视口比例1：1，当我单独画图时候左右比例1:100 。这样就能达到同样的目的。也就是反复执行一个命令可以实现左边视口与右边视口1:1 ， 1:100的切换！（当然1:500，左边视口会更小，只是个举例），不是重新去定义视口，只是调节左右视口所占比例.....

st788796 · 发表于 2013-11-21 07:48:16

--@----- 发表于 2013-11-21 02:44
再发表下新想法或许能实现。也就是我绘图区本来就是两个视口，只是左右视口所占的比例不一样，当我对图参考 ...

你说的这个视口是布局的还是Viewports，前者可以设比例，后者没有比例

账号		自动登录	找回密码
密码			立即注册

[求助] 大师们帮忙优化视口功能

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

点评

点评

点评

点评

点评

点评

点评