logo search
TurboProlog / Документация / TOM_2

Getfillsettings/2 Графика

Назначение Возвращает информацию о текущем шаблоне заполнения и

цвете

Обращение getfillsettings(ЗаполШаблон,ЗаполЦвет)

Домены (integer,integer)

Шаблоны описания (вых,вых)

аргументов

Описание Предикаты bar, bar3d, fillpoly, floodfill и pieslice

полностью заполняют область текущим шаблоном и цветом

заполнения. Имеется 11 заранее определенных шаблонов

(таких, как штриховка точками, линиями, в клеточку и

т.п.). Константы, определяющие шаблоны, описаны в

GRAPDECL.PRO (смотри таблицу). Кроме того,

пользователь сам может определить шаблон.

getfillsettings связывает переменные ЗаполШаблон и

ЗаполЦвет с значениями текущего шаблона и цвета

заполнения. Если ЗаполШаблон равен 12, то

используется шаблон заполнения, определенный

пользователем; в противном случае, ЗаполШаблон

ссылается на заранее определенный шаблон.

Существуют следующие константы, определяющие шаблоны

и описанные в GRAPDECL.PRO:

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

Имя Знач. Описание

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

Empty_Fill 0 штриховка цветом фона

Solid_Fill 1 сплошная штриховка

Line_Fill 2 штриховка ---

LtSlash_Fill 3 штриховка ///

Slash_Fill 4 штриховка утолщенными ///

BkSlash_Fill 5 штриховка утолщенными \\\

LtBkSlash_Fill 6 штриховка \\\

Hatch_Fill 7 штриховка +++

XHatch_Fill 8 штриховка повернутыми +++

Interleave_Fill 9 штриховка частыми +++

WideDot_Fill 10 штриховка точками

CloseDot_Fill 11 штриховка частыми точками

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

Все шаблоны используют текущий основной цвет, кроме

Empty_Fill, который использует текущий цвет фона.

Смотри arc,bar,bar3d,fillpoly,floodfill,getfillpattern,

pieslice,setfillpattern,setfillstyle

Пример

constants

gray50 = [$aa, $55, $aa, $55, $aa, $55, $aa, $55 ]

include "GRAPDECL.PRO"

goal

/* Инициализация гpафики c автоматическим

определением драйвера */

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

getfillsettings(SavePat,SaveColor),

/* выбор текущих параметров */

getfillpattern(SavePatternList),

/* сохранить шаблон заполнения */

setfillstyle(slash_FILL, blue),

/* изменить стиль заполнения */

bar(0, 0, 100, 100),

/* нарисовать заштрихованную голубую диаграмму */

setfillpattern(gray50, yellow),

/* обычный шаблон заполнения */

bar(100, 100, 200, 200),

/* нарисовать обычную желтую диаграмму */

setfillpattern(SavePatternList,SaveColor),

/* восстановить шаблон заполнения */

setfillstyle(SavePat, SaveColor),

readchar(_),

closegraph.