社区 › AutoLISP/Visual LISP 编程技术 › 块内标注修改颜色.炸开后才变色.

黄翔 发表于 2024-6-23 17:06:02

块内标注修改颜色.炸开后才变色.

本帖最后由 黄翔 于 2024-6-23 20:10 编辑

修改标注的颜色
(vla-put-TextColor i col)
(vla-put-ExtensionLineColor i col)
(vla-put-DimensionLineColor i col)
改了就变色了.
当标注在块内时候,改了不变色,只有把块炸开后标注才变色.有办法解决吗?
和块一样.标注能vlax-for遍历吗?
(vlax-for i(vla-item(vla-get-blocks(vla-get-activedocument(vlax-get-acad-object))) "ArchTick")               
      (setq objName (vla-get-ObjectName i))
      (cond         
          ((wcmatch objName "*Dimension")
            (vla-put-TextColor i col)
            (vla-put-ExtensionLineColor i col)
            (vla-put-DimensionLineColor i col)
          )
          ((wcmatch objName "AcDbLeader")
            (vla-put-DimensionLineColor i col)            
          )         
      )      
       (vla-put-Color i col)
    )
vla-update也没用

你有种再说一遍 发表于 2024-6-23 17:45:20

标注也是一种特殊的块

黄翔 发表于 2024-6-23 20:09:32

和块一样.能遍历标注吗?

liuhe 发表于 2024-6-23 21:11:10

改完块表之后，要regen刷新

查看完整版本: 块内标注修改颜色.炸开后才变色.