你可安装 <钢构cad>
你的线长统计
面积累
等等更多的实用功能,都是免费的哟

呵呵~~转这的工具还真多

cad自带的，只要键入“list”就行了。

list快捷键便可，这个可显示图形数据

钢结构CAD是要钱的，我们是想要免费的

cad中统计多条线段长度
新建文本文档。在文档中输入以下内容：
=======================================================



;统计cad图中线的总长度
;************** Write By zhenglin****************

(defun c:tj_l (/ p n e e1 e2 l s x1 x2 y1 y2 xx yy ll lll)
(setq ln 0 lll 0)

(setq p (ssget)) ; Select objects
(if p
(progn ; If any objects selected
(setq l 0 n (sslength p))
(while (< l n) ; For each selected object...
(if (= "LINE" (cdr (assoc 0 (setq e (entget (ssname p l))))))
(progn
(setq e1 (assoc 10 e) e2 (assoc 11 e))
(setq x1 (cadr e1) y1 (caddr e1))
(setq x2 (cadr e2) y2 (caddr e2))
(setq xx (abs (- x2 x1)) yy (abs (- y2 y1)))
(setq ll (sqrt (+ (* xx xx) (* yy yy))))
(setq lll (+ lll ll)) (setq ln (+ ln 1))
)
)
(setq l (1+ l))
)
)
)
(print "total line number= ")
(princ ln)
(print "total line length= ")
(princ lll)
(terpri)
)

========================================

另存为tj_l.lsp

打开cad —> 工具 —> 加载应用程序 —> 找到并选中tj_l.lsp点加载 在命令行输入tj_l然后选中所有要统计的线。
按F2查看结果

nongne 发表于 2011-11-18 20:13 cad中统计多条线段长度 新建文本文档。在文档中输入以下内容： ===================================== …谢谢您的资料。非常感谢

按“nongne”的指导，我照做了。但每次按F2后总是给出如下回答：
"total line number= " 0
"total line length= " 0
nil
总线数和总长度都是零？请教我错在哪里？

应该很厉害的样子！

nongne 发表于 2011-11-18 20:13 cad中统计多条线段长度 新建文本文档。在文档中输入以下内容： ===================================== …这个程序太牛了！！！