Курсовая работа: Побудова динамічної графіки

Заповнює довільну замкнуту фігуру, використовуючи поточний стиль заповнення (узор і колір). Заголовок:

Procedure FloodFill(X,Y: Integer; Border: Word);

Тут X, Y- координати будь-якої точки всередині замкнутої фігури; Border - колір граничної лінії.

Якщо фігура незамкнута, заповнення «розіллється» по всьому екрану.

Слід врахувати, що реалізований в процедурі алгоритм проглядання меж замкнутої фігури не відрізняється досконалістю. Зокрема, якщо виводяться підряд два порожні рядки, заповнення припиняється. Така ситуація звичайно виникає при заповненні невеликих фігур з використанням типу LtSlashFill. У фірмовому керівництві по Турбо Паскалю рекомендується, по можливості, замість процедури FloodFill використовувати FillPoly (заповнення прямокутника).

Процедура Bar.

Заповнює прямокутну область екрану.

Заголовок:

Procedure Bar(X1,Y1,X2,Y2: Integer);

Тут XJ...Y2 - координати лівого верхнього (X1, Y1) і правого нижнього (Х2, Y2) кутів закрашуваної області.

Процедура закрашує (але не обводить) прямокутник поточним зразком узору і поточним кольором, які встановлюються процедурою SetFillStyle.

Процедура Ваr3D.

Викреслює тривимірне зображення паралелепіпеда і закрашує його передню грань . Заголовок:

Procedure Ваr3D (X1,Y1,X2,Y2,Depth: Integer; Top: Boolean);

Тут X1... Y2 - координати лівого верхнього (X1, Y1) і правого нижнього (Х2, Y2) кутів передньої грані; Depth - третє вимірювання тривимірного зображення («глибина») в пікселях; Тор - спосіб зображення верхньої грані.

Якщо параметр Тор має значення True, верхня грань паралелепіпеда викреслюється, інакше - не викреслюється (цей варіант використовується для зображення поставлених один на одного паралелепіпедів). Як значення цього параметра може використовуватися одна з наступних констант, визначених в модулі Graph:

const

TopOn = True;

TopOff = False;

При викреслюванні використовується поточний стиль ліній (SetLineStyle) і поточний колір (SetColor). Передня грань заливається поточним стилем заповнення (SetFillStyle).

Процедура звичайно застосовується при побудові стовпчикових діаграм. Слід врахувати, що паралелепіпед «прозорий», тобто за його незакрашеними гранями можуть бути видні інші елементи зображення.

Процедура Fill Poly.

Обводить лінією і закрашує замкнутий багатокутник.

Заголовок:

Procedure FillPoly(N: Word; var Coords);

Тут N - кількість вершин замкнутого багатокутника; Coords - змінна типа PointType, що містить координати вершин.

Координати вершин задаються парою значень типа Integer: перше визначає горизонтальну, друге - вертикальну координати. Для них можна використовувати наступний певний в модулі тип:

type

PointType = record