给大家分享一个块名称提取插件

A._建筑李工 · 发表于 2021-7-18 18:33:07

购买主题 已有 14 人购买 本主题需向作者支付 1 个明经币 才能浏览

alexmai · 发表于 2021-7-19 10:27:06

能支持动态块块名显示吗？

yangchao2005090 · 发表于 2021-7-20 12:27:40

已经购买，分享给大家

lxl217114 · 发表于 2021-7-21 13:20:59

yangchao2005090 发表于 2021-7-20 12:27
已经购买，分享给大家

付费主题居然可以限制本帖内所以附件下载，麻烦上网盘链接

流动的清泉 · 发表于 2021-9-15 13:54:32

已经购买，免费分享给大家
(defun c:dkm (/ en_data pt name_block )
(setq en_data (entget (car (entsel "\n选择图块:"))))
(setq pt (getpoint "\n选择文字基点:"))
(setq name_block (cdr (assoc 2 en_data)))
(entmake (list '(0 . "TEXT") (cons 1 name_block) (cons 10 pt) (cons 40 1500)))
(c:dkm)
)
(prin1)

k1nger · 发表于 2021-9-15 14:38:16

(defun C:tt()
(setq a (cdr (assoc 2 (entget (car (entsel))))))
(princ a)
)
搞定

alexmai · 发表于 2021-9-16 22:58:48

wblock 比较快，动态块块名也能看到

lengxiaxi · 发表于 2023-2-23 09:50:43

文字特别大，已经改小了
(defun c:dkm (/ en_data pt name_block )
(setq en_data (entget (car (entsel "\n选择图块:"))))
(setq pt (getpoint "\n选择文字基点:"))
(setq name_block (cdr (assoc 2 en_data)))
(entmake (list '(0 . "TEXT") (cons 1 name_block) (cons 10 pt) (cons 40 15)))
(c:dkm)
)
(prin1)

要是能批量框选，并统计数量就好了比如多个同名块 10-我叫张三

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

[讨论] 给大家分享一个块名称提取插件

本帖子中包含更多资源

评分

A._建筑李工 A._建筑李工当前离线积分 1082 明经币个注册时间 2020-11-13 在线时间小时威望金钱个贡献激情	发表于 2021-7-18 18:33:07 \| 显示全部楼层 \|阅读模式购买主题已有 14 人购买本主题需向作者支付 1 个明经币才能浏览

	回复使用道具举报置顶卡变色卡显身卡