【转帖】求助一个求路径长度的lisp
 

求助一个求路径长度的lisp
www.dimcax.com
求助一个求路径长度的lisp
求助一个求路径长度的lisp，计算图形所有线的长度
分类统计：1.直线+圆弧
2.圆圈
勤能补拙

顶一下，急需。谢谢！
勤能补拙

将您的例图发一份至ljttjl@ tom.com ,我试试看.

已传，谢查收
勤能补拙

用vba可以作作

不好意思，我求的是lisp的。谢谢！
勤能补拙

图片：

图片：

我用lisp给你编了一个程序,求全图上的
1.线 "line"的长度
2.弧 "arc"的长度
3.圆 "circle"的面积为和长度为
4.多义线 "lwpolyline"的长度
5.椭圆 "ellipse"的面积为和长度为
6.样条线 "spline"的长度为
总长度的变量为len1
将它写入c:盘根下的len.dat
是原程序你可参照进行修改.
10
gbg

老顾，这个好是好，但没有累计，还有就是要先保存为“c:\\.....”，才能打开，能不能改成跳出一个对话框显示内容
勤能补拙

按你的要求把线的总长度相加它的变量为len1它在程序完后给你显示在屏上.程序已改.
gbg

老顾，非常好！谢谢！不过还有一点，好像是圆弧那里的算错了吧？ 没什么，那是几何算的，我已改了
勤能补拙