LEE MAC 的图块计算表格增加属性
附件是 LEE MAC 的 block counter ，可用来列表图块的样式、名称及数量，我有找到一个取得块属性的函数(defun MJ:GetAttributes (ent / lst)
(if (safearray-value
(setq lst
(vlax-variant-value
(vla-getattributes
(vlax-ename->vla-object ent)
)
)
)
)
(mapcar
'(lambda (x)
(list
(vla-get-tagstring x)
(vla-get-textstring x)
(*Obj2En* x)
)
)
(vlax-safearray->list lst)
)
)
)请问要如何增加一个属性的栏位，在 LEE MAC 的这个程式中。
页:
[1]