shirazbj 发表于 2006-3-5 08:50:00

求助：怎么判断图中acad对象的类型

<P>假设图中有line对象，我用：</P>
<P>Dim newObjs As AcadLine</P>
<P>&nbsp;&nbsp;&nbsp;&nbsp;<BR>Set newObjs = ThisDrawing.ModelSpace.Item(i)</P>
<P>返回该line对象，然后可以取得该line的一些参数。</P>
<P>但是如果图中还有spline对象，我怎样知道Item返回的是line还是spline呢？</P>

songzhi 发表于 2006-3-5 09:33:00

<P>if ucase$(ThisDrawing.ModelSpace.Item(i).ObjectName)="ACDBLINE" then</P>
<P>&nbsp;&nbsp;&nbsp; set newObjs=ThisDrawing.ModelSpace.Item(i)</P>
<P>............</P>
<P>end if</P>

songzhi 发表于 2006-3-5 09:52:00

其实用选择集更好，将所有的直线加入一个选择集，然后处理

shirazbj 发表于 2006-3-5 10:21:00

<P>谢谢。</P>
<P>对复杂的图形手选太麻烦了。还是程序选好。</P>
页: [1]
查看完整版本: 求助：怎么判断图中acad对象的类型