Get font - %gf

In this section:

• Displaying Text
  • Font name - %fn[font_name]
  • Get font - %gf
  • Font attributes - %it, %bf, %ul
  • System font - %sf
  • Font default - %fd
  • Subscript - %sd
  • Superscript - %su
  • Text size - %ts
  • Text colour _ %tc
  • Variable string _ %N.mst
  • Sterling pound symbol - %pd
  • Mathematical equation - %eq[equation]
• Edit Boxes
  • Edit box _ %eb
  • Text array - %N.Mtx[options]
• File selection and filter
  • File selection - %fs[path]
  • File filter - %ft[name][filter]

%gf (Font Handle) takes one INTEGER(7) variable that receives the current font handle. This handle can then be used in any Windows API function that requires a font handle.

For example:

INTEGER(7) h_font
i=winio@('%ts%gf',2.0D0,h_font)