Информатика. Часть 1. Мойзес О.Е - 108 стр.

UptoLike

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

108
readln;
CloseGraph
end.
Закрашенные области
Bar(X1,Y1,X2,Y2:integer)
- выводит на экран закрашенный
прямоугольник с координатами диагонали (X1,Y1) и (X2,Y2).
Bar3D(X1,Y1,X2,Y2:integer;Depth:word;Top:boolean) - выводит
на экран изображение закрашенного прямоугольного параллелепипеда,
который рисуется в изометрическом изображении с глубиной Depth.
Параметр Top определяет, рисовать ли верхнюю грань параллелепипеда.
Значение Top выбирается из соответствующего списка констант модуля
Graph. Если рисовать, Top =TopOn, если нет - Top = TopOff.
FloodFill(X,Y:integer;Border:word) - заполняет (закрашивает)
ограниченную область текущем цветом. Граница закрашиваемой
области высвечивается цветом, заданным в Border.
PieSlice(X,Y:integer;StAngle,EndAngle,Radius:word) - выводит
на экран изображение закрашенного сектора круга, используя в качестве
центра круга точку (X,Y), начального угла StAngle, конечного угла -
EndAngle и радиуса - Radius. Контур сектора высвечивается текущим
цветом. Если StAngle=0, а EndAngle=360 градусам, то PieSlice выводит
на экран закрашенную окружность.
Sector(X,Y:integer;StAngle,EndAngle,XRadius,YRadius:word)-
выводит на экран изображение эллиптического сектора, используя в
качествецентра круга точку (X,Y), начального угла StAngle, конечного
угла - EndAngle, а в качестве горизонтальной и вертикальной полуосей -
XRadius и YRadius. Контур сектора высвечивается текущим цветом.
Если StAngle=0, а EndAngle=360, то на экране будет выведено
изображение закрашенного эллипса.
Тип и цвет закраски можно установить с помощью процедуры
SetFillStyle (Pattern,Color: Word). В модуле Graph
предопределены
следующие типы закрасок.
Константа Значение Константа Значение
EmptyFill 0 LtBkSlashFill 6
SolidFill 1 HatchFill 7
LineFill 2 XhatchFill 8
LtSlashFill 3 InterleaveFill 9
SlashFill 4 WideDotFill 10
BkSlashFill 5 CloseDotFill 11