Показать сообщение отдельно
Старый 04.09.2005, 22:20   #7
alcosholik
 
Сообщений: n/a
SetFont указатель_на_шрифт

Параметры
указатель_на_шрифт = указатель на ранее загруженный шрифт (в оригинале хелпа автор перепутал описание параметров для команды SetFont – прим. перев.)

Описание
Активирует TrueType шрифт, который был ранее загружен в память (командой LoadFont) для дальнейшего использования с командами вывода текста на экран (Text, например).

Примечание: 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 *
 
Ответить с цитированием