hnge 发表于 2005-6-14 21:35:00

提取多以线的问题

由直线和圆弧组成的多以线，可以通过每段的凸度来辨别是直线或者圆弧，如果是圆弧的话，能否知道该圆弧的圆心坐标，谢谢赐教

wyj7485 发表于 2005-6-15 08:22:00

<B>把多义线炸开就可以得到每个实体,就可以取得相应实体的属性.</B>


<b>Dim ExpObj,CenPt as Variant</b>


<b>Dim j</b>


<b>ExpObj =PLine.Explode'PLine 为已知多义线</b>


<b>For j=0 to UBound(ExpObj )</b>


<b>Select Case       ExpObj (j).ObjectName</b>


<b>Case "AcDbLine"</b>


<b>'..........</b>


<b>Case "AcDbCircle"</b>


<b>CenPt =ExpObj (j).Center</b>


<b></b>'..............


<b>End Select</b>


<b></b>
页: [1]
查看完整版本: 提取多以线的问题