LoadFont (имя_шрифта$[,высота][,жирный][,курсив][,подчеркнутый])
Параметры
имя_шрифта$ - имя шрифта, который нужно загрузить, например, “Arial”
высота – высота шрифта (по умолчанию 12)
жирный – True, чтобы загрузить шрифт жирным, False - не делать шрифт жирным (по умолчанию False)
курсив – True, чтобы загрузить шрифт курсивом, False – не делать шрифт курсивом (по умолчанию False)
подчеркнутый – True, чтобы загрузить шрифт подчеркнутым, False – не делать шрифт подчеркнутым (по умолчанию False)
Описание
Загружает шрифт и возвращает указатель на него.
Вы можете использовать указатель на шрифт с такими командами, как
SetFont и
FreeFont.
Примечание: Blitz не работает с символьными шрифтами (например, Webdings и WingDings).
Пример
; LoadFont/SetFont/FreeFont – пример использования
; ---------------------------------
; Включить графический режим
Graphics 800,600
; Создать глобальные переменные для шрифтов
Global fntArial, fntArialB, fntArialI, fntArialU
; Загрузить шрифты в переменные
fntArial=LoadFont("Arial",24)
fntArialB=LoadFont("Arial",18,True)
fntArialI=LoadFont("Arial",32,False,True)
fntArialU=LoadFont("Arial",14,False,False,True)
; Установить шрифт и напечатать текст
SetFont fntArial
Text 400,0,"Это просто шрифт Arial с высотой 24",True
SetFont fntArialB
Text 400,30,"Это жирный шрифт Arial с высотой 18",True
SetFont fntArialI
Text 400,60,"Это курсивный шрифт Arial с высотой 32",True
SetFont fntArialU
Text 400,90,"Это подчеркнутый шрифт Arial с высотой 14",True
; Подождать нажатия клавиши Esc
While Not KeyHit(1)
Wend
; Очистить память от всех шрифтов
FreeFont fntArial
FreeFont fntArialB
FreeFont fntArialI
FreeFont fntArialU