isCOBOL Evolve : User Interface : Controls Reference : TOOL-BAR : Properties : Control Font
Control Font
Since the Tool-Bar control is a container, the controls it contains may inherit some peculiarities.
The font handle set to this property will be the default value of the FONT Property of the controls created in the Tool-Bar control.
This property also affects the way the cell size is calculated. See the Cell Height, Cell Size, and Cell Width properties for further details.
 
Example - Define a tool-bar with 3 buttons and default control font
screen section.
...
  01 screen-1-tb-1.
     03 screen-1-pb-4 Push-Button
        line 1.7
        column 2.4
        size 5.2 cells 
        lines 2.6 cells 
        id 11
        title "Exit"
        .
     03 screen-1-pb-5 Push-Button
        line 1.7
        column 13.0
        size 5.2 cells 
        lines 2.6 cells 
        id 12
        title ">"
        .
     03 screen-1-pb-6 Push-Button
        line 1.7
        column 20.1
        size 5.2 cells 
        lines 2.6 cells 
        id 13
        title "<"
        .
...
procedure division.
...
  display tool-bar
          cell width 10
          cell height 10
          control font Default-Font
          color 232
          lines 4.0
          handle screen-1-tb-1-hdl
  .
  display screen-1-tb-1 upon screen-1-tb-1-hdl.
...