daahz.blogg.se

Thanks you are so kind, i found a lisp that works! (vla-regen (vla-get-ActiveDocument (vlax-get-acad-object)) (setq col (cons (vla-get-effectiveName obx) col)) (setq obx (vlax-ename->vla-object (ssname sel (if (eq (vla-get-objectName x) "AcDbBlockReference") (vla-put-entityTransparency x "ByBlock:") (setq blc (vla-get-blocks (vla-get-activedocument

set "by block" to all entities in block definition (cons (car l) (LM:Unique (vl-remove (car l) (cdr l)))))) Vla-resetBlock works but all dynamic parametres are lost. Dynamic blocks don't update and I dont know why. I have this code but cheange all originally linetype because they are on different layers LINETYPE: preserve the linetype of the layer who was originally is it possible? because layer 0 had continuos line and the layers in nested blocks are different linetypes.