TheSwamp

Code Red => AutoLISP (Vanilla / Visual) => Topic started by: Coder on July 09, 2011, 02:32:08 AM

Title: Put specific name of layout on .
Post by: Coder on July 09, 2011, 02:32:08 AM

Hi everyone .

I wonder how to put a specific name of layout on (active) , could anyone guide me to it ?

Code: [Select]

(vlax-for layouts (vla-get-layouts (vla-get-activedocument (vlax-get-acad-object )))
   (print (vla-get-name layouts))
  )


Quote

"Layout1"
"Layout2"
"Layout3"
"Layout4"
"Layout5"
"Model"

I tried it with vla-put-activelayout but without a chance to succeed .

many thanks

Title: Re: Put specific name of layout on .
Post by: gile on July 09, 2011, 03:51:13 AM

Hi,

No need to use Automation (vla*).
The layoutlist AutoLISP function returns the same as your expression but "Model".
The CTAB sysvar is read/write.

Code: [Select]

(layoutlist)

(setvar 'ctab "Layout1")

Title: Re: Put specific name of layout on .
Post by: Coder on July 09, 2011, 01:02:25 PM

Thank you Gile .

That was new to me .

Appreciated.