GetFont()
  

Opens the font selection dialog and returns the font name, size and style selected.

SYNTAX

GetFont ([cInitFontName , nInitFontSize , lBold , lItalic , anInitColor , lUnderLine , lStrikeOut , nCharset.] )--> aFont

Remarks

The returned array has four elements:

aFont [1] : Font Name (Character)
aFont [2] : Font Size (Numeric)
aFont [3] : Font Bold (Logical)
aFont [4] : Font Italic (Logical)
aFont [5] : Font Color (three element numeric array)
aFont [6] : Font Underline (Logical)
aFont [7] : Font StrikeOut (Logical)
aFont [8] : Font Charset (Numeric)

If cancel is selected, the returned array contains the following values:

aFont [1] : ""
aFont [2] : 0
aFont [3] : .F.
aFont [4] : .F.
aFont [5] : 0
aFont [6] : .F.
aFont [7] : .F.
aFont [8] : 0

Available Charsets

ANSI_CHARSET
DEFAULT_CHARSET
SYMBOL_CHARSET
SHIFTJIS_CHARSET
HANGEUL_CHARSET
HANGUL_CHARSET
GB2312_CHARSET
CHINESEBIG5_CHARSET
OEM_CHARSET
JOHAB_CHARSET
HEBREW_CHARSET
ARABIC_CHARSET
GREEK_CHARSET
TURKISH_CHARSET
VIETNAMESE_CHARSET
THAI_CHARSET
EASTEUROPE_CHARSET
RUSSIAN_CHARSET
MAC_CHARSET
BALTIC_CHARSET

EXAMPLE:

See demo in :
\Samples\Basic\GetFont