如何获得一条PLine将一个面切割为两部分后各自的面积?
有一条Pline穿过一个面,将面分割成两部分,如何分别得到此两部分的面积?面和线在不同的图层。
请尽量用VBA,或者提供思路,Lisp我不懂。谢谢!! 选择这条pline线,在线两边各取一点坐标(在封闭多边形面内),用HATCH命令(SENDCOMMAND方法)用前面的点进行“点选填充”,生成填充,获取分别获取边界的面积即可。HATCH命令的参数请参阅有关帮助。 谢谢帮助!
我用以下命令生成了Hatch,如何获得此Hatch 的面积?
ThisDrawing.SendCommand "-bhatch 30,10"
30,10是位于封闭多边行内的点的坐标,以后由程序计算。 用HATCH命令要保留边界,这样就可以生成分别生成闭合的多段线,用area获取面积(存在系统变量area中)。 用“boundary”命令
页:
[1]