autocadlisp统计多段线方法

autocadlisp统计多段线方法

操作方法

  • 01

    打开cad软件,点击工具---autolisp-autolisp编辑器

  • 02

    打开autolisp编辑器,点击文件新建一个窗口。

  • 03

    将如下代码粘贴到新建的窗口 (defun c:tj(/ ss tlen obj k l) (setvar "cmdecho" 0) (if (setq ss (ssget)) (progn (vl-load-com) (setq l (sslength ss) k 0 tlen 0 ) (repeat l (setq ename (ssname ss k)) (setq obj (vlax-ename->vla-object ename)) (if (= (cdr (assoc 0 (entget ename))) "MLINE") (setq tlen (+ tlen (ml-length ename))) (setq tlen (+ tlen (vlax-curve-getdistatparam ename (vlax-curve-getendparam ename)))) ) (setq k (1+ k)) ) (princ (strcat "\n共选择 " (itoa l) " 个对象 | 总长度: " (rtos tlen 2 0))) ;(command "text" (getpoint "\n选取文字插入点") "" "" (rtos tlen 2 3)) (alert  (strcat "\n共选择 " (itoa l) " 个对象 | \n总长度: " (rtos tlen 2 0))) ) (princ "\n未选择对象") ) (setvar "cmdecho" 1) (prin1) )

  • 04

    输入完成之后点击加载命令,下图问加载无误之后的截面。

  • 05

    加载完成后返回到在cad窗口中,输入“tj”命令按照提示操作,提示选择需要统计的对象。

  • 06

    选择屏幕中的两条线段,图中已经标注每条直线为5000mm为了验证程序计算的结果。

  • 07

    选择完成之后按回车或者空格键,命令窗口显示计算结果为:“共选择 2 条线段. 线段总长: 10000.000毫米”和图中标注的两条线段长度之和一致,计算无误。

(0)

相关推荐

  • cad圆弧转多段线的方法

    今天,我将给大家讲解如何用FastDWG软件将cad中的圆弧转成多段线,具体方法,请看下面 操作方法 01 必须先下载好FastDWG软件,并且安装好这个FastDWG软件: 02 因为FastDWG ...

  • AutoCAD中多段线的使用方法及命令项使用

    二维多段线是作为单个平面对象追寻的相互连接的线段序列.可以创建直线.圆弧或两都的组合线段. 操作方法 01 多段线的快捷键是PL 02 当选择多段线工具后,提示指定起点: 03 它也可以画一条直线,感 ...

  • cad如何设置多段线线宽

    CAD是一款经常使用的绘图软件,下面给大家讲讲cad如何设置多段线线宽.cad多段线线宽设置方法1. 第一步,在电脑上打开CAD软件进入如图所示的界面,点击界面左侧的多段线工具.2. 第二步,我们可以 ...

  • AutoCAD怎么绘制指定宽度的多段线

    AutoCAD是现在十分常用的一款制图软件,有些新用户不知道该软件怎么绘制指定宽度的多段线,接下来小编就给大家介绍一下具体的操作步骤.具体如下:1. 首先第一步先打开电脑中的[AutoCAD]软件,接 ...

  • CAD多段线怎么画(cad怎么继续画多段线)

    CAD是一款非常实用的绘图建模软件.软件的应用领域广泛,如建筑.土木工程.电器工程和制造业等,都非常的受欢迎.一些建筑的墙边在绘制的时候,经常会使用到多段线,那么CAD如何快速画出多段线?本次的教程分 ...

  • CAD中将填充面转为多段线

    在CAD中将填充面转为多段线 在CAD中将填充面批量转为多段线 操作方法 01 在CAD作图中,我们经常会遇到这样的处理: 将CAD填充面的边界转为多段线 在这里给大家介绍三种方法: 下面先说最简单的 ...

  • CAD怎样在多段线的短线上显示线型?

    如果多段线设置了虚线线型后,整体都显示为实线,应该是线型比例设置不合适,之前发过介绍解决这个问题的方法.但有时多段线整体显示是虚线,但局部比较短的线段仍会显示为实线,如图所示. 多段线短线段显示实线的 ...

  • AutoCAD中用多段线画圆

    CAD作图中经常用到圆形,但是直接画出来的圆形不能改变其宽度,本案例介绍的方法为用多段线做圆. 操作方法 01 打开CAD,并画一个自己所需大小的圆. 02 使用多段线命令,选中圆上一点,点击下方命令 ...

  • CAD多段线绘制技巧

    多段线是CAD绘图中非常常用的一种对象,之前认为这种基础图形没有什么可讲的,但发现初学者对直线和多段线的区别并不是特别清楚,就算资深的设计师也不一定对多段线完全了解,于是决定还是简单介绍一下多段线一些 ...