帮忙！！

梁旭武

不知道多边形有几个端点他的元素名称是：ss1


怎么得到选择集是这个多边形围成的范围呢

spring

根据选定对象创建选择集
(ssget [sel-method] [pt1 [pt2]] [pt-list] [filter-list]) 选择集中可以包含图纸空间和模型空间两个空间中的对象，但该选择集用于某操作时，那些在当前无效的空间中的对象会被 ssget 过滤掉。由 ssget 函数返回的选择集中仅包含主图元（不包含属性和多段线顶点）。 参数 sel-method 字符串，指定对象选择方法。有效选择方法包括：
C 窗交。
CP 圈交（指定多段线内和与该多段线相交的所有对象）。
F 栏选。
I 隐含窗口选择（在执行 PICKFIRST 期间选择的对象）。
L 添加到数据库的最后一个可见对象。
P 最后一个创建的选择集。
W 窗口选择。

梁旭武

小弟比较笨，冷冲模大侠让你见笑了，还是厚着脸皮问：意思是说就算不知道


这个多边形有多少个端点也一样可以由选择集(ssetq ss "x" "w" ???)选中由这个多边形所


围成的所实体？

spring

试试看行不 (defun c:hh (/ ed10-list ss ed n ed10 ss1)
(setq ed10-list nil)
(setq ss (entsel "\n请选择多边形:"))
(if ss
(progn
(setq ed (entget (car ss)))
(setq n 0)
(while (> (length ed) n)
(setq ed10 (nth n ed))
(if (= (car ed10) 10)
(setq ed10-list (append (list (cdr ed10)) ed10-list))
)
(setq n (1+ n))
)
)
)
(setq ss1 (ssget "cp" ed10-list))
(command "_.MOVE" ss1 "" pause)
(princ)
) 程序的最后是移动选择的物体.

梁旭武

我要的就是这样的效果，令弧冲大侠，你的招数可真多，何日才能与君同起同坐!!!谢了!

meflying

冷冲模变成了令弧冲?

梁旭武

呵呵。。。。我可是故意的，这名适合他，可别说我没有诚意!!!有机会我会在这里找一个任盈盈。

梁旭武

(setq pt '( 520 520))


(setq pt1 '(110 120))


(setq s ( getdist pt         pt1))


这样是不行的!!!能否不在键盘上输入，或者不用在屏幕上拾取呢来实现呢？

BDYCAD

取这两点的这样做

(setq pt '(520 520 )) (setq pt1 '(110 120)) (setq s (distance pt pt1))

spring

梁旭武发表于2004-8-23 13:51:00呵呵。。。。我可是故意的，这名适合他，可别说我没有诚意!!!有机会我会在这里找一个任盈盈。

晕倒,这适合你吧,你漫漫找任盈盈吧.