有偿求多个图形单独保存DWG

hn10183051 · 发表于 2021-10-3 19:27:31

自己写了一部分，思路大概了有了，但写出来的不理想。请大师们帮忙看看，

思路：1，框选创建选择集。求单个图形的矩形包围框
2，循环求值判断单个矩形框内是否有文字对象，如果返回T则求元素表 1 .
3, 将选择集写出为新的图形文件。

要求：,框选需分图图形，图形中有对应编号，单独保存文件名为图形中编号。

xtjd · 发表于 2021-10-6 09:47:10

bssurvey · 发表于 2021-10-6 15:24:34

bssurvey 发表于 2021-10-4 08:33
試用看看是不是您想要的，10/5已修改，有下載的大大，請重新下載。感謝!已經改免幣分享參照了vla-wblock ...

如果要用框選可以改這一行 (setq all-pline(ssget "X" '((0 . "LWPOLYLINE")))) 改成 (setq all-pline(ssget '((0 . "LWPOLYLINE"))))

hn10183051 · 发表于 2021-10-6 16:06:39

bssurvey 发表于 2021-10-4 08:33
試用看看是不是您想要的，10/5已修改，有下載的大大，請重新下載。感謝!已經改免幣分享參照了vla-wblock ...

谢谢，大师，都能满足我的需求

hn10183051 · 发表于 2021-10-4 13:17:32

bssurvey 发表于 2021-10-4 08:33
試用看看是不是您想要的

能不能不创建块，就像 WBLOCK 单个保存一样。保存名为框内的编号。

bssurvey · 发表于 2021-10-4 08:33:25

本帖最后由 bssurvey 于 2021-10-5 15:11 编辑

試用看看是不是您想要的，10/5已修改，有下載的大大，請重新下載。感謝!已經改免幣分享參照了vla-wblock的用法

tigcat · 发表于 2021-10-4 10:06:55

http://bbs.mjtd.com/thread-183841-1-1.html

hn10183051 · 发表于 2021-10-4 13:07:07

tigcat 发表于 2021-10-4 10:06
http://bbs.mjtd.com/thread-183841-1-1.html

写出的不要是块

笨笨熊007 · 发表于 2021-10-5 00:28:28

一天了还没有解决吗？我写过。

叮咚 · 发表于 2021-10-5 08:11:14

打算多少钱，可以加qq 1020952830

东升铮 · 发表于 2021-10-5 20:01:51

这是铝板展开保存去编程么？？

smile0421 · 发表于 2021-10-6 09:21:07

965828571 我可以写，有意加Q

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

[基础] 有偿求多个图形单独保存DWG

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源