isCOBOL Evolve : User Interface : Controls Reference : IWC-PANEL : Properties : Font
Font
This property specifies the font that may be used to compute the height and the width of the IWC-Panel control. See the Height-In-Cells, Lines, Size, and Width-In-Cells properties for further details.
 
Example - Define an iwc-panel control with a font to determine its size
working-storage section.
copy "isfonts.def".
77 Arial-0v0   handle of font.
...
 
screen section.
...
03 screen-1-ip-3 Iwc-Panel
   line 15.8
   column 33.5
   size 13 cells
   lines 18 cells
   font Arial-0v00
   id 9
   js-name "f-map"
   .
...
procedure division.
...
is-load-fonts.
   initialize wfont-data arial-0v0.
   move 10 to wfont-size.
   move "Arial" to wfont-name.
   set wfont-bold to false.
   set wfont-italic to false.
   set wfont-underline to false.
   set wfont-strikeout to false.
   set wfont-fixed-pitch to false.
   call "w$font" using wfont-get-font arial-0v0 wfont-data.
...