Установка цвета и стиля заполнения

SetColor(< константа определяющая цвет>:word); - установка цвета графического изображения.

SetBkColor(<константа определяющая цвет фона>:word); - установка цвета фона;

SetFillStyle(<константа стиля заполнения>:word; <константа цвета заполнения>:word); - установка способа закраски.

Таблица цветов

Константа		Цвет
Имя	Значение
Black	0	Черный
Blue	1	Синий
Green	2	Зеленый
Cyan	3	Бирюзовый
Red	4	красный
Magenta	5	малиновый
Brown	6	коричневый
LightGray	7	светло-серый
DarkGray	8	темно-серый
LightBlue	9	ярко-голубой
LightGreen	10	ярко-зеленый
LightCyan	11	ярко-бирюзовый
LightRed	12	ярко-красный
LightMagenta	13	ярко-малиновый
Yellow	14	желтый
White	15	белый

Таблица констант для стандартных

стилей заполнения.

Константа		Стиль заполнения
Имя	Значение
EmptyFill	0	заполнение цветом фона
SolidFill	1	заполнение текущим цветом
LineFill	2	Заполнение символами ---
LtslashFill	3	заполнение символами // нормальной толщ.
SlashFill	4	заполнение символами // удвоенной толщ.
BkslashFill	5	заполнение символами \\ удвоенной толщ.
LtbkSlashFill	6	заполнение символами \\ нормальной толщ.
HatchFill	7	заполнение вертикально-горизонтальной штриховкой тонкими линиями
XhatchFill	8	заполнение штриховкой крест-накрест по диагонали «редкими» тонкими линиями
InterLeaveFil	9	заполнение штриховкой крест-накрест по диагонали «частыми» тонкими линиями
WideDotFill	10	заполнение «редкими» точками
CloseDotFill	11	заполнение «частыми» точками