[讨论]：面域-未知的领域

carrot1983

面域-region
实现的方法：
[php]
A.
(command "_.region" ss "")
B.
(setq REGION (vlax-invoke
               MSPACE
               "addregion"
               (mapcar 'vlax-ename->vla-object ENAME_LIST)
             )
)
C.
(setq OBJECT_LIST (mapcar 'vlax-ename->vla-object ENAME_LIST))
(setq CURVES (vlax-make-safearray
               vlax-vbobject
               (cons 0 (- (length OBJECT_LIST) 1))
             )
)
(vlax-safearray-fill CURVES OBJECT_LIST)
(setq REGIONOBJ (vla-addregion MSPACE CURVES))
[/php]

从群组码上看，是加密过的。。。
所以用entmake行不通

1. 
   
2. (-1 . <图元名: 7e999148>)
   
3. (0 . "REGION")
   
4. (330 . <图元名: 7ef72c10>)
   
5. (5 . "100829")
   
6. (100 . "AcDbEntity")
   
7. (67 . 0)
   
8. (410 . "Model")
   
9. (8 . "TX-DOTE")
   
10. (100 . "AcDbModelerGeometry")
    
11. (70 . 1)
    
12. (1 . "mogoo nm m o          ")
    
13. (1 . "ni ^*+0;:,4 ^*+0\\^[ nh ^LR iqoqjqhook QK mk K7* R>- nm ofekjemo moof ")
    
14. (1 . "n fqfffffffffffffffj:rooh n:rono ")
    
15. (1 . ">,27:>;:- {rn rn _nm mogqoqjqhook |")
    
16. (1 . "=0;& {rn rn {rn {m {rn {rn |")
    
17. (1 . "3*2/ {rn rn {rn {rn {l {n |")
    
18. (1 . ",7:33 {rn rn {rn {rn {rn {k {rn {m |")
    
19. (1 . "9><: {rn rn {rn {rn {j {l {rn {i 90-(>-; ;0*=3: 0*+ |")
    
20. (1 . "300/ {rn rn {rn {rn {h {k |")
    
21. (1 . "/3>1:r,*-9><: {rn rn {rn gfkmjjqojomffknmg mmlhonqnonjljnijoh o o o n n o
    
22. o 90-(>-;@) V V V V |")
    
23. (1 . "<0:;8: {rn rn {rn {h {h {rn {g 90-(>-; {j {rn |")
    
24. (1 . ":;8: {rn rn {rn {f o {f iqmglngjlohnhfjgim {h {no 90-(>-; _h *1410(1 |")
    
25. (1 . "):-+:' {rn rn {rn {g {nn |")
    
26. (1 . ":336/,:r<*-): {rn rn {rn gfkmjjqojomffknmg mmlhonqnonjljnijoh o o o n
    
27. rlmlnqfingllfohghmf joiqiglljikjlnifhg o oqkogmjgkigfhllmgjn V V |")
    
28. (1 . "/061+ {rn rn {rn gfnomlqoggkijjokfl mmkmohqhgkgfningmk o |")
    

复制代码

1. 用A方法的实现region会出现提示:

   已提取 1 个环。
已创建 1 个面域。

不知道如何去掉这个提示，而且用command会比vla慢。
2. 用BC方法对于 LINE,LWPOLYLINE,POLYLINE,CIRCLE,ARC,ELLIPSE 似乎没发现啥问题。速度会比A方法快（可能快，没测过）

而对于SPLINE有时候不可行。特别对于ELLIPSE椭圆偏移后的spline
执行BC方法会出现：

建模操作错误:
     计算夹点作用范围的位置/导数时出错。
; 错误: AutoCAD.Application: 输入无效

期待一个完美的解决方案。不然，就目前只能限制：椭圆偏移后及对多个控制点的spline执行BC方法

露水2

和萝卜头一样的困惑

carrot1983

很奇怪，有时候，又不会出错。。。晕