关于用lisp编译插件 以实现回转体面积，体积的计算

呆呆的努努

我想有没有方法可以在cad中实现，任意回转体零件的体积，面积直接读取 。结果是输出一个对话框 显示图中的回转体面积，体积信息
/ K* C2 P& D/ [: M# V: x, Z
& v) j' x* b- y/ c& N3 i
) e" m  }: ~( Q9 n这是我在其他论坛转载的，他只是说了在cad中的操作，能不能利用lisp完成这样的操作，来实现输出结果。
以下为转载内容 原帖地址http://www.3dportal.cn/discuz/thread-319749-1-1.html得到客户图纸，进行报价。工艺中含有热处理与表面处理，因此需要计算零件的重量（体积）与表面积。
( M! |- c& r+ c思路：
, G  W) M+ N9 R+ y使用autoCAD，将图纸中的平面线条转化为三维实体，然后使用查询命令得出零件体积与表面积。" `" h2 j7 X+ E4 [, K
. v/ }: N( y- s1 A: @; d步骤：& S$ ?3 N- ]% h+ n+ G; B
, K. d' G1 t4 }图1 把零件图纸另存为一个文件% P6 a. h( M; K% f" k

图2  a  在零件轴线上加一条线
   　  b  删除/剪切所有尺寸标注，轴线左侧所有线条,以及除零件轮廓线之外所有的线条2 G1 ~; C8 {) a: ^) q
+ Y3 s* b, `8 x; ^    　 c  使用 <绘图> ==> <面域>, 把图形转化为面域实体
: W  d6 u* q: S7 c
图3  a  使用 <绘图> ==> <实体> ==> <旋转> , 选择轴线的两个端点为旋转轴的起点与端点,其他所有设置使用默认.形成零件实体, Z( U& {# G) i8 R8 A
     b  使用 <工具> ==> <查询> ==> <面积>, 输入<对象(o)>, 选择实体,得到零件表面积9 k+ c" X/ z" I( |8 ?- `
# h+ b0 w2 @+ I: H     c  使用 <工具> ==> <查询> ==> <面域/质量特性>,选择实体,得到体积,乘密度得零件重量
. j0 q- f2 z5 h# g  t2 Y
, p& ^( ~( T+ G( P2 V. Y1 B% t: {% Ahttp://www.3dportal.cn/discuz/data/attachment/forum/month_0707/20070719_e1cb4090e9a8c93b91e5cr6uxwJUgqwf.jpg

落寞与你

可知道那个 CAD怎么画展开图？？