a2DeleteFont This command deletes a font that was created by a2CreateFont(), freeing up system resources.
Syntax
    a2DeleteFont fontID
Parameters
    fontID
Integer The integer returned when the font was created.
Returns
The command does not return a value.
Description
This command deletes a font that was created by a2CreateFont(), freeing up system resources.
Example Code
    myFont1 = a2CreateFont("ariel",30,a2Size_Cell(),a2Style_Normal())
    myFont2 = a2CreateFont("ariel",30,a2Size_Char(),a2Style_Normal())
    myFont3 = a2CreateFont("ariel",30,a2Size_Point(),a2Style_Normal())
    myFont4 = a2CreateFont("ariel",30,a2Size_Char(),a2Style_Normal())
    myFont5 = a2CreateFont("ariel",30,a2Size_Char(),a2Style_Bold())
    myFont6 = a2CreateFont("ariel",30,a2Size_Char(),a2Style_Italic())
    myFont7 = a2CreateFont("ariel",30,a2Size_Char(),a2Style_BoldItalic())

    print SYSTEM SMEM AVAILABLE()

    a2DeleteFont myFont1
    a2DeleteFont myFont2
    a2DeleteFont myFont3
    a2DeleteFont myFont4
    a2DeleteFont myFont5
    a2DeleteFont myFont6
    a2DeleteFont myFont7

    print SYSTEM SMEM AVAILABLE()

    WAIT KEY
See also
a2CreateFont Advanced 2D Index Main Menu