直线转换为矩形框

sunny_8848 · 发表于 2022-11-26 08:39

请帮忙写一个lsp。有不少原来的图纸，图框是4条直线组成的。现在想选择4条边线转换成矩形并删除选择的4条边线，矩形归属到层名为"图框层" 的图层，矩形的颜色线型等属性随层

lee50310 · 发表于 2022-11-26 08:39

本帖最后由 lee50310 于 2022-11-26 15:55 编辑

將外圍線替換為矩形框程式 tt5
執行指令:tt5

執行效果如動態圖

9609759 · 发表于 2022-11-26 09:43

请附上图，，

sunny_8848 · 发表于 2022-11-26 11:00

本帖最后由 sunny_8848 于 2022-11-26 11:02 编辑

9609759 发表于 2022-11-26 09:43
请附上图，，

谢谢关注，转换后原有的4条边线删除，层的线型为continuous

lee50310 · 发表于 2022-11-26 11:04

本帖最后由 lee50310 于 2022-11-29 20:05 编辑

最新版 tt6 有批量功能

批量將外圍線替換為矩形框
並刪除舊的外框線段及分堆所產生面積為零的重疊線

執行指令:tt6

sunny_8848 · 发表于 2022-11-26 12:15

lee50310 发表于 2022-11-26 11:04
接合外框線 tt4.lsp
執行指令:tt4

谢谢帮忙。唯一美中不足的是，矩形没有放到建立的图框层上，属性随层。不知道能否再完善下

sunny_8848 · 发表于 2022-11-26 12:36

本帖最后由 sunny_8848 于 2022-11-26 12:38 编辑

lee50310 发表于 2022-11-26 11:04
接合外框線 tt4.lsp
執行指令:tt4

矩形有时可以有时不能归入到图框层，是不是有时图形比较多的原因，这时也有点点慢？

lee50310 · 发表于 2022-11-26 12:53

sunny_8848 发表于 2022-11-26 12:36
矩形有时可以有时不能归入到图框层，是不是有时图形比较多的原因，这时也有点点慢？

請給個測試圖檔

sunny_8848 · 发表于 2022-11-26 13:02

本帖最后由 sunny_8848 于 2022-11-26 13:03 编辑

lee50310 发表于 2022-11-26 12:53
請給個測試圖檔

左边的图纸有点点卡，还可以接受。就是不能归入图框层

xyp1964 · 发表于 2022-11-26 13:49

;; 神经元选择，代码需要e派工具箱的支持

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

[提问] 直线转换为矩形框