26 Процедуры и функции для работы с графическими примитивами

Line(x1,y1,x2,y2{integer}) – вычерчивается отрезок прямой от (х1, у1) до (х2,

у2)

LineTo(x,y) – от текущей позиции курсора до (x,y);

LineRel(dx,dy) – от текущей позиции курсора до ((x+dx),(y+dy));

MoveTo(x,y) – курсор устанавливается в точку (x,y);

MoveRel(dx,dy) - курсор устанавливается в точку ((x+dx),(y+dy));

PutPixel(x,y,Color) – закрашивает точку (x,y) в цвет Color.