Вторник, Октябрь 20Добро пожаловать!

Работа с точками и графическими примитивами в языке Pascal

Модуль Graph обладает достаточно большим количеством функций и процедур, благодаря которым осуществляется работа с точками и графическими примитивами в языке Паскаль. Остановимся подробнее на некоторых из них:

1) Процедура

putpixel(x1,y1,c);

осуществляет вывод на дисплей точки, имеющей цвет c и координаты x1 и y1.

2) Процедура

line(x1,y1,x2,y2);

обеспечивает рисование отрезка текущего цвета и типа, имеющего концы в точках с координатами (x1,y1) и (x2,y2).

3) Процедура

setlinestyle(<вид линии>,<размер>,<толщина>);

устанавливает тип линии.

4) Процедура

lineto(x1,y1);

обеспечивает рисование отрезка текущего цвета и типа, начиная с исходной позиции курсора и заканчивая точкой с координатами (x1,y1).

5) Функции

getx и gety

позволяют получить информацию об исходном размещении графического курсора.

6) Чтобы расположить графический курсор в точку с желаемыми координатами, пользуются процедурой

moveto(x1,y1);

7) Процедура

rectangle(x1,y1,x2,y2);

изображает прямоугольник линией текущего цвета и типа, начиная с верхней левой точки с координатами (x1,y1) и заканчивая нижней левой точкой с координатами (x2,y2);

8) Процедура

bar(x1,y1,x2,y2);

эквивалентна процедуре rectangle, но с той особенностью, что изображаемый прямоугольник заполнится текущим узором.

9) Процедура

setfillstyle(<тип узора>,<цвет>);

обеспечивает установку типа и цвет узора.

10) Процедура

bar3d(x1,y1,x2,y2,z,t);

осуществляет построение параллелепипеда текущего цвета с окрашенной передней гранью. Здесь под параметромz понимается глубина параллелепипеда, а логический параметр t проверяет, рисовать ли (значение true) или нет (значение false) переднюю грань.

11) Процедура

circle(x1,y1,r);

изображает окружность с текущим цветом с центром в точке, имеющей координаты (x1,y1), и радиусом r.

12) Процедура

ellipse(x1,y1,a,b,xr,yr);

рисует эллипс, либо его дугу с центром в точке, имеющей координаты (x1,y1). Параметры a и b устанавливают значения в радианах соответственного начального и конечного углов, которые ограничивают дугу, а параметры xr иyr являются большим и малым радиусом.

13) Процедура

arc(x1,y1,a,b,r);

обеспечивает отрисовку дуги окружности с радиусом r, центр которой находится в точке, имеющей координаты (x1,y1), из угла a, выраженного в радианах, в угол b.

14) Процедура

fillellipse(x,y,xr,yr);

осуществляет рисование заполненного текущим узором эллипса текущего цвета.

15) Процедура

pieslice(x1,y1,a,b,r);

изображает набитый текущим узором сектор круга с текущим цветом.

16) Процедура

sector(x,y,a,b,xr,yr);

рисует сектор эллипса с текущим цветом, заполняя его текущим узором.

17) Процедура

floodfill(x1,y1:integer; bord:word)

производит заполнение произвольной замкнутой фигуры текущим стилем и цветом заполнения. Координаты точки (x1,y1) показывают, с какой именно точки осуществиться заливка.  Если данная точка располагается в замкнутой фигуре, то окрашивается ее внутренняя область. В случае незамкнутой фигуры произойдет казус, и заливка будет произведена по всему дисплею. За параметром bord закреплено определение цвета граничной линии.

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *