Шрифты: загружать или компоновать

Обычно предикат settextstyle загружает файл со сглаженным шрифтом,

отводя память под шрифт, а затем - подгружает с диска соответствующий

файл типа .CHR в память во время выполнения программы. В противовес этой

схеме динамической загрузки вы можете подкомпоновать файл (или несколько

файлов), содержащий шрифт прямо к исполняемому файлу. Вы это можете сде-

лать, используя директиву компилятора bgifont в тексте вашей программы

для регистрации шрифта. Когда вы транслируете текст программы, Турбо Про-

лог подкомпонует этот зарегистрированный шрифт в объектный файл .OBJ.

Предикаты

В этом разделе мы дадим краткое описание всех предикатов BGI, ис-

пользуемых при выводе текста в графическом режиме. Более полное описание

находится в разделе "Стандартные Предикаты" в "Справочном Руководстве по

Турбо Прологу".

outtext/1

outtext выводит текст на экран начиная с текущей позиции (ТП).

outtext(TextString) /*(i)*/

(string)

outtextxy/3

outtextxy выводит текст на экран начиная с указанной позиции.

outtextxy(X, Y, TextString) /*(i,i,i)*/

(integer, integer, string)

textheight/2

textheight возвращает высоту текста пикселах.

textheight(TextString, Height) /*(i,o)*/

(string, integer)

textwidth/2

textwidth возвращает длину строки в пикселах.

textwidth(TextString, Width) /*(i,o)*/

(string, integer)

settextsettings/5

settextsettings возвращает текущие шрифт, направление вывода, размер

и установку текста.

settextsettings(Font, Direction, CharSize, Horiz, Vert)

/*(o,o,o,o,o)*/

(integer, integer, integer, integer, integer)

settextjustify/2

settextjustify устанавливает расположение текста для outtext и

outtextxy.

settextjustify(Horiz, Vert) /*(i,i)*/

(integer, integer)

Горизонтальная и вертикальная установки задаются независимо. Текст,

выводимый после вызова settextjustify, будет устанавливаться по горизон-

тали и вертикали относительно текущей позиции согласно аргументам. По

умолчанию установка предполагается следующей - left_TEXT (по горизонтали)

и top_TEXT (по вертикали).

Символические имена для установки текста в settextjustify описаны в

файле GRAPDECL.PRO.

Таблица 17.11 Константы установки текста.

----------------------------------------------------------------

Название Значение Описание

----------------------------------------------------------------

left_TEXT 0 горизонтальная установка

center_TEXT 1 горизонтальная и вертикальная

установка

right_TEXT 2 горизонтальная установка

bottom_TEXT 0 вертикальная установка

top_TEXT 2 вертикальная установка

----------------------------------------------------------------

Если горизонтальная установка равна left_TEXT и направление вывода

равно horiz_DIR, то X-компонента текущей позиции (ТПx) изменится после

вызова outtext(string) на расстояние textwidth(string).