Процедуры построения фигур из линий

Процедуры работы с линиями

GetLineSettings (var Linelnfo: LineSettingsType); - возвращает текущий стиль, образец и толщину линии, установленные процедурой SetLineStyle.

Line (XI, Yl, X2, Y2: integer); - рисует прямую линию из точки (X1,Y1) в точку (X2,Y2), толщина и тип которой задаются процедурой SetLineStyle, а цвет устанавливается процедурой SetColor. Текущий указатель своего положения не изменяет.

LineRel (dX,dY: integer); - проводит прямую в точку, заданную относительным расстоянием (Dx,Dy) от текущего указателя.

LineTo (X, Y: Integer); - Рисует прямую линию из точки, в которой находится теку­щий указатель, в точку (X,Y). Толщина и тип линии задаются процедурой SetLineStyle, а цвет устанавливается процедурой SetColor. Текущий указатель перемещается в конечную точку.

MoveRel (dX, dY: integer); - перемещает текущий указатель на расстояние, заданное относительными координатами от его текущей позиции.

MoveTo (X, Y: integer); - перемещает текущий графический указатель в точку (X,Y).

SetLineStyle (SType:word; Pattern: word; S: word); - устанавливает текущую толщину S и тип линии SType.

SetWriteMode (Mode: integer); - устанавливает режим записи Mode при вычерчивании линии.

Ваr(Х1, Yl, X2, Y2: integer) -рисует столбец, заданный координатами (XI,Y1) и (X2,Y2), используя стандартный тип и цвет закраски.

Bar3D (XI, Yl, X2, Y2: integer; L: word; S: boolean); -используя текущий тип и цвет закраски, рисует трехмерный параллелепипед (столбец), заданный координатами (X1,Y1), (X2,Y2) и глубиной L. S — признак отображения верхней плоскости.

DrawPoly (N: word; var S); - используя текущий тип линии и текущий цвет, рисует контур многоугольника. Параметр S является нетипизованным параметром, который содержит координаты каждого пересечения в многоугольнике. Параметр N задает число координат в S. Координата состоит из двух слов: значения Х и значения У.

FillPoly (N: word; var S); - рисует закрашенный многоугольник.

Параметр S является нетипизованным параметром, который содержит координаты каждого пересечения сторон в многоугольнике (координаты вершин). Параметр N задает число координат в S. Координата состоит из двух слов: значения X и значения Y.

FloodFill (X, Y: integer; S: word); - закрашивает ограниченную область, используя текущий заполнитель. Точка (X,Y) является произвольной внутренней точкой заполняемой области. Для заполнения области, ограниченной цветом, которую определяет параметр S, используется текущий образец закраски.

GetFillPattern (var Pattern: FiUPatternType); - возвращает текущий образец заполнителя, заданный последним обращением к процедуре SetFillPattern. Параметр Pattern — это образец заполнителя.

GetFillSetings (var Inf: FillSettingsType); - позволяет выдавать запрос о текущем типе заполнителя и его цвете, которые установлены процедурами SetFillStyl или SetFillPattern.

Rectangle (XI, Yl, X2, Y2: integer); - рисует прямоугольник, используя текущий цвет и тип линии. Точка с координатами (X1, Y1) определяет верхний левый угол прямоугольника, а точка с координатами (X2,Y2) определяет нижний правый угол (0 <= X1 < Х2 <= GetMaxX и 0 <= Yl< Y2 <= GetMaxY).

SetFillPattern (Pattern:FfflPatternType; Color: word); - выбирает заданный пользователем образец закраски.

SetFillStyle (Pattern: word; Color: word); - устанавливает тип закраски и ее цвет.

Дата добавления: 2014-01-05