社区 › AutoLISP/Visual LISP 编程技术 › 一键将所有选择内容更改为251号颜色，含所有块、块内文字、尺寸标志及所有尺寸内容

tranque 发表于 2025-1-22 16:22:50

类似的功能，我用过董师傅的插件里的，还不错

shujh1989 发表于 2025-1-22 16:29:58

本帖最后由 shujh1989 于 2025-1-22 16:31 编辑

sky899150 发表于 2025-1-17 14:53
对天正的那个标高图元不起作用
天正标高是要修改天正文字的颜色。
(if (and
                (= (vlax-get-property obj 'ObjectName) "TDbSymbElevation" )
                (vlax-property-available-p obj 'TextLayer) ; 检查TextLayer属性是否存在
               (wcmatch (vlax-get-property obj 'Layer) "*DIM_ELEV*" ))
      (vlax-put-property obj 'TextColor 256)
   )

BUBUBA918 发表于 2025-1-23 17:02:27

能否自定义颜色，像这样

yefei812678 发表于 2025-1-24 08:33:00

谢谢分享谢谢分享

查看完整版本: 一键将所有选择内容更改为251号颜色，含所有块、块内文字、尺寸标志及所有尺寸内容