Topic: Block Table

[udaaf]

I've try for write some code for update block properties table  with Lisp. Properties can changed but geometry can't update.
Here's my code :

Code: [Select]

(vl-load-com)
;Proses Pemilihan Single Object (Pick)
(setq ss (ssget ":S" '((0 . "INSERT"))))
(setq ename (ssname ss 0))
(setq vevo (vlax-ename->vla-object ename))
(setq v (vla-getdynamicblockproperties vevo))
(setq vval (vlax-variant-value v))
(setq sal (vlax-safearray->list vval))
(setq BlockProp (nth 5 sal))
(vlax-put-property BlockProp 'value "A01")
(vla-update vevo)
Please correct the code, where's wrong ?

[udaaf]

Can we change Block Table with Lisp ?

[Marc'Antonio Alessi]

Search vla-getdynamicblockproperties:

One of the best: http://www.lee-mac.com/dynamicblockfunctions.html

Ma penso che Lee arriverą presto...