求救了,还是选择集是问题,

sihan · 发表于 2005-5-22 15:58:00

请问各位前辈,这样选择已经选择的图元的前一个呀?例如有如下图元在附件里,现在已经选定了第一行,要这样才能够选择第二行呢,文件是我将选择集打印出来的,而不是文本文档,请各位高手帮帮忙!!!感激不尽,我看了好久唯一的线索就是(5 . "97F"),后面的"97F"是有顺序的,它是前面一个是"97E",

SWAYWOOD · 发表于 2005-5-22 16:03:00

别急，慢点说，说了一通看不懂啊

sihan · 发表于 2005-5-22 16:05:00

附件

SWAYWOOD · 发表于 2005-5-22 16:14:00

用entnext不行吗？

sihan · 发表于 2005-5-22 16:17:00

在 AUTOLISP 里怎样实现呢?我是一个出学者,能告诉我在lisp里的具体格式吗?

SWAYWOOD · 发表于 2005-5-22 16:38:00

我还是没有明白你的具体意图，你到底是要做什么，我不知道，

sihan · 发表于 2005-5-22 16:47:00

本帖最后由作者于 2005-5-22 17:07:39 编辑

我是想选择了一个图元后比如是((-1 . <图元名: 4009f178>) (0 . "TOLERANCE") (5 . "97F") 我现在想选择它的前一个图元((-1 . <图元名: 4009f170>) (0 . "LEADER") (5 . "97E"),要用lisp怎么实现

SWAYWOOD · 发表于 2005-5-22 17:54:00

看看这个，程序开始画图后用sstart 结束最后一个图元时用ssend 产生选择集ss,再查找图元就很方便 (defun sstart ()
(setq ss (ssadd))
(setq first (entlast)
ss (ssadd first ss)
)
)
(defun ssend ()
(while (setq s (entnext first))
(setq ss (ssadd s ss)
first (entnext first)
)
)
)

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

求救了,还是选择集是问题,

本帖子中包含更多资源