如题所述
需要准备的工具:CAD软件,天正建筑软件,电脑。
1、首先在打开的软件中绘制直线、多段线、圆、矩形等。
2、然后点击左侧工具栏中的工具选择下方的曲线工具。
3、然后点击长度统计。
4、选择好以后点击鼠标右击确认选择,然后找到合适的地方插入标注结果的地方。
5、选择好以后点击鼠标右击确认选择,然后找到合适的地方插入标注结果的地方。
6、点击左键即可在鼠标位置插入标注结果。
温馨提示:答案为网友推荐,仅供参考
第1个回答 推荐于2018-04-09
有几种方法,告诉你一种很简单的:
全部选中后点右键,出现特性栏,里面几何图形里有长度,那就是长度总和.如图
还有一种输入命令:LI ,就是list的快捷键,里面也有,面积,长度,等等,你可以试试。需先输入命令,在选中多段线,再确定,就出现一个文本窗口,里面很清楚的。
本回答被提问者和网友采纳第2个回答 2009-03-31
CAD本身不能同时统计出来.
不过这个问题好解决:
算量小巧手 这个软件不错的 免费软件的 需要安装版的autoCAD2004~2006
长度 面积 个数都能批量解决.统计多个cad线长不在话下.
可以到下面地址载:
阳光算量快手处理这个问题更专业了,可以百度一下.
不过这个问题好解决:
算量小巧手 这个软件不错的 免费软件的 需要安装版的autoCAD2004~2006
长度 面积 个数都能批量解决.统计多个cad线长不在话下.
可以到下面地址载:
阳光算量快手处理这个问题更专业了,可以百度一下.
第3个回答 2019-07-06
CAD有多条线,直线、多段线、圆弧线,如何一次性的测量总长度?
第4个回答 2018-04-09
(defun c:ZC ()
(setvar "cmdecho" 0)
(prompt"统计总长")(terpri)
(setq en (ssget '((0 . "ARC,ELLIPSE,CIRCLE,*LINE"))))
(setq i 0)
(setq ll 0)
(repeat (sslength en)
(setq ss (ssname en i))
(setq endata (entget ss))
(command "lengthen" ss "")
(setq dd (getvar "perimeter"))
(setq ll (+ dd ll))
(setq i (1+ i))
)
(princ "\n 所选线条总长为:")(princ ll)
(setq p1 (getpoint "\n 文字标注点:"))
(command "layer" "m" "6文字层" "c" 3 "6文字层" "l" "continuous" "6文字层" "");6文字层
(command "text" "m" p1 60 0 "总长mm")
(command "text" "m" (polar p1 (* 1.5 pi) 65) 60 0 (rtos LL 2 2))
(princ)
)
(defun c:LL ()
(setvar "cmdecho" 0)
(prompt"长度及总长标注")(terpri)
(command "layer" "m" "6文字层" "c" 3 "6文字层" "l" "continuous" "6文字层" "");6文字层
(setq p1 (getpoint "\n 文字标注点:空白处"))
(setq en (ssget '((0 . "ARC,ELLIPSE,CIRCLE,*LINE"))))
(setq i 0)
(setq ll 0)
(repeat (sslength en)
(setq ss (ssname en i))
(setq endata (entget ss))
(command "lengthen" ss "")
(setq dd (getvar "perimeter"))
(setq ll (+ dd ll))
(setq i (1+ i))
(setq p1 (polar p1 (* 1.5 pi) 65))
(command "text" "m" p1 60 0 (rtos dd 2 2))
)
(princ "\n 所选线条总长为:")(princ ll)
(setvar "osmode" 4271)
(command "text" "m" (polar p1 (* 1.5 pi) 65) 60 0 "长度及总长mm")
(command "text" "m" (polar p1 (* 1.5 pi) 130) 60 0 (rtos LL 2 2))
(princ)
)
(setvar "cmdecho" 0)
(prompt"统计总长")(terpri)
(setq en (ssget '((0 . "ARC,ELLIPSE,CIRCLE,*LINE"))))
(setq i 0)
(setq ll 0)
(repeat (sslength en)
(setq ss (ssname en i))
(setq endata (entget ss))
(command "lengthen" ss "")
(setq dd (getvar "perimeter"))
(setq ll (+ dd ll))
(setq i (1+ i))
)
(princ "\n 所选线条总长为:")(princ ll)
(setq p1 (getpoint "\n 文字标注点:"))
(command "layer" "m" "6文字层" "c" 3 "6文字层" "l" "continuous" "6文字层" "");6文字层
(command "text" "m" p1 60 0 "总长mm")
(command "text" "m" (polar p1 (* 1.5 pi) 65) 60 0 (rtos LL 2 2))
(princ)
)
(defun c:LL ()
(setvar "cmdecho" 0)
(prompt"长度及总长标注")(terpri)
(command "layer" "m" "6文字层" "c" 3 "6文字层" "l" "continuous" "6文字层" "");6文字层
(setq p1 (getpoint "\n 文字标注点:空白处"))
(setq en (ssget '((0 . "ARC,ELLIPSE,CIRCLE,*LINE"))))
(setq i 0)
(setq ll 0)
(repeat (sslength en)
(setq ss (ssname en i))
(setq endata (entget ss))
(command "lengthen" ss "")
(setq dd (getvar "perimeter"))
(setq ll (+ dd ll))
(setq i (1+ i))
(setq p1 (polar p1 (* 1.5 pi) 65))
(command "text" "m" p1 60 0 (rtos dd 2 2))
)
(princ "\n 所选线条总长为:")(princ ll)
(setvar "osmode" 4271)
(command "text" "m" (polar p1 (* 1.5 pi) 65) 60 0 "长度及总长mm")
(command "text" "m" (polar p1 (* 1.5 pi) 130) 60 0 (rtos LL 2 2))
(princ)
)