SolidWorks机械工程师网——最大的SolidWorks学习平台

标题: 一条线打断后如何再接成一条线？ [打印本页]

作者: 透明星空 时间: 2007-1-30 10:17
标题: 一条线打断后如何再接成一条线？
看似一条线，选择时已是两条线，想把它们连成一条线，用什么方法

作者: herculesx10 时间: 2007-1-30 11:39
用join

作者: zhangw74 时间: 2007-1-30 12:39
2005以前的版本没有这个问题命令,2005及以后的才有

作者: ycc1234567 时间: 2007-1-30 14:17
在05里你可以把他合并成为多段线
选出来也是一条

作者: dhqing 时间: 2007-1-30 14:19
用PEDIT吧。合并。

作者: scwwlx 时间: 2007-1-30 14:50
我用的是R14直接用鼠标右键点击其中的一条线然后拖到另一条的一端就行了

作者: sendiaodui 时间: 2007-1-30 15:06
pe和j

作者: jimohuashi 时间: 2007-1-30 15:21
应用下面的LISP程序可以将“打断后的直线”连接成一条：
(setvar "cmdecho" 0)
(setq e (ssget))
(setq nl (sslength e)) (setq ni 1)
(setq p1 (trans (cdr (assoc 10 (entget (ssname e 0)))) 0 1))
(setq p2 (trans (cdr (assoc 11 (entget (ssname e 0)))) 0 1))
(setq ly (cdr (assoc 8 (entget (ssname e 0)))))
(setq lt (cdr (assoc 6 (entget (ssname e 0)))))
(setq lt0 (getvar "celtrype") ly0 (getvar "clayer"))
(setq al (distance p1 p2))
(setq p0 p1)
(while (< ni nl)
(setq p3 (trans (cdr (assoc 10 (entget (ssname e ni)))) 0 1))
(setq p4 (trans (cdr (assoc 11 (entget (ssname e ni)))) 0 1))
(if (> (distance p3 p1) al) (progn (setq p0 p2 p2 p3) (setq al (distance p1 p2)) ))
(if (> (distance p4 p1) al) (progn (setq p0 p2 p2 p4) (setq al (distance p1 p2)) ))
(if (> (distance p0 p2) al) (setq p1 p0))
(setq ni (+ ni 1))
)
(command "erase" e "")
(command "layer" "s" ly "")(command "linetype" "s" lt "")
(command "line" p1 p2 "")
(command "layer" "s" ly0 "")(command "linetype" "s" lt0 "")
(setvar "cmdecho" 1)
不愿意编码可以下载

JOIN.lsp.rar (387 Bytes, 下载次数: 12)

作者: wshplw 时间: 2007-1-30 15:32
7楼的强人可以做到我要好好看看

作者: wj236263 时间: 2007-1-30 16:40
07 合并命令很好

作者: jiang3051 时间: 2007-1-30 18:19
那要看看你使的是什么版本的了　０６以后ＪＯＩＮ就哦了

作者: sdsllan 时间: 2007-1-30 19:06
用"延伸"命令可以解决这个问题.

作者: zhuzhaog68 时间: 2007-1-30 22:02
方法很多,开动脑子就行

作者: hjhy001 时间: 2007-1-30 22:24
呵呵！现在知道了

作者: wennyj 时间: 2007-1-30 23:08
拉长也可以吧

作者: 456123zzzz 时间: 2007-1-30 23:11
用jion命令

作者: gthgthgth 时间: 2007-1-31 00:56
就用PE就行了

欢迎光临 SolidWorks机械工程师网——最大的SolidWorks学习平台 (https://www.swbbsc.com/)