明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 635|回复: 12

[讨论] 增强属性块GCD200在属性管理器找不到

[复制链接]
发表于 2025-1-1 17:19:37 | 显示全部楼层 |阅读模式
本帖最后由 52pj 于 2025-1-1 17:21 编辑

请教一下大家,现在有一个属性块,独立名为GC200的块,属性为【块参照】,含有【属性height】,且能够被增强块编辑器打开并修改属性。
但我在块属性管理器中找不到名为GC200的块,用battman命令也无法选中该块,只能用burst炸开。请教下如果想批量的更改里面文字的字体样式应该怎么做。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
回复

使用道具 举报

发表于 2025-1-2 09:42:25 | 显示全部楼层
如果是cass的话 是可以通过系统设置的
回复 支持 1 反对 0

使用道具 举报

发表于 2025-1-1 19:05:14 | 显示全部楼层
本帖最后由 煮茗 于 2025-1-1 19:15 编辑


论坛搜索一下,可以找到,比如下面这个:
http://bbs.mjtd.com/thread-178245-1-1.html
回复 支持 1 反对 0

使用道具 举报

发表于 2025-1-14 11:09:38 | 显示全部楼层
本帖最后由 yjpyjp 于 2025-1-14 11:11 编辑
yanshengjiang 发表于 2025-1-13 16:26
一段基础代码

[/code]

(defun c:qq(/ ss i s data)
  (setq ss(ssget '((2 . "GC200"))))
  (setq i -1)
        (prompt"请输入数字[1-8]修改为相应颜色(1:红色 2:黄色 3:绿色 4:浅蓝色 5:深蓝色 6:粉红色 7:白色 8:灰色)")
        (setq colour1 (getstring))
        (setq colour1 (atoi colour1))
  (repeat (sslength ss)
    (setq s(Ssname ss (setq i(1+ i))))
    (setq data(entget (entnext s) '("*")))
                (setq data(subst '(62 . colour1) (assoc 62 data) data))
                (entmod data)
                (entupd s)
               
        )
)





改了一下,想让它修改颜色,但是colour1这个位置出现了问题,它被当成了符号,不是变量,请教一下这个需要怎么修改
回复 支持 反对

使用道具 举报

发表于 2025-1-2 00:37:31 | 显示全部楼层
ATTRIB 里面可以设置字体样式


本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
回复 支持 反对

使用道具 举报

发表于 2025-1-2 09:29:42 | 显示全部楼层
块的属性更新  ATTSYNC
回复 支持 反对

使用道具 举报

发表于 2025-1-2 10:27:07 | 显示全部楼层
tranque 发表于 2025-1-2 09:29
块的属性更新  ATTSYNC

对它使用ATTSYNC就完蛋了。。。
回复 支持 反对

使用道具 举报

发表于 2025-1-2 19:03:31 | 显示全部楼层
gzxl 发表于 2025-1-2 00:37
ATTRIB 里面可以设置字体样式

感觉这个还是搞个对话框来收拾它比较好
回复 支持 反对

使用道具 举报

 楼主| 发表于 2025-1-11 19:29:40 | 显示全部楼层
飞雪神光 发表于 2025-1-2 09:42
如果是cass的话 是可以通过系统设置的

感谢大佬,cass被我卸载了,因为他和我的tssd冲突,使我打开探索者时图标变成了cass
回复 支持 反对

使用道具 举报

 楼主| 发表于 2025-1-11 19:30:44 | 显示全部楼层
gzxl 发表于 2025-1-2 00:37
ATTRIB 里面可以设置字体样式

感谢,我周一试一试
回复 支持 反对

使用道具 举报

发表于 2025-1-13 16:26:00 | 显示全部楼层
一段基础代码

  1. [code=lisp](defun c:qq(/ ss i s data)
  2.   (setq ss(ssget "x" '((2 . "GC200"))))
  3.   (setq i -1)
  4.   (repeat (sslength ss)
  5.     (setq s(Ssname ss (setq i(1+ i))))
  6.     (setq data(entget (entnext s) '("*")))
  7.     (if(/= "H1Z" (cdr(assoc 7 data)))
  8.       (progn
  9.   (setq data(subst '(7 . "细等线体") (assoc 7 data) data))
  10.   (entmod data)
  11.   (entupd s)
  12.   )
  13.       )
  14.     )
  15.   )
[/code]
回复 支持 反对

使用道具 举报

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

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-1-22 19:03 , Processed in 0.226501 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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