明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1481|回复: 7

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

[复制链接]
发表于 2005-5-22 15:58 | 显示全部楼层 |阅读模式
请问各位前辈,这样选择已经选择的图元的前一个呀?例如有如下图元在附件里,现在已经选定了第一行,要这样才能够选择第二行呢,文件是我将选择集打印出来的,而不是文本文档,请各位高手帮帮忙!!!感激不尽,我看了好久唯一的线索就是(5 . "97F"),后面的"97F"是有顺序的,它是前面一个是"97E",
发表于 2005-5-22 16:03 | 显示全部楼层
别急,慢点说,说了一通看不懂啊
 楼主| 发表于 2005-5-22 16:05 | 显示全部楼层
附件

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
发表于 2005-5-22 16:14 | 显示全部楼层
用entnext不行吗?
 楼主| 发表于 2005-5-22 16:17 | 显示全部楼层
在 AUTOLISP 里怎样实现呢?我是一个出学者,能告诉我在lisp里的具体格式吗?
发表于 2005-5-22 16:38 | 显示全部楼层
我还是没有明白你的具体意图,你到底是要做什么,我不知道,
 楼主| 发表于 2005-5-22 16:47 | 显示全部楼层
本帖最后由 作者 于 2005-5-22 17:07:39 编辑

我是想选择了一个图元后比如是((-1 . <图元名: 4009f178>) (0 . "TOLERANCE") (5 . "97F") 我现在想选择它的前一个图元((-1 . <图元名: 4009f170>) (0 . "LEADER") (5 . "97E"),要用lisp怎么实现
发表于 2005-5-22 17:54 | 显示全部楼层
看看这个,程序开始画图后用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)
)
)
)
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-5-12 02:13 , Processed in 0.174540 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表