Setting the default Blitz font?

BlitzMax Forums/BlitzMax Beginners Area/Setting the default Blitz font?

This works for me...
Graphics 640, 480, 0

Local DefaultFont:TImageFont
Local NewFont:TImageFont

DefaultFont = GetImageFont()
NewFont = LoadImageFont("c:/windows/fonts/Arial.ttf", 20)'For demonstration purposes only ;o)

SetImageFont(NewFont)
DrawText "This is ~qArial~q", 10, 0

SetImageFont(DefaultFont)
DrawText "This is ~qBlitz~q", 10, NewFont.Height()

Flip

WaitKey()

End