求助一个 批量删除多段线 多余节点的 代码

sunyukun

求助一个 批量删除多段线 多余节点的 代码

newer

1. (defun c:tt ()
   
2.   (if (and (xdrx_initssget "\n选择处理的多段线<退出>:")
   
3.            (setq ss (xdrx_ssget '((0 . "LWPOLYLINE"))))
   
4.       )
   
5.     (xdrx_polyline_compress ss t nil)
   
6.   )
   
7.   (princ)
   
8. )
   

(defun c:tt ()<br />   (if (and (xdrx_initssget "\n选择处理的多段线<退出>:")<br />            (setq ss (xdrx_ssget '((0 . "LWPOLYLINE"))))<br />       )<br />     (xdrx_polyline_compress ss t nil)<br />   )<br />   (princ)<br /> )<br />

sunyukun

非常感谢版主，

newer

sunyukun 发表于 2017-6-20 12:31

每日插件发了一个功能更多的，可以设置距离精度，角度精度的，去看看

http://bbs.xdcad.net/thread-710135-1-1.html

如果解决问题了，把悬赏贴个结了吧。

sunyukun

没有函数，老师可以把函数也贴进去吗

newer

sunyukun 发表于 2017-6-20 13:16

下载XDRX API 安装

sunyukun

老师，好的谢谢

xoyo88

批量删除多段线多余节点