If graphical real estate is at a premium you can steal some from the Paper / Model space tabs too:
(defun c:TabsOn ( )
(vlax-put-property
(vlax-get-property
(vlax-get-property
(vlax-get-acad-object)
'Preferences
)
'Display
)
'DisplayLayoutTabs
:vlax-true
)
(princ)
)
(defun c:TabsOff ( )
(vlax-put-property
(vlax-get-property
(vlax-get-property
(vlax-get-acad-object)
'Preferences
)
'Display
)
'DisplayLayoutTabs
:vlax-false
)
(princ)
)
<talking to self>
OT: Wow, that extra space at the bottom of the code box is annoying, when did that start I ask myself.
Edit: Ha, got rid of the extra noted space; smug smiley here.
</talking to self>