h008 发表于 2011-5-31 11:19:59

以字段做块属性？

是用vla-AddAttribute吗？
我想这样写，不成功
(vla-AddAttribute obj 0.0050 8.0000 "AAA" (vlax-3d-point '(0.280254 0.0293707 0.0)) "AAA" "%<\AcVar CustomDP.AAA>%")

请问如何写呀？

谢谢！！

h008 发表于 2011-6-1 09:14:43

呼唤高手现身呀！

h008 发表于 2011-6-1 18:51:59

   

祥子 发表于 2011-6-2 20:25:30

(vla-AddAttribute (vla-get-ModelSpace (vla-get-ActiveDocument (vlax-get-acad-object))) 0.0050 8.0000 "AAA" (vlax-3d-point '(0.280254 0.0293707 0.0)) "AAA" "%<\AcVar CustomDP.AAA>%")
这样子可以的

h008 发表于 2011-6-3 11:11:31

谢谢　祥子 　的回复！

不过好象不行
我之前的的obj 就是这样子
(setq obj (vla-add (vla-get-Blocks (vla-get-activedocument (vlax-get-acad-object))) (vlax-3d-point '(0 0 0)) "AAA"))
然后再
(vla-AddAttribute obj 0.0050 8.0000 "AAA" (vlax-3d-point '(0.280254 0.0293707 0.0)) "AAA" "%<\AcVar CustomDP.AAA>%")

你给的好象更不行哟！

求大家帮忙呀！

祥子 发表于 2011-6-4 23:10:15

哦，你是要加块中加入字段属性啊，我的那只是绘个属性

你的那两句
(setq obj (vla-add (vla-get-Blocks (vla-get-activedocument (vlax-get-acad-object))) (vlax-3d-point '(0 0 0)) "AAA"))
(vla-AddAttribute obj 0.0050 8.0000 "AAA" (vlax-3d-point '(0.280254 0.0293707 0.0)) "AAA" "%<\AcVar CustomDP.AAA>%")

我测试是可以的，创建了个AAA的图块里面有AAA的标记属性
页: [1]
查看完整版本: 以字段做块属性？