3.46  tab-panel%

Superclass: vertical-panel%

A tab panel arranges its subwindows in a single column, but also includes a horizontal row of tabs at the top of the panel. See also panel%.

The tab-panel% class does not implement the virtual swapping of the panel content when a new tab is selected. Instead, it merely invokes a callback procedure to indicate that a user changed the tab selection.

• (new tab-panel% (choices _) (parent _) [(callback _)] [(style _)] [(font _)] [(enabled _)] [(vert-margin _)] [(horiz-margin _)] [(border _)] [(spacing _)] [(alignment _)] [(min-width _)] [(min-height _)] [(stretchable-width _)] [(stretchable-height _)]) -> tab-panel% object
     choices : list of strings (up to 200 characters each)
     parent : frame%, dialog%, panel%, or pane% object
     callback = (lambda (tp e) (void)) : procedure of two arguments: a tab-panel% object and a control-event% object
     style = null : list of symbols in '(no-border deleted)
   font = normal-control-font : font% object
     enabled = #t : boolean
     vert-margin = 0 : exact integer in [0, 1000]
     horiz-margin = 0 : exact integer in [0, 1000]
     border = 0 : exact integer in [0, 1000]
     spacing = 0 : exact integer in [0, 1000]
     alignment = '(center top) : two-element list: 'left, 'center, or 'right and 'top, 'center, or 'bottom
   min-width = graphical minimum width : exact integer in [0, 10000]
     min-height = graphical minimum width : exact integer in [0, 10000]
     stretchable-width = #t : boolean
     stretchable-height = #t : boolean

  Creates a tab pane, where the choices list specifies the tab labels.

  Each string in choices can contain an ampersand, which (in the future) may create a mnemonic for clicking the corresponding tab. A double ampersand is converted to a single ampersand.

  The callback procedure is called (with the event type 'tab-panel) when the user changes the tab selection.

  If the style list includes 'no-border, no border is drawn around the panel content. If style includes 'deleted, then the tab panel is created as hidden, and it does not affect its parent's geometry; the tab panel can be made active later by calling parent's add-child method.

  The font argument determines the font for the control. For information about the enabled argument, see window<%>. For information about the horiz-margin and vert-margin arguments, see subarea<%>. For information about the min-width, min-height, stretchable-width, and stretchable-height arguments, see area<%>.

  
  

Methods
    append
    delete
    get-item-label
    get-number
    get-selection
    set
    set-item-label
    set-selection

All Methods
    accept-drop-files from window<%>
    add-child from area-container<%>
    after-new-child from area-container<%>
    append from tab-panel%
    begin-container-sequence from area-container<%>
    border from area-container<%>
    change-children from area-container<%>
    client->screen from window<%>
    container-flow-modified from area-container<%>
    container-size from area-container<%>
    delete from tab-panel%
    delete-child from area-container<%>
    enable from window<%>
    end-container-sequence from area-container<%>
    focus from window<%>
    get-alignment from area-container<%>
    get-children from area-container<%>
    get-client-size from window<%>
    get-cursor from window<%>
    get-graphical-min-size from area<%>
    get-handle from window<%>
    get-height from window<%>
    get-item-label from tab-panel%
    get-label from window<%>
    get-number from tab-panel%
    get-parent from area<%>
    get-plain-label from window<%>
    get-selection from tab-panel%
    get-size from window<%>
    get-top-level-window from area<%>
    get-width from window<%>
    get-x from window<%>
    get-y from window<%>
    has-focus? from window<%>
    horiz-margin from subarea<%>
    is-enabled? from window<%>
    is-shown? from window<%>
    min-height from area<%>
    min-width from area<%>
    on-drop-file from window<%>
    on-focus from window<%>
    on-move from window<%>
    on-size from window<%>
    on-subwindow-char from window<%>
    on-subwindow-event from window<%>
    on-superwindow-enable from window<%>
    on-superwindow-show from window<%>
    place-children from area-container<%>
    popup-menu from window<%>
    reflow-container from area-container<%>
    refresh from window<%>
    screen->client from window<%>
    set from tab-panel%
    set-alignment from area-container<%>
    set-cursor from window<%>
    set-item-label from tab-panel%
    set-label from window<%>
    set-selection from tab-panel%
    show from window<%>
    spacing from area-container<%>
    stretchable-height from area<%>
    stretchable-width from area<%>
    vert-margin from subarea<%>