Сборник заданий для практических занятий по информатике. Крупенников О.Г - 102 стр.

UptoLike

101
5. Функции GETMAXX и GETMAXYавтоматически определяют
максимальную горизонтальную или вертикальную координату графиче-
ского экрана.
Любая координата на графическом экране при программировании на
языке FREE PASCAL задается в пикселах (точках) относительно левого
верхнего угла, который имеет координаты (0;0). Горизонтальная коорди-
ната экрана увеличивается слева направо, а вертикальнаясверху вниз.
При программировании использование этих функций позволит правильно
отобразить местоположение объекта на экране.
6. Процедура PUTPIXELвыводит заданным цветом точку по ука-
занным координатам.
Заголовок процедуры:
PROCEDURE PUTPIXEL (X,Y: INTEGER; COLOR:WORD); ,
где X, Y – координаты точки; COLOR – код цвета точки (см. пара-
граф 11.1).
7. Процедура LINEвычерчивает линию с указанными координа-
тами начала и конца.
Заголовок процедуры:
PROCEDURE LINE (X1, Y1, X2, Y2: INTEGER); ,
где Х1, Y1; X2, Y2 – соответственно координаты начала и конца линии.
8. Процедура SETLINESTYLEустанавливает стиль вычерчивае-
мых линий.
Заголовок процедуры:
PROCEDURE SETLINESTYLE (TYPE, PATTERN, THICK:
WORD); ,
где TYPE – тип линии, который можно задать с помощью одной из сле-
дующих констант.
Например:
CONST SOLIDLN = 0;{сплошная}