edata 发表于 2014-6-13 21:28:10

因为某些块库插入会丢失信息。
因为有的是直接从ACAD块中调入。而不是当前的块。
所以讲做好属性块带字段的新做一个块。也就是新块嵌套一个属性带字段的块。。

zyun0169 发表于 2016-8-8 11:10:51

现在有结果没

chg 发表于 2016-8-8 13:30:52

很详细,又学到了知识。

flowerson 发表于 2018-7-1 17:33:32

不开对话框 怎样控制“字段”里面的内容 用lisp。

xfjiamy 发表于 2018-9-10 09:49:51

详解......

zhangcan0515 发表于 2020-9-11 22:25:12

谢谢学习到了字段的应用了

wzg356 发表于 2020-9-12 10:42:10

flowerson 发表于 2018-7-1 17:33
不开对话框 怎样控制“字段”里面的内容 用lisp。

设置块中属性
函数代码:
(defun VxSetAtts (Obj Lst / AttVal)
(mapcar
    '(lambda (Att)
       (if (setq AttVal (cdr (assoc (vla-get-TagString Att) Lst)))
(vla-put-TextString Att AttVal)
       )
   )
    (vlax-invoke Obj "GetAttributes")
)
(vla-update Obj)
(princ)
)
语法:(VxSetAtts Obj Lst)
参数: Obj = Object
    Lst = 点表 '(("Tag1" . "Val1")...)
返回值:nil

jixiezhang 发表于 2021-8-29 10:13:10

好厉害,确实很实用

jkop 发表于 2023-8-14 19:27:47

很详细的教学,顶!
页: 1 [2]
查看完整版本: 属性块字段表达式