Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Uch_praktika_-_6_-_grafika.doc
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
126.98 Кб
Скачать

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

Для установки цвета изображения и фона применяются процедуры:

SetColor (Color: Word) задает цвет, который будет использоваться процедурами графического вывода.

SetBkColor (Color: Word) задает новый цвет фона

Номер цвета задается параметром Color

Константа

Значение

Цвет на экране монитора

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

Белый

В модуле Graph содержится ряд стандартных шаблонов различных узоров для заполнения внутренних и внешних областей различных геометрических фигур. Узор может быть окрашен в допустимые для установленной палитры цвета. Комбинацию узор-цвет называют стилем заполнения.

Процедура SetFillStyle( Pattern: Word; Color: Word) устанавливает маску Pattern и ее цвет Color, т. е. определяет стиль заполнения.

Параметр Pattern может иметь следующие значения:

Константа

Значение

Описание узора

EmptyFill

0

Сплошной цветом фона

SolidFill

1

Сплошной текущим цветом

LineFill

2

Типа

LtSlashFill

3

Типа /// нормальной толщины

SlashFill

4

Типа /// удвоенной толщины

BkSlashFill

5

Типа \\\ нормальной толщины

LtBkSlashFill

6

Типа \\\ удвоенной толщины

HatchFill

7

Заполнение клеткой

XHatchFill

8

Заполнение косой редкой клеткой

InterLeaveFill

9

Заполнение косой частой клеткой

WideDotFill

10

Заполнение редкими точками

CloseDotFill

11

Заполнение частыми точками

UserFill

12

Определяется пользователем

5.4 Заполнение областей изображения

Процедура Sector (X, Y: Integer; StEngle, EndEngle: Word; XR, YR: Word) рисует сектор эллипса, который будет залит цветом по текущему шаблону.

Процедура PieSlice (X, Y: Integer; StEngle, EndEngle, Radius: Word) рисует сектор эллипса, который будет залит текущим узором.

Процедура FillEllipse (X, Y: Integer; XR, YR: Word) рисует контур эллипса текущим цветом и заполняет ограниченную контуром область экрана текущим узором.

Процедура FloodFill (X, Y: Integer; Border: Word) заполняет заданным с помощью SetFillStyle стилем область, расположенную либо внутри замкнутого контура, либо вне его. (X, Y)-координаты точки внутри или вне замкнутого контура, Border-цвет контура.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]