[求助]如何把封闭图形的各个线段衔接起来后，用AcDbPolyLine表达出来

guliande · 发表于 2010-6-1 10:46:00

大家好，我是带着一个困扰很久的问题加入了乐筑天下，刚才看了一些帖子，备受鼓舞和启发。
我现在在搞数控火焰切割机的CAD二次开发，就是把绘制的图形进行刀补处理（轮廓向外扩或向内缩），然后转换为16进制的加工文件。
我参考了一下别人的程序，有的是像做“面域”一样把封闭图形的各个线段连接起来，然后进行刀补。然而，查看其DXF ，又不像面域处理的DXF。
比如
我画了一个100*100的矩形（逐段画的），别人的处理结果是
AcDbPolyline
90
      4
70
   1
43
0.0
10
500.0
20
500.0
10
600.0
20
500.0
10
600.0
20
400.0
10
500.0
20
400.0
如果有圆弧的话，就会多一个参数
比如最后结尾的线段是一个180°的圆弧
AcDbPolyline
90
      4
70
   1
43
0.0
10
500.0
20
500.0
10
600.0
20
500.0
10
600.0
20
400.0
10
500.0
20
400.0
42
-0.9999999999999998
总结一下问题如何把封闭图形的各个线段（或许绘制时顺序很乱）依次衔接起来后，用AcDbPolyLine表达出来。
请问，通过VBA可以做到这个功能吗，怎么做到？如果不能，哪有什么好的办法，谢谢各位先！！