Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 05/26/2020 in all areas

  1. Maybe something like this ; converts blocks to bylayer proerties (setq doc (vla-get-activedocument (vlax-get-acad-object))) ; open database (vlax-for block (vla-get-blocks doc) (if (not (wcmatch (strcase (vla-get-name block) t) "*_space*")) (vlax-for ent block (vla-put-color ent 0) (vla-put-linetype ent "Bylayer") (vla-put-lineweight ent aclnwtbylayer) ) ) )
    1 point
  2. OK, try the attached. If you want entities within blocks included, it will need a few extra lines of code. AllByLayer.lsp
    1 point
  3. Hiya. The model had been built purely in AutoCAD 2013 & 2017. Only weird add-ins would have been a PDF import to correlate a couple of details from a client supplied sketch.. I have done the -PURGE / All several times. Just tried the -PURGE / Regapps. It did find a few new objects. Saved it, it added another 4mb to the file size!!!
    0 points
×
×
  • Create New...