CwStatusBar
CwStatusBar is a horizontal window at the bottom of a parent window in which an application can display various kinds of status information.
Protocol
createPanel: theName argBlock: argBlock
add a CwPanel as a child of the receiver.
Callbacks and Events
The progress bar has no callbacks or events specific to it.
Example
The following code creates a status bar with several panels.
statusBar := CwStatusBar
createWidget: 'StatusBar'
parent: shell
argBlock: nil.
statusBar manageChild.
statusBar showPanels: true.
statusBar
createPanel: 'Panel1'
argBlock: [:w |
w
labelString: 'Default'];
createPanel: 'Panel2'
argBlock: [:w |
w
labelString: 'Raise and Fixed';
shadowType: XmSHADOWOUT;
width: 100];
createPanel: 'Panel3'
argBlock: [:w |
w
labelString: 'Inset';
shadowType: XmSHADOWIN;
recomputeSize: true];
createPanel: 'Panel4'
argBlock: [:w |
w
labelString: 'No Bevel';
shadowType: XmNONE;
width: 150];
createPanel: 'Panel5'
argBlock: [:w |
w
labelString: 'Auto-stretch';
shadowType: XmSHADOWOUT;
Last modified date: 04/21/2022