MetaMultiSplitPane__example

#Class MetaMultiSplitPane

[back]

example
    | layout window pane b1 b2 b3 b4 b5 b6 |

    layout := '(COLUMN (ROW weight=1.0 left (COLUMN middle.top middle middle.bottom) right) bottom)'.
    window := Window new.
    pane := self newWithLayout: layout.
    b1 := Pane title: 'Button 1' action: [Window notify: 'hello'].
    pane add: b1 at: 'left'.
    window width: 400 height: 300.
    window setPane: pane javaObject.
    ^ window show