您好,欢迎来到六九路网。
搜索
您的当前位置:首页★CAD中统计多条线段长度

★CAD中统计多条线段长度

来源:六九路网


1. 新建文本文档,将以下代码复制在记事本内,“另存为”→“统计线段长度.lsp”

(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)) ?

1

) ?

(princ (strcat \"\\n共选择 \" (itoa (sslength SS)) \" 条线段. 线段总长: \" (rtos SUMLEN 2 3) \" ?.\")) (princ) ?

) ??

2.打开CAD → 菜单栏中找到“管理”(老版本“工具”) → 打开“加载应用程序”(或在命令行中运行“appload”命令打开) → 找到并选中“统计线段长度.lsp”→ 点“加载” → 显示“已成功加载 统计线段长度.lsp。” → 点“关闭”。

2

3. 在命令行输入“zz”+回车 → 选中所有要统计的线 → 选中后点鼠标右键(或 回车)。

3

4. 按F2查看结果 →

4

因篇幅问题不能全部显示,请点此查看更多更全内容

Copyright © 2019- 69lv.com 版权所有 湘ICP备2023021910号-1

违法及侵权请联系:TEL:199 1889 7713 E-MAIL:2724546146@qq.com

本站由北京市万商天勤律师事务所王兴未律师提供法律服务