[LISP程序]：如何删除一条或多条已知端点(如p1、p2……)的线

tangdeyu · 发表于 2005-7-17 19:57:24

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

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

×

在程序中，由于需要，画了几条线，最终成图时不需要，在画线时用(command "line" p1 p2 "")，那么在删除时，如何与这些端点联系上呢？是什么格式？恳请赐教。

lemonx · 发表于 2005-7-17 20:37:21

用快速选择，除非你用2002以下版本

tangdeyu · 发表于 2005-7-17 20:44:26

我说的是在程序中自动实现，如
……
……
(setq p1 (polar……
(setq p2 (polar……
……
……
(command "line" p1 p2 "")
……
……
(在这里自动删除p1 p2两点组成的线)
……
……

主要是我不太清楚格式，越是基础的东西论坛上越没有

linsankai · 发表于 2005-7-17 21:00:57

用lsp自带的ssget或者xd_api的选择集函数构建通过一个点并加过滤实体条件的的选择集合，然后删除这个选择集合。具体用法自己去查阅，这样才能真正学到手！
我指路_你探索！

eachy · 发表于 2005-7-17 21:38:15

画线时画到特定图层

yshf · 发表于 2005-7-17 21:40:27

……
;(setq ssa (ssadd))
;开始画线……
(command "line" p1 p2 "")
(ssadd (entlast) ssa)
……
……
(command "line" pn-1 pn "")
(ssadd (entlast) ssa)
……
;画线结束，删除上面所画的线
(command "_erase" ssa "" "redraw")
……

tangdeyu · 发表于 2005-7-17 22:04:10

如果能与端点联系起来，就更好了；因为我用的线条不多最多就5条；erase能直接指向线的端点吗；如果就删除一条线如何写？？

aeo · 发表于 2005-7-18 00:38:58

(setq ss (ssget (list '(0 . "LINE")(cons 10 yourpoint)))) ;;或11
(command "erase" ss "")

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

[LISP程序]：如何删除一条或多条已知端点(如p1、p2……)的线

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

相关帖子

谢谢光临

构建通过一个点的选择集合，然后删除他