找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

楼主: 王鹏_pBZlo

[工具] 合并目录中所有图纸到一个文件

 火... [复制链接]

已领礼包: 586个

财富等级: 财运亨通

 楼主| 发表于 2021-4-10 16:56:47 | 显示全部楼层
Trouble12138 发表于 2021-4-6 15:03
这个工具能不能在合并前炸开所以文档里面的块?因为如果文档内有同名块,会相互覆盖

        增加下面红色的一段


(while (setq dwg (nth (setq i (1+ i)) filelst))
                (while (setq ss (ssget "x" (list (cons 0 "INSERT"))))
                        (setq j -1)
                        (while (setq ent (ssname ss (setq j (1+ j))))
                                (command "explode" ent)
                                (while (= 1 (getvar "cmdactive")) (command ""))
                        )
                )
                (command "purge" "B" "*" "N")
                (prompt (strcat "\n" dwg))
                (command "insert" (strcat tzml dwg) (list 0 0))
                (while (= 1 (getvar "cmdactive")) (command ""))
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2021-4-10 17:21:38 | 显示全部楼层
王鹏_pBZlo 发表于 2021-4-10 16:37
(command "move" dwg (entlast) "" (list (car zx) (cadr ys)) (list x y))
改成
(command "move" dwg  ...

再次非常感谢大师,很给力,很完美,很专业..............
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2021-4-12 14:13:11 | 显示全部楼层
FENGZI998 发表于 2021-4-10 17:21
再次非常感谢大师,很给力,很完美,很专业..............

合并后多个矩形外框,矩形外框能取消掉吗?大师。

点评

[*](command "rectangle" pmin pmax) [*](command "change" (entlast) "" "P" "C" "1" "") [*](command "move" dwg (entlast) "" (list (car zx) (cadr ys)) (list x y)) [*]删除第1,2句,删除第3句中的  详情 回复 发表于 2021-4-12 17:33
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 586个

财富等级: 财运亨通

 楼主| 发表于 2021-4-12 17:33:15 | 显示全部楼层
FENGZI998 发表于 2021-4-12 14:13
合并后多个矩形外框,矩形外框能取消掉吗?大师。

  • (command "rectangle" pmin pmax)
  • (command "change" (entlast) "" "P" "C" "1" "")
  • (command "move" dwg (entlast) "" (list (car zx) (cadr ys)) (list x y))
  • 删除第1,2句,删除第3句中的(entlast)


论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2021-4-13 08:03:58 | 显示全部楼层
王鹏_pBZlo 发表于 2021-4-12 17:33
  • (command "rectangle" pmin pmax)
  • (command "change" (entlast) "" "P" "C" "1" "")

  • 经过大师指点后,问题已完美解决,再次感谢大师。太给力了
    论坛插件加载方法
    发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
    如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
    如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
    回复 支持 反对

    使用道具 举报

    已领礼包: 1个

    财富等级: 恭喜发财

    发表于 2021-4-17 15:30:28 | 显示全部楼层
    #在这里快速回复# 谢谢楼主分享,很不错的插件
    论坛插件加载方法
    发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
    如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
    如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
    回复 支持 反对

    使用道具 举报

    已领礼包: 53个

    财富等级: 招财进宝

    发表于 2021-4-17 19:34:39 | 显示全部楼层
    让 江小白 来看看帖子里藏了啥好东西~~~
    论坛插件加载方法
    发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
    如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
    如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
    回复 支持 反对

    使用道具 举报

    已领礼包: 303个

    财富等级: 日进斗金

    发表于 2021-4-19 21:32:15 | 显示全部楼层
    谢谢分享,下来学习一下
    论坛插件加载方法
    发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
    如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
    如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
    回复 支持 反对

    使用道具 举报

    发表于 2021-4-22 11:05:47 | 显示全部楼层
    王老师能不能贴个完整版代码,谢谢
    论坛插件加载方法
    发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
    如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
    如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
    回复 支持 反对

    使用道具 举报

    发表于 2021-4-22 11:19:37 | 显示全部楼层
    Y8(DI0583(VHG@1Q]%S~_[C.png 图纸合并到一起标注乱了
    论坛插件加载方法
    发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
    如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
    如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
    回复 支持 反对

    使用道具 举报

    已领礼包: 59个

    财富等级: 招财进宝

    发表于 2021-4-22 13:13:39 | 显示全部楼层
    谢谢分享!!!!!
    论坛插件加载方法
    发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
    如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
    如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
    回复

    使用道具 举报

    发表于 2021-4-24 23:19:04 | 显示全部楼层
    感谢分享好东西!
    论坛插件加载方法
    发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
    如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
    如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
    回复 支持 反对

    使用道具 举报

    已领礼包: 11个

    财富等级: 恭喜发财

    发表于 2021-4-28 10:00:10 | 显示全部楼层
    谢谢!!学习了。。
    论坛插件加载方法
    发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
    如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
    如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
    回复 支持 反对

    使用道具 举报

    发表于 2021-5-1 23:10:27 | 显示全部楼层
    这个不错,谢谢分享!
    论坛插件加载方法
    发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
    如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
    如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
    回复 支持 反对

    使用道具 举报

    已领礼包: 22个

    财富等级: 恭喜发财

    发表于 2021-5-2 01:34:38 | 显示全部楼层
    学习下说不定可能用上
    论坛插件加载方法
    发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
    如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
    如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
    回复 支持 反对

    使用道具 举报

    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

    GMT+8, 2024-12-22 16:18 , Processed in 0.484418 second(s), 57 queries , Gzip On.

    Powered by Discuz! X3.5

    © 2001-2024 Discuz! Team.

    快速回复 返回顶部 返回列表