CLIM mail archive

[Prev][Next][Index][Thread]

Maximizing CLIM window



This is probably a no brainer for most folks but how do I define my application
frame to fill the entire screen? Also, how do set up the frame to display
without the user having to place the window with the mouse first? Below is a
smaple of my frame definition. Thanks for your help.

								SLS
-------------------------

(DEFINE-APPLICATION-FRAME cap-plot ()
    ()
  (:COMMAND-TABLE (cap-plot :INHERIT-FROM (USER-COMMAND-TABLE
plot-command-table event-command-table)))
  (:PANES
    (graph-menu :COMMAND-MENU
		:DISPLAY-FUNCTION '(DISPLAY-COMMAND-MENU :COMMAND-TABLE
plot-command-table)
                :MAX-HEIGHT '(1 :LINE)
		:HEIGHT '(1 :LINE))
    (graph-pane :APPLICATION
		:LABEL '("Plot" :TEXT-STYLE (:FIX :ITALIC :SMALL))
		:LABEL-ALIGNMENT :BOTTOM
		:DISPLAY-FUNCTION 'display-graph-pane
		:DISPLAY-AFTER-COMMANDS nil
		:INCREMENTAL-REDISPLAY nil
		:END-OF-LINE-ACTION :ALLOW  ;Enable draw past EOL without
scolling.
		:END-OF-PAGE-ACTION :ALLOW
		;:HEIGHT '(14 :LINE)
		:WIDTH +FILL+
		:SCROLL-BARS nil)
    (event-menu :COMMAND-MENU
		:DISPLAY-FUNCTION '(DISPLAY-COMMAND-MENU :COMMAND-TABLE
event-command-table)
		:HEIGHT '(1 :LINE)
		:MAX-HEIGHT '(1 :LINE))
    (event-pane :APPLICATION
		:LABEL '("Events" :TEXT-STYLE (:FIX :ITALIC :SMALL))
		:LABEL-ALIGNMENT :BOTTOM
		:INCREMENTAL-REDISPLAY nil
		:HEIGHT '(6 :LINE)
		:MAX-HEIGHT '(10 :LINE)
		:END-OF-LINE-ACTION :ALLOW
		:END-OF-PAGE-ACTION :ALLOW
		:SCROLL-BARS :VERTICAL)
    (command :INTERACTOR
	     :HEIGHT '(6 :LINE)
	     :MIN-HEIGHT '(6 :LINE)
	     :MAX-HEIGHT '(6 :LINE)))
  (:POINTER-DOCUMENTATION t)
  (:LAYOUTS
    (:default
      (VERTICALLY ()
        graph-menu
        graph-pane
        event-menu
        event-pane
        command))
     (:alternate
       (VERTICALLY ()
	 graph-menu
	 graph-pane
	 command)))






Main Index | Thread Index