选择集

jeike456 · 发表于 2011-12-20 13:50

请教大家，怎样写可以，选择紫色的圆弧和红色选择框，可以获得A和B两点

byghbcx · 发表于 2011-12-20 15:16

再说详细点，根据什么得到什么？

jeike456 · 发表于 2011-12-20 15:20

选圆弧可以得到圆弧两端点，也就得到了B点，但是怎么从选到的绿线得到A点？

jeike456 · 发表于 2011-12-20 15:21

从选到的所有绿线中找出直线AB的A点

Andyhon · 发表于 2011-12-20 16:33

;; 选择紫色的圆弧和红色选择框
;; 改单选圆弧如何?

(Defun C:test ()
(setq ee (entsel "\n选择紫色的圆弧<<近AorB点: ")
pt (osnap (cadr ee) "end")
ee (car ee)
ss (ssget "C" pt pt)
)
(ssdel ee ss)
(setq ee (ssname ss 0)
pts (acet-geom-object-end-points ee) ; 获得A和B两点
)
)

jeike456 · 发表于 2011-12-21 09:45

谢谢Andyhon,你的方法我试了可以获得A和B两点，要是不用 “近AorB点:" 就好了，因为一不小心就会点错
大家还有更好的办法吗？

jeike456 · 发表于 2011-12-21 09:48

还有我图上的选择框是 ssget 选择时的框不是真的有那个框

jeike456 · 发表于 2011-12-21 09:51

(点选紫色的圆弧 ----> 框选绿色的线 -----> 得到A和B点) 我表达的不好,不好意思

Andyhon · 发表于 2011-12-21 10:43

(Defun C:test ()
(setq ee (entsel "\n选择紫色的圆弧: ")
      ee (car ee)
      pts (acet-geom-object-end-points ee) ; 获得圆弧两端点
      pa (car  pts)
      pb (cadr pts)
      ssa (ssget "C" pa pa '((0 . "LINE")))
      ssb (ssget "C" pb pb '((0 . "LINE")))
)

(princ "\n框选连结区的线: ")
(setq ss (ssget '((0 . "LINE"))))

(cond
((ssmemb (setq ee (ssname ssa 0)) ss))
((ssmemb (setq ee (ssname ssb 0)) ss))
(T (Alert "状况外!"))
)
(acet-geom-object-end-points ee) ; 获得A和B两点
)

jeike456 · 发表于 2011-12-21 11:57

谢谢Andyhon，达到效果了，谢谢你的帮助

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

选择集

本帖子中包含更多资源

浏览过的版块