应用XDRX API创建选择集（曲线）连通区域最外轮廓线

Lispboy

SPLINE边界



PLINE边界

几个XDRX API的组合，就很容易的创建曲线的最外轮廓线，而且轮廓线实体保持原样，SPLINE还是SPLINE，非SPLINE生成LWPOLYLINE封闭边界。
扩展下，加几行代码，就支持图块的生成最外轮廓。

1. (defun c:tt ()
   
2.   (xdrx_begin)
   
3.   (if (and (setq ss (ssget '((0 . "*line,arc,ellipse,circle"))))
   
4.            (setq ss (xdrx_curve_intersectbreak ss))
   
5.            (setq ss (xdrx_region_make ss))
   
6.       )
   
7.     (progn
   
8.       (xdrx_setsstodb ss 0)
   
9.       (xdrx_setsstodb ss 1)
   
10.       (while (setq e1 (xdrx_getentdata 0))
    
11.         (while (setq e2 (xdrx_getentdata 1))
    
12.           (xdrx_region_booleanoper e1 e2 0)
    
13.         )
    
14.       )
    
15.       (setq ss (xdrx_region->curve ss))
    
16.       (xdrx_curve_join ss)
    
17.     )
    
18.   )
    
19.   (xdrx_end)
    
20.   (princ)
    
21. )
    
22. 
    

(defun c:tt ()<br />   (xdrx_begin)<br />   (if (and (setq ss (ssget '((0 . "*line,arc,ellipse,circle"))))<br />            (setq ss (xdrx_curve_intersectbreak ss))<br />            (setq ss (xdrx_region_make ss))<br />       )<br />     (progn<br />       (xdrx_setsstodb ss 0)<br />       (xdrx_setsstodb ss 1)<br />       (while (setq e1 (xdrx_getentdata 0))<br />         (while (setq e2 (xdrx_getentdata 1))<br />           (xdrx_region_booleanoper e1 e2 0)<br />         )<br />       )<br />       (setq ss (xdrx_region->curve ss))<br />       (xdrx_curve_join ss)<br />     )<br />   )<br />   (xdrx_end)<br />   (princ)<br /> )<br /> <br />

zznv

命令发生错误，错误提示：xdrx_region_make ARX命令发生异常

革天明

如果线之间有间隙，未完全闭合时如何处理呢？xdrx_region_make是否有忽略间隙设定？

newer

革天明 发表于 2018-11-14 23:43
如果线之间有间隙，未完全闭合时如何处理呢？xdrx_region_make是否有忽略间隙设定？

去看下这个
【拓扑边界】带容差支持的BPOLY

11 个回复 - 258 次查看

XDRX API 2018.0328+版本，增强了几个求拓扑边界函数的功能，下面介绍支持带容差的构建边界函数 xdrx_geom_bpoly，设置容差，通过设置系统变量 "boundaryextendlength"的值达到，设置系统变量的函数是 xdrx_setvar ...

2018-4-5 20:01 - newer - XDRX_API应用

newer

革天明 发表于 2018-11-14 23:43
如果线之间有间隙，未完全闭合时如何处理呢？xdrx_region_make是否有忽略间隙设定？

(xdrx_setvar "boundaryextendlength" 100.0)
(xdrx_region_make (ssget))

weizx2000

谢谢分享，学习了~~