; FontWidth()/FontHeight – пример использования

; Включить графический режим
Graphics 800,600,16

; Создать глобальную переменную для шрифта
Global fntArial

; Загрузить шрифт в переменную
fntArial=LoadFont("Arial",13,False,False,False)

; Установить шрифт и вывести на экран размер
SetFont fntArial
Text 400,0,"Ширина самого широкого символа в шрифте:"+ FontWidth(),True,False
Text 400,30,"Высота шрифта:"+ FontHeight(),True,False

; Подождать нажатия клавиши Esc
While Not KeyHit(1)
Wend

; Очистить память от всех шрифтов
FreeFont fntArial