CADsoft Forum | Forumas | Форум
Lietuviškai => LISP, DCL, Meniu, pritaikymas... => Topic started by: Vaidas on 2012-03-04, 16:45:57
-
Kelią iš "c:\\folder\\" reikia pasikeisti į norimą katalogą arba ištrinti, kad blokai būtų išsaugoti brėžinio kataloge.
(while (setq b (tblnext "BLOCK"))
(vl-cmdf "_wblock" (strcat "c:\\folder\\" (setq b (cdr (assoc 2 b))) ".dwg") b)
)