[求助]：关于acedSSGet的一个问题

gshengli

acedSSGet的“W”或“C”创建选择集，好像只能选中当前窗口中显示的实体，是我什么地方弄错了，还是acedSSGet这个函数就这样？

XDSoft

最初由 gshengli 发布
[B]acedSSGet的“W”或“C”创建选择集，好像只能选中当前窗口中显示的实体，是我什么地方弄错了，还是acedSSGet这个函数就这样？ [/B]

ssget 构建选择集只要参数是X的情况下，可以选择到屏幕外的实体，其他所有参数都是对屏幕内实体操作，因为ACAD维护了一个“显示表”的结构，所有的其他参数，都是基于屏幕上的象素的，基于“显示表”结构来过虑实体，这样能使操作速度最快。

如果你希望W能选择到屏幕外的实体，你需要先判断下W的对角点是否都在屏幕内，如果不在，ZOOM W 到屏幕内，然后在进行SSGET操作，操作后，可以恢复屏幕到ZOOM前的状态。

昨天我回复了一个朋友的这个问题。你参见下下面XDRX_API的解决方法：

2. <normalfont>
   
3. 9.xdrx_drawing_zoomw
   
4. 
   
5. 调用格式：(xdrx_drawing_zoomw  <点1>  <点2> [dist])
   
6.          (xdrx_zoomw <中心点> <宽度> <高度>)
   
7. 
   
8. 功能：以点1，点2为参数做zoom "w"，并将左下角和右上角分别向外扩大一个小增量dist。
   
9.       若不提供参数dist,则默认的增量是：两点距离/(当前屏幕显示高度*80)
   
10. 返回值： nil。
    
11. 
    
12. 示例：判断直线两端点是否都在屏幕内，若不是，以直线两端点为参数做ZOOM W。
    
13.       (函数8和9结合使用示例)
    
14.       变量含义：e :line实体
    
15.       (setq ed (entget e))
    
16.       (setq p10 (cdr (assoc 10 ed))
    
17.             p11 (cdr (assoc 11 ed))
    
18.       )
    
19.       (if (setq tf (xdrx_isptoffscr p10 p11))
    
20.          (xdrx_zoomw p10 p11)
    
21.       )
    
22.       .....
    
23.       .....
    
24.       (if tf
    
25.          (command "zoom" "p") ;;若TF值为T,说明做过了ZOOM,因此，需要zoom p,返回先前屏幕，恢复
    
26.       )
    
27. 为什么需要判断点是否在屏幕外呢，因为，AUTOCAD构造选择集等是基于象素的，若实体不在屏幕内，许多
    
28. 操作会得不到正确的结果。
    
29. </font>

<normalfont><br /> 9.xdrx_drawing_zoomw<br /> <br /> 调用格式：(xdrx_drawing_zoomw  <点1>  <点2> [dist])<br />          (xdrx_zoomw <中心点> <宽度> <高度>)<br /> <br /> 功能：以点1，点2为参数做zoom "w"，并将左下角和右上角分别向外扩大一个小增量dist。<br />       若不提供参数dist,则默认的增量是：两点距离/(当前屏幕显示高度*80)<br /> 返回值： nil。<br /> <br /> 示例：判断直线两端点是否都在屏幕内，若不是，以直线两端点为参数做ZOOM W。<br />       (函数8和9结合使用示例)<br />       变量含义：e :line实体<br />       (setq ed (entget e))<br />       (setq p10 (cdr (assoc 10 ed))<br />             p11 (cdr (assoc 11 ed))<br />       )<br />       (if (setq tf (xdrx_isptoffscr p10 p11))<br />          (xdrx_zoomw p10 p11)<br />       )<br />       .....<br />       .....<br />       (if tf<br />          (command "zoom" "p") ;;若TF值为T,说明做过了ZOOM,因此，需要zoom p,返回先前屏幕，恢复<br />       )<br /> 为什么需要判断点是否在屏幕外呢，因为，AUTOCAD构造选择集等是基于象素的，若实体不在屏幕内，许多<br /> 操作会得不到正确的结果。<br /> </font>

上面面代码中的函数 xdrx_isptoffscr  是判断给定的点是否在屏幕内的函数。

1. <normalfont>
   
2. 8.xdrx_isptoffscr
   
3. 
   
4. 调用格式：(xdrx_isptoffscr  <点1>  [<点2>]...[<点n>])
   
5. 
   
6. 功能：检测 '点1' 或 '点2'...[<点n>] 是否在当前屏幕以外。若有一个点在屏幕外，返回T。
   
7.       只有都在屏幕内，才返回NIL。
   
8. </font>

复制代码

gshengli

谢谢，明白了