Программирование в среде Турбо Паскаль. Закутский С.Н - 60 стр.

UptoLike

ВУЗ: 

ВГУ | Воронеж

Составители: 

Рубрика: 

60
Имя
модуля
Имя процедуры
или функции
Назначение подпрограммы
Procedure GoTo(x, y :
byte)
Перемещает курсор в нужное место экрана
Procedure Arc
109
(x, y :
integer; StartAngle,
EndAngle, Radius : word)
Рисует дугу радиусом
Radius
110
от
начального угла
StartAngle
111
к
конечному углу
EndAngle
, используя
x
,
y
как координаты центра
Procedure Circle
112
(x, y
: integer; R : word)
Рисует окружность радиуса
R
, использyя
x
,
y
как координаты центра
Procedure ClearDevice
113
Очищает экран
Procedure
DrawPoly
114
(NumPoints :
word; var PolyPoints)
Рисует многоугольник из
NumPoints
115
вершин с координатами в
PolyPoints
текущим цветом
Procedure
FillPoly
116
(NumPoints :
word; var PolyPoints)
Рисует и штрихует многоуголиник ,
содержащий
NumPoints
вершин с
координатами в
PolyPoints
Procedure
InitGraph
117
(var Driver,
Mode : integer; Path :
string
118
)
Инициализирует графический режим .
Переменные
Driver
119
,
Mode
120
должны
содержать тип графического драйвера и его
режим работы. Допускается указывать
Driver = 0
для автоматического
определения этих параметров по
результатам тестирования аппаратуры.
Параметр
Path
121
определяет маршрут
поиска файла графического драйвера .
Procedure Line(x1, y1,
x2, y2 : integer)
Рисует линию от точки
x1
,
y1
до точки
x2
,
y2
Graf
Procedure Rectangle
122
(x1, y1, x2, y2 :
integer)
Рисует прямоугольник , используя текущий
цвет и тип линии.
109
Arc [ак] – дуга .
110
Radius [рэйдйес ] – радиус .
111
Angle [энгл ] – угол.
112
Circle [сёкл ] – окружность.
113
Device [дивайс ] – устройство .
114
Draw poly [дро поли] – рисовать многоугольник .
115
Num Points [нам поинтс ] – количество точек.
116
Fill poly [фил поли] – заполнять многоугольник .
117
Init graph [инит грэф ] – инициализировать графический режим .
118
String [стрин ] – строка .
119
Driver [драйвэ] – драйвер.
120
Mode [моуд ] – режим .
121
Path [пас] – путь.
122
Rectangle [рэктэнгл ] – прямоугольник .

Страницы