Графические процедуры

ЛЕКЦИЯ.16. Графические возможности языка Паскаль.

 

Для использования графических возможностей Турбо Паскаля необходимо в блоке описания uses подключить графический модуль Graph. Модуль содержит набор графических функций и процедур, основные из которых рассмотрены ниже.

 

 

Arc(x,y:integer;St,En,R:word); {рисование дуги, где x,y - коорд. центра дуги, R - радиус, St, En - нач. и конечный углы.}

 

ClearDevice; {очистка экрана}

 

Circle(x,y:integer;R:word); {окружность радиуса R

cцентром в точке (x,y)}

 

CloseGraph; {закрытие графики}

 

InitGraph(gd,gm:integer;Path:string); {инициализация графики, где

gd - графический драйвер,

gm - графический режим,

Path - путь размещения файла

с расширением .bgi.}

 

Line(x1,y1,x2,y2:integer); {рисование линии, проходящей через две точки:

с координатами (x1,y1) и (x2,y2) }

 

LineRel(dx,dy:integer); {рисование линии: dx, dy – приращения

координат к координатам текущей

позиции курсора}

 

LineTo(x,y:integer); {рисование линии, проходящую через текущую

позицию курсора и точку с координатами (x,y)}

 

Moveto(x,y:integer); {задание координат текущей точки}

 

OutText(T:string); {вывод текста в текущую точку}

 

OutTextXY(x,y:integer;T:string);{вывод текста в точку с координатами х,у}

 

Rectangle(x1,y1,x2,y2:integer); {рисование прямоугольника: (x1,y1) и (x2,y2) - координаты противоположных вершин}

 

PutPixel(x,y:integer;c:word); {выводит точку с координатами (х,у) цветом с}