: (layoutlist)
"Layout1 Layout2 "
In AutoCAD, it returns ("Layout1" "Layout2")
This is better, because we can have a layout name as "Layout 1".
So, Intellicad would return "Layout 1 Layout2"
Why not do like AutoCAD?
ef
#2
Try rolling up a lisp
Code: Select all
(defun layoutlist ( / e rl)
(setq rl '())
(foreach e (dictsearch (namedobjdict) "ACAD_LAYOUT")
(if (and
(= (car e) 3)
(/= (strcase (cdr e)) "MODEL")
)
(setq rl (cons (cdr e) rl))
)
)
(reverse rl)
)