Settstyle/3

settextstyle устанавливает текущий шрифт, направление и коэффици ент

увеличения.

settextstyle(Font, Direction, CharSize) /*(i,i,i)*/

(integer, integer, integer)

Направление текста может быть горизонтальным (слева направо) или

вертикальным (снизу вверх). По умолчанию установлено горизонтальное нап-

равление horiz_DIR.

Таблица 17.12 Константы, описывающие направление текста.

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

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

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

horiz_DIR 0 слева направо

vert_DIR 1 снизу вверх

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

Аргумент CharSize устанавливает коэффициент увеличения.

* Если CharSize=0, предикаты вывода outtext и outtextxy увели-

чивают символы сглаженного шрифта (на встроенный шрифт значение

CharSize=0 не влияет) либо на коэффициент увеличения заданный

по умолчанию (4), либо заданный пользователем размер символов

(с помощью setuserxharsize). В качестве аргумента CharSize мож-

но использовать константу user_Char_Size (=0), определенную в

GRAPDECL.PRO.

* Если CharSize=1, outtext и outtextxy будут отображать символы

встроенного шрифта в прямоугольник 8*8 пикселов на экране.

* Если CharSize=2, эти предикаты будут отображать символы вст-

роенного шрифта в прямоугольник 16*16 пикселов на экране. И так

далее (до CharSize=10).

Setusercharsize/4

setusercharsize устанавливает отношения ширины и высоты для сглажен-

ных шрифтов.

setusercharsize(MultX, DivX, MultY, DivY) /*(i,i,i,i)*/

(integer, integer, integer, integer)

Предикат setusercharsize позволяет задать размер выводимого текста.

Значения, устанавливаемые в setusercharsize, действительны только при

CharSize=0 (смотрите описание settextstyle). В этом случае вы определяете

коэффициенты, на которые умножается ширина и высота символов. По умолча-

нию ширина умножается на MultX:DivX, а высота - на MultY:DivY. Например,

чтобы сделать текст в два раза шире и на 50% выше, чем его размеры по

умолчанию, устанавливаются следующие значения аргументов:

MultX = 2, DivX = 1,

MultY = 3, DivY = 2.

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

/* Program CH17EX05.PRO */

include "GRAPDECL.PRO"

goal

initgraph(detect, 0, GraphDriver, GraphMode, ""),

Title = "Font Example",

setTextJustify(center_TEXT, center_TEXT),

setUserCharSize(1, 1, 1, 1),

setTextStyle(triplex_Font, horiz_Dir, user_Char_Size),

textWidth(Tilte, Width), textHeight(Title, Height),

setUserCharSize(200, Width, 100, Height),

setTextStyle(triplex_Font, horiz_Dir, user_Char_Size),

rectangle(0, 0, 200, 100),

outtextxy(100, 48, Title),

setUserCharSize(300, Width, 100, Height),

setTextStyle(gothic_Font, horiz_Dir, user_Char_Size),

rectangle(220, 0, 520, 100),

outtextxy(370, 48, Title),

/* Vertical Sans_Serif Font */

setUserCharSize(200, Width, 150, Height),

setTextStyle(sans_Serif_Font, vert_Dir, user_Char_Size),

rectangle(100, 110, 240, 300),

outtextxy(300, 200, Title),

setTextJustify(left_TEXT, center_TEXT),

setTextStyle(small_Font, horiz_Dir, 1),

outtextxy(380, 200, "Press Key to exit"),

setTextJustify(right_TEXT, center_TEXT),

setTextStyle(small_Font, horiz_Dir, 4),

outtextxy(380, 208, "Press Key to exit"),

setTextJustify(left_TEXT, center_TEXT),

setTextStyle(small_Font, horiz_Dir, 6),

outtextxy(380, 220, "Press Key to exit"),

setTextJustify(center_TEXT, center_TEXT),

setTextStyle(default_Font, horiz_Dir, 2),

outtextxy(380, 240, "Press Key to exit"),

readchar(_),

closegraph.