Lietuviškai > LISP, DCL, Meniu, pritaikymas...

Kaip įrašyti visus brėžinyje esančius blokus į diską kaip .dwg failus

(1/1)

Vaidas:
Kelią iš "c:\\folder\\" reikia pasikeisti į norimą katalogą arba ištrinti, kad blokai būtų išsaugoti brėžinio kataloge.

--- Code: ---(while (setq b (tblnext "BLOCK"))
 (vl-cmdf "_wblock" (strcat "c:\\folder\\" (setq b (cdr (assoc 2 b))) ".dwg") b)
)
--- End code ---

Navigation

[0] Message Index