如何获得一条PLine将一个面切割为两部分后各自的面积？

cqszgs · 发表于 2003-10-27 11:04

有一条Pline穿过一个面，将面分割成两部分，如何分别得到此两部分的面积？
面和线在不同的图层。
请尽量用VBA，或者提供思路，Lisp我不懂。谢谢！！

莫名 · 发表于 2003-10-27 19:58

选择这条pline线，在线两边各取一点坐标（在封闭多边形面内），用HATCH命令（SENDCOMMAND方法）用前面的点进行“点选填充”，生成填充，获取分别获取边界的面积即可。HATCH命令的参数请参阅有关帮助。

cqszgs · 发表于 2003-10-28 11:03

谢谢帮助！
我用以下命令生成了Hatch，如何获得此Hatch 的面积？
ThisDrawing.SendCommand "-bhatch 30,10 "
30,10是位于封闭多边行内的点的坐标，以后由程序计算。

莫名 · 发表于 2003-11-2 21:42

用HATCH命令要保留边界，这样就可以生成分别生成闭合的多段线，用area获取面积(存在系统变量area中)。

gyl · 发表于 2003-11-3 21:19

用“boundary”命令

账号		自动登录	找回密码
密码			注册