CAD多段线怎么连接

CAD多段线怎么连接,第1张

1、首先需要点击打开需要编辑的CAD图纸,唯此升进入到编辑首页中。

2、以五边形为例来说明 *** 作方法。

3、在命令行上输入“ PE”。

4、选择任一行,然后选择命令指老“ J”,

5、您需要将它们全部选中,然后单击“空格键扒谈”两次。

6、单击该行以显示以下效果,即链接成功。

命令HB合并多段线

(defun c:hb (/ @myL @lpNum @etLst @@ent @ptLst)

  (setq @myL (ssget "i" '((0 . "LINE,LWPOLYLINE"))))

将创建已经选择的线(多段线或者直线)的选择集

  (setq @lpNum 0) 为循环计数参数赋值

  (repeat (sslength @myL) 选择集包含几个对象就循环几次

    (setq @etLst (append @etLst (list (ssname @myL @lpNum)))

逐个提取选择集中的图元名并储存到表@etLst中

  @lpNum (1+ @lpNum) 每循环一次循环计数参数+1

    )

  )

  (foreach @@lpet @etLst 历遍表@etLst中每一个原子,以@@lpet代替原子

    (progn

  磨举    (setq @@ent (entget @@lpet)) 将每个乎野图元的详细列表赋值到@@ent中

      (foreach @@2lpe @@ent

(if (= (car @@2lpe) 10) 如果子表中第一个原子为10

  (setq @ptLst (append @ptLst (list @@2lpe))) 将子表列入@ptLst

)

      )

      (entdel @@lpet) 删除已提取过点的对象

    )

  )

  (entmake (append (list 通过点表创建新的多段线

     '(0 . "LWPOLYLINE")

     '(100 . "AcDbEntity")

     '(100 . "AcDbPolyline")

     (cons 90 (length @ptLst))

   )

 瞎顷碧  @ptLst

   )

  )

  (princ)

)

=====分割线========================================

顺带一说。。。你为何不用CAD自带的pedit命令?

pedit(使用CAD原生的ACAD.PGP可简化为PE命令)→M→选择所有需要合并的线→(若有不含多段线的元素)按Y转换所有选择对象为多段线→J合并→空格或者回车或者ESC退出


欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/yw/8277533.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-14
下一篇 2023-04-14

发表评论

登录后才能评论

评论列表(0条)

保存