McBasic™ 0.7.881 · Build 881 · 9 min read

Controls · Visual control

ToolBar

Expose frequent commands and report their result in a StatusBar.

35 properties17 events1 methodsDefault: Click

Build the ToolBar lesson Properties Events Methods

Use it in a Form#

Toolbar items are commands, not separate Forms. Keep labels, enabled states and the selected item consistent. A status bar is useful for nonblocking confirmation; do not use it as the only indication of an error that prevents an operation.

Add ToolBar to its intended parent and name it tbMain for this example:

Property	Example value
`Items`	`"New\nOpen\nSave"`
`ClickedIndex`	`-1`

A complete handler from Forms/frmMain.bas. The linked lesson includes its surrounding controls, declarations and helpers.

Forms/frmMain.bas

Private Sub tbMain_Click()
    staMain.Text = "Toolbar item " & CStr(tbMain.ClickedIndex + 1) & " clicked."
End Sub

Properties#

Contract defaults are shown below. Where a new control has a different Designer starting value, that value is listed separately.

`Left`

DoubleDefault: 0

Horizontal position in device-independent points, relative to the parent container.

Range: -100000 to 100000.

`Top`

DoubleDefault: 0

Vertical position in device-independent points, relative to the parent container.

Range: -100000 to 100000.

`Width`

DoubleDefault: 360

Toolbar width in device-independent points.

Range: 0 to 100000.

`Height`

DoubleDefault: 38

Toolbar height in device-independent points.

Range: 0 to 100000.

`MinWidth`

DoubleDefault: 0

Minimum control width in device-independent points; 0 lets the parent layout choose.

Range: 0 to 100000.

`MinHeight`

DoubleDefault: 0

Minimum control height in device-independent points; 0 lets the parent layout choose.

Range: 0 to 100000.

`MaxWidth`

DoubleDefault: 100000

Maximum control width in device-independent points.

Range: 0 to 100000.

`MaxHeight`

DoubleDefault: 100000

Maximum control height in device-independent points.

Range: 0 to 100000.

`TabIndex`

LongDefault: 0

Keyboard navigation order within the parent container; lower values come first.

Range: 0 to 100000.

`ZIndex`

LongDefault: 0

Stacking order among sibling controls; larger values appear in front. Equal values preserve document order.

Range: -100000 to 100000.

`Anchor`

StringDefault: "Left,Top"Not in InspectorNot serialized

Edges kept at their authored distance when the parent resizes. Use a comma-separated combination of Left, Top, Right and Bottom; Dock overrides the effective anchor without deleting it.

`Dock`

StringDefault: "None"

Automatic placement within the parent: None, Left, Top, Right, Bottom or Fill. Dock overrides effective Anchor layout without deleting the stored anchors.

`Margin`

StringDefault: "0"

External spacing as one non-negative DIP value or Left,Top,Right,Bottom.

`Visible`

BooleanDefault: True

Whether the toolbar is shown in the running application.

`Enabled`

BooleanDefault: True

Whether toolbar buttons accept user interaction in the running application.

`HitTestVisible`

BooleanDefault: True

Whether the running control participates in pointer hit testing. The control remains selectable in the Designer.

`AllowDrop`

BooleanDefault: False

Whether this running control accepts application drag-and-drop operations; Designer movement is separate.

`DragMode`

LongDefault: 0

VB control drag: 0 Manual (code starts a drag with the Drag method) or 1 Automatic (a left-button press starts a drag, and the control raises no Click, MouseDown or MouseUp for that press).

Range: 0 to 1.

`DragIcon`

StringDefault: ""

Case-insensitive name of a declared project image resource shown under the pointer while this control is dragged; empty shows a grey outline of the control.

`Font`

StringDefault: ""

Toolbar button caption font as Family|Size or Family|Size|Regular/Bold|Normal/Italic, size 6–96 DIP. Empty uses the theme font.

`ForeColor`

StringDefault: ""

Toolbar button caption color as #RRGGBB. Empty inherits the Form color or theme.

`BackColor`

StringDefault: ""

Toolbar surface color as #RRGGBB. Empty uses the theme background; button chrome remains themed.

`AccessibleName`

StringDefault: ""

Name announced by assistive technology. Empty uses the stable control Name.

`Cursor`

StringDefault: "Default"

Pointer shown over the control: Default, Arrow, Hand, IBeam, Cross, Wait, Help, SizeAll, SizeNS, SizeWE, SizeNWSE, SizeNESW or NotAllowed.

`Opacity`

DoubleDefault: 1

Visual opacity from 0 (transparent) to 1 (opaque).

Range: 0 to 1.

`DesignLocked`

BooleanDefault: FalseDesigner only

Prevents movement and resizing in the Designer without changing runtime interaction.

`AccessibleDescription`

StringDefault: ""

Additional help text announced by assistive technology.

`AccessibleRole`

StringDefault: "Auto"

Accessibility role override. Auto preserves the native semantic role; explicit values use the corresponding platform automation role.

`AutomationId`

StringDefault: ""

Stable automation identifier; empty uses the component Name.

`TabStop`

BooleanDefault: True

Whether Tab navigation can move focus to this ToolBar.

`ToolTipText`

StringDefault: ""

Help text shown when the pointer rests over the running control; empty disables the tooltip.

`Tag`

StringDefault: ""

Application-defined text associated with this control; McBasic™ does not interpret it.

`Items`

StringDefault: "New\nOpen\nSave"

One button caption per line. The first line has ClickedIndex zero. Empty lines are ignored.

`ClickedIndex`

LongDefault: -1

Zero-based index of the last clicked toolbar item; -1 means no item has been clicked.

Range: -1 to 100000.

`Index`

LongDefault: -1Read only in BASICDesigner Index row

Position of this control in its control array, 0 to 32767. Several controls share one name only when every one of them has an Index. Absent from the layout, and -1 in code, when the control is not in an array.

Designer values: 0 to 32767. Clear the dedicated Index row for a non-array control; BASIC then reads -1.

Events and parameters#

Replace control with the object’s Name when creating a handler. ByRef arguments may be changed by your handler; ByVal arguments report an input value.