entmake生成的多段线，在特定情况下形成“自交”，无法生成面域

yjtdkj

如下图所示，点表生成的多段线，按照图中1、2、3点的顺序生成，这样生成的多段线无法生成面域，提示“自交”此现象就是在特定的说3点相对位置，特定点顺序时才出现。谁能给解决？

yjtdkj

还有就是，如果手工绘出这样的三角形，又能生成面域了，真是奇怪了

xvjiex

请问：你是通过什么方法多段线生成面域的？

yjtdkj

xvjiex 发表于 2021-7-13 10:31
请问：你是通过什么方法多段线生成面域的？

用command命令region和vla-addregion方法，都不行

xvjiex

经测试，如果手工绘出这样的三角形(画单线方法)，如果region的顺序还是按照你的要求，任然是显示"自交"。所以要想解决，只能更改LWPOLYLINE的点的排序，不可能修改region功能的。

yjtdkj

xvjiex 发表于 2021-7-13 12:56
经测试，如果手工绘出这样的三角形(画单线方法)，如果region的顺序还是按照你的要求，任然是显示"自交"。所 ...

我居然发现了CAD的一个大bug，也是神奇

ysq101

应该是CAD版本问题吧

我2004打不开你的测试图

用你的程序是能正常生成面的

nzl1116

多段线没闭合

菜卷鱼

1. ;;;画PL线，bool=T闭合，bool=nil 不闭合
   
2. (defun lwpolymaker (lst BOOL / COMB)
   
3.   (if bool
   
4.     (setq comb 1)
   
5.     (setq comb 0)
   
6.   )
   
7.   (entmakex (append (list '(0 . "LWPOLYLINE")
   
8.         '(100 . "AcDbEntity")
   
9.         '(100 . "AcDbPolyline")
   
10.         '(62 . 0)
    
11.         (cons 90 (length lst))
    
12.         (cons 70 comb)
    
13.         )
    
14.         (mapcar '(lambda (pt) (cons 10 pt)) lst)
    
15.       )
    
16.   )
    
17. )

;;;画PL线，bool=T闭合，bool=nil 不闭合<br /> (defun lwpolymaker (lst BOOL / COMB)<br />   (if bool<br />     (setq comb 1)<br />     (setq comb 0)<br />   )<br />   (entmakex (append (list '(0 . "LWPOLYLINE")<br />         '(100 . "AcDbEntity")<br />         '(100 . "AcDbPolyline")<br />         '(62 . 0)<br />         (cons 90 (length lst))<br />         (cons 70 comb)<br />         )<br />         (mapcar '(lambda (pt) (cons 10 pt)) lst)<br />       )<br />   )<br /> )

llsheng_73

三角形怎么会自交的？
图打不开，程序看上去没问题
不如你直接把了问题的三角形那三个点贴出来，让大家画三角形来看看能不能转成面域