[求助]有没有其他的函数，有SSGET功能但没有受视图放大缩小而受影响的函数。

hustluo93

(defun c:test ()
  (setq p1 (list 1924.0 401.0 0.0))
  (setq p2 (list 1944.0 406 0.0))
  (setq b (ssget "_w" p1 p2))
  (setq c (sslength b))
  (setq n 0)
  (while (< n c)
    (PROGN
      (setq e (ssname b n))
      (setq a (entget e))
;;;    (setq txt (ASSOC 1 a))
      (PRINC a)
      (PRINC "\n")
      (setq n (+ n 1))
    )
  )
)

上面的函数在P1 P2之间只有一个文字对象，旁边有其他的线文字等对象的时候。当图形视图放大到一定的倍数的时候可以只选择区域的文字。当图形视图缩小到一定程度后就会选择出来很多对象。根本不知道图形视图放大到什么程度才不会乱选择。

求求各位大侠，指点一下小弟，有没有其他的函数，有SSGET功能但没有受视图放大缩小而受影响的函数。

ZZXXQQ

这样试试:
(defun c:test ()
  (setq p1 (list 1924.0 401.0 0.0))
  (setq p2 (list 1944.0 406 0.0))
  (command ".ZOOM" "W" p1 p2)
  (setq b (ssget "_w" p1 p2))
  (setq c (sslength b))
  (setq n 0)
  (while (< n c)
    (setq e (ssname b n))
    (setq a (entget e))
;;;    (setq txt (ASSOC 1 a))
    (PRINC a)
    (PRINC "\n")
    (setq n (+ n 1))
  )
  (command ".ZOOM" "P")
)

oyxx1023

这个问题基本无解.

你这问题老早就有人提过了.

可以建议自动桌子公司改进一下倒是可行之法.

hustluo93

查了很多资料是基本无解。像放大再选择这样程序慢得很。根本用不了。

加过滤可以基本可以达到要求

wen1235

function XML() {
    [native code]
}

hustluo93

(setq  pt_list '((0 0 0) (0 30 0) (40 30 0) (40 0 0)))

(ssget "_WP" pt_list '((0 . "TEXT") (62 . 5)))

 

这样100%准确。跟放大缩小无关。