多段线清理工具（清除重复顶点，重复段）

Lispboy · 发表于 2013-7-1 09:09:45

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

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

x

;|
  多段线清理

|;
(defun c:XDTB_PolyCompress ( / ss)
  (prompt  "\n选取要处理的多段线<全选>:" )
  (if (not (setq ss (ssget '((0 . "*polyline")))))
(setq ss (ssget "x" '((0 . "*polyline"))))
  )
  (xdrx_polyline_compress ss t)
  (princ)
)

Free-Lancer · 发表于 2013-7-1 09:27:09

本帖最后由 Free-Lancer 于 2013-7-1 09:29 编辑

这个函数不会把 ss 清空或者ss中有了空实体吧

看样子起点变了, 是生成了新实体?

还有对含 arc 处理如何?

Lispboy · 发表于 2013-7-1 09:39:51

Free-Lancer 发表于 2013-7-1 09:27
这个函数不会把 ss 清空或者ss中有了空实体吧

看样子起点变了, 是生成了新实体?

起点没变，是我懒了，没再截图，图是用的我在函数发布里面发的一个函数用的图片，那个函数是清理重复点重复段，并返回左下为起点的逆时针的点表。
这个函数我摸索看，就是清空多余的重合的点，要是点有重合就留下一个，所以跟ARC应该没关系。

SS清空这个没明白，工具只是把有重复点的多段线清理下。

st788796 · 发表于 2013-7-1 10:20:06

Lispboy 发表于 2013-7-1 09:39
起点没变，是我懒了，没再截图，图是用的我在函数发布里面发的一个函数用的图片，那个函数是清理重复点重 ...

清理重复点后，如果是旧实体还保留在选择集，新实体的话肯定不在原选择集，如果后续用这个选择集就要重新获取新实体。
捏造了一个情况，这个要处理吗

Lispboy · 发表于 2013-7-1 10:35:31

st788796 发表于 2013-7-1 10:20
清理重复点后，如果是旧实体还保留在选择集，新实体的话肯定不在原选择集，如果后续用这个选择集就要重新 ...

在深层次的，只能是老大回你了，我只是用API。

XDSoft · 发表于 2013-7-1 10:48:07

st788796 发表于 2013-7-1 10:20
清理重复点后，如果是旧实体还保留在选择集，新实体的话肯定不在原选择集，如果后续用这个选择集就要重新 ...

是新生成了实体，但实体还在原来的选择集里面。

因为用了ARX的 SWAPID，把ID给交换了。

st788796 · 发表于 2013-7-1 10:58:28

XDSoft 发表于 2013-7-1 10:48
是新生成了实体，但实体还在原来的选择集里面。

因为用了ARX的 SWAPID，把ID给交换了。

这就对了，清理重复一般不会单一应用，如果原选择集还存在就可以用这个选择集进行后续处理了比如

(setq ss (ssget '((0 . "*polyline"))))
(xdrx_polyline_compress ss)
(xdrx_setsstodb ss 0)
(while (setq e (xdrx_getentdata 0))
....
)

newer · 发表于 2013-7-1 11:07:46

st788796 发表于 2013-7-1 10:58
这就对了，清理重复一般不会单一应用，如果原选择集还存在就可以用这个选择集进行后续处理了比如

哈，好典型的API程序结构。

yjjyjj · 发表于 2013-7-12 14:48:51

多个多义线有重复边放在一起，可以处理吗？

newer · 发表于 2013-7-12 15:31:57

yjjyjj 发表于 2013-7-12 14:48
多个多义线有重复边放在一起，可以处理吗？

你说的这个是属于重复实体的范畴了，如果需要，开个新帖子，申请下吧。详细描述下情况，贴图，传测试图纸。

renyong119 · 发表于 2013-8-22 10:26:10

那点分走人积分太少什么都不能下载！！！

sixthsixth · 发表于 2013-10-2 23:59:27

怎么加载不起来呢？目前最新版的API，LIB

XDSoft · 发表于 2013-10-3 00:11:38

sixthsixth 发表于 2013-10-2 23:59
怎么加载不起来呢？目前最新版的API，LIB

函数有变化，帮你重新编辑了下代码，再拷贝回去试试。

sixthsixth · 发表于 2013-10-3 16:11:47

XDSoft 发表于 2013-10-3 00:11
函数有变化，帮你重新编辑了下代码，再拷贝回去试试。

改后的代码，能运行了，但是运行后，没有进行多段线重复顶点的处理

XDSoft · 发表于 2013-10-3 16:55:07

sixthsixth 发表于 2013-10-3 16:11
改后的代码，能运行了，但是运行后，没有进行多段线重复顶点的处理

你上面这张图前后不是有变化了嘛。原来代码没有加入重复段的部分。
帮你修改了代码，再拷贝回去试试。

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

[多段线] 多段线清理工具（清除重复顶点，重复段）

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

相关帖子

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评