Для использования шрифтов необходимы следующие действия:
выбор (регистрация) шрифта
установка текущего шрифта из регистра
отображение текста текущим шрифтом
выгрузка шрифтов из памяти
4.2.1. Выбор шрифта
Процесс регистрации шрифта представляет собой загрузку в ОЗУ
соответствующего .fon файла
Синтаксис: dum
= RegisterFonts (filename), где: filename – имя fon
файла с необязательным указанием пути доступа. Возможно использование
подстановочных символов * и ?.
Пример:
Dum = RegisterFonts (‘C:MSLIBFONT*.fon‘)
Вывести текст шрифтом может только функция outgtext. В случае ошибки возвращается следующее значения:
- 1 нет заданного файла
или каталога
- 2 один или более FON
файлов является двоичными
- 3 один или более FON
файлов испорчены.
4.2.2. Установка шрифта
Установка шрифта производится функцией SetFont
Пример:
Dum = SetFont (“t‘Roman’h18”)
После выполнения функции setfont установленный шрифт
становится текущим, т.е. он действует до тех пор, пока не будет установлен
другой шрифт (либо не отменен видеорежим, либо не окончена программа). Текущим
может быть только один шрифт. Параметры функции setfont задаются строкой
символов, которые определяют желаемые характеристики выбранного шрифта. Порядок
параметров не имеет значения.