CAD Software Forum

Posted: **Mon Jul 09, 2007 6:19 am**

: (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

Posted: **Sat Jul 21, 2007 10:50 am**

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)
)