[求助]：对于pedit合并新产生的图元（合并前的一些图元势必不存在），如何用LISP获取

hsslyl · 发表于 2005-10-30 16:37:29

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

对于line等新产生的图元，可以在执行line之前，先设置(setq ename (entlast))，执行line之后，通过若干次运行(setq ename (entnext ename)并添加入选择集xzj直至ename为nil，即可获取新图元选择集xzj。但是，对于pedit合并新产生的图元，合并前的ename在合并后可能已不存在，再用上述方法不能正常地获取所有新图元。
请教各位，还有什么好办法。有与entnext相反的函数就好了，这样就可以从(entlast)开始往回搜索（次数知道）。

Underway · 发表于 2005-10-30 16:56:50

新建一个圆 or 文字 or 点 (一个不会被 pedit 转化掉的实体)
(setq ee (entlast))
.
.
.
. (your Pedit command)

(setq NewSS (ssadd))
(while (setq ee (entnext ee))
(ssadd ee NewSS)
)

hsslyl · 发表于 2005-10-30 20:49:18

不错的想法，谢谢！

1121443108qaz · 发表于 2018-7-17 22:24:49

Underway 发表于 2005-10-30 16:56
新建一个圆 or 文字 or 点 (一个不会被 pedit 转化掉的实体)
(setq ee (entlast))
.

66666666666

/db_自贡黄明儒_ · 发表于 2018-7-17 22:47:12

既然已经不存在了，不搜来有什么用？

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

[求助] [求助]：对于pedit合并新产生的图元（合并前的一些图元势必不存在），如何用LISP获取

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

点评