CAD中计算所有线段长度总和的方法如下: 1、要想计算CAD中所有线段长度总和先去百度上搜索下载”cad计算总长度插件“,并下载好。
2、下载好插件后,打开CAD,打开要测长度所对应的cad图纸,然后点击菜单栏中的工具按钮,然后在下拉菜单中选择加载应用程序。 3、选择加载应用程序后,会弹出加载应用程序对话框中,在对话框名称下利用小三角找到开始下载好的计算总长的插件,选择好后点击中间的加载。
4、插件加载好后底下命令栏就会提示”加载成功“,这时就可以点击对话框界面中的关闭。 5、然后在CAD命令栏中直接输入”zcd“(即总长度的拼音缩写),输入好后按”Enter“键确定。
6、接着把要统计长度的线段都选择好。 7、选择好多个线段后,按”Enter“键确定,命令栏就会出现选择的多个线段总长的数值。
这样线段的长度总和就算出来了。 。
(princ "\n程序:统计线段长度 命令:LL")
(defun C:LL (/ CURVE TLEN SS N SUMLEN)
(vl-load-com)
(setq SUMLEN 0)
(setq SS (ssget '((0 . "CIRCLE,ELLIPSE,LINE,*POLYLINE,SPLINE,ARC"))))
(setq N 0)
(repeat (sslength SS)
(setq CURVE (vlax-ename->vla-object (ssname SS N)))
(setq TLEN (vlax-curve-getdistatparam CURVE (vlax-curve-getendparam CURVE)))
(setq SUMLEN (+ SUMLEN TLEN))
(setq N (1+ N))
)
(princ (strcat "\n共选择 " (itoa (sslength SS)) " 条线段. 线段总长: " (rtos SUMLEN 2 3) "毫米."))
(princ)
)
------------------------------------------------------------------------------
复制横线以上所有内容(从第一行到最下面一个单独的“)”)
然后直接在CAD命令栏粘贴 然后输入LL 选择需要统计的线 然后确定。
或者
复制横线以上所有内容(从第一行到最下面一个单独的“)”)粘贴到新建空白文本文档中保存,然后重命名格式改成.LSP
然后
CAD中输入 Appload,选择刚保存的.LSP格式文件,加载。
在CAD中输入LL,选择要统计线段长度的所有线段。结果马上出来.
如果结果不显示,请按f2.
(princ "\n程序:统计线段长度 命令:zz")
(defun C:zz (/ CURVE TLEN SS N SUMLEN)
(vl-load-com) (setq SUMLEN 0)
(setq SS (ssget '((0 . "CIRCLE,ELLIPSE,LINE,*POLYLINE,SPLINE,ARC"))))
(setq N 0)
(repeat (sslength SS)
(setq CURVE (vlax-ename->vla-object (ssname SS N)))
(setq TLEN (vlax-curve-getdistatparam CURVE (vlax-curve-getendparam CURVE)))
(setq SUMLEN (+ SUMLEN TLEN))
(setq N (1+ N))
)
(princ (strcat "\n共选择 " (itoa (sslength SS)) " 条线段. 线段总长: " (rtos SUMLEN 2 3) " .")) (princ)
)
将以上代码复制在记事本内后“另存为”→“统计线段长度.lsp” 打开CAD,运行“appload”命令加载刚保存的“统计线段长度.lsp”文件 按命令提示“程序:统计线段长度 命令:zz” 输入命令zz选择要统计长度的线段即可。
命令: 程序:统计线段长度 命令:zz命令: 命令:zz选择对象: 指定对角点: 找到 4 个 选择对象: 共选择 4 条线段.
以上回答由丝 路教 程 网小编整理发布