框选两线相连并合并成一条直线

【KAIXIN】 · 发表于 2011-12-12 15:01:09

上图是为处理前，下图是处理后：

我用过最近距离连接，可是成不了一条直线，注意是直线！

请教朋友：
这个要怎么要怎么编这个程序呢？欢迎给个思路，谢谢！

weimeng555 · 发表于 2024-3-23 15:21:37

最近刚好需要这个功能的插件，但是需要的是求批量多根直线求交点，每跟直线两端都能找到交点的功能

Andyhon · 发表于 2011-12-12 15:19:50

一个雏形...
(defun c:Test ()
(setq ss (ssget) ; 选线(2)
pts (acet-geom-ss-extents ss nil)
)
(apply 'command (cons "Line" pts))
(command "")
(command "Erase" ss "")
)

【KAIXIN】 · 发表于 2011-12-12 15:31:32

Andyhon 发表于 2011-12-12 15:19
一个雏形...
(defun c:Test ()
(setq ss (ssget) ; 选线(2)

朋友，acet-geom-ss-extents 这个函数的作用是？

Andyhon · 发表于 2011-12-12 15:44:45

作用是..
取得选集的外框值

【KAIXIN】 · 发表于 2011-12-12 15:47:59

Andyhon 发表于 2011-12-12 15:44
作用是..
取得选集的外框值

可以不用自定义函数弄出来吗？

Andyhon · 发表于 2011-12-12 16:10:07

acet-geom-ss-extents 只需 Express Toos 支持呀
您的CAD版次?

【KAIXIN】 · 发表于 2011-12-12 16:11:27

Andyhon 发表于 2011-12-12 16:10
acet-geom-ss-extents 只需 Express Toos 支持呀
您的CAD版次?

我没有装ET，是用2006，

可以用普通的函数处理吗？

qjcpj · 发表于 2011-12-12 16:27:06

使用系统命令join试试。

【KAIXIN】 · 发表于 2011-12-12 16:33:58

qjcpj 发表于 2011-12-12 16:27
使用系统命令join试试。

单选的？还要选两条

要是这样画可能还快一点

Andyhon · 发表于 2011-12-12 16:40:31

您试试 IntelliJoin.Lsp
http://www.google.com/search?q=%22IntelliJoin.Lsp

账号		自动登录	找回密码
密码			注册

框选两线相连并合并成一条直线

本帖子中包含更多资源