procedureCircle(x,y,r: integer);
Выводит на рисунке заполненную окружность с центром (x,y) и радиусом r
|
procedureEllipse(x1,y1,x2,y2: integer);
Выводит на рисунке заполненный эллипс, ограниченный прямоугольником, заданным координатами противоположных вершин (x1,y1) и (x2,y2)
|
procedureRectangle(x1,y1,x2,y2: integer);
Выводит на рисунке заполненный прямоугольник, заданный координатами противоположных вершин (x1,y1) и (x2,y2)
|
procedureRoundRect(x1,y1,x2,y2,w,h: integer);
Выводит на рисунке заполненный прямоугольник со скругленными краями; (x1,y1) и (x2,y2) задают пару противоположных вершин, а w и h – ширину и высоту эллипса, используемого для скругления краев
|
procedureArc(x,y,r,a1,a2: integer);
Выводит на рисунке дугу окружности с центром в точке (x,y) и радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки)
|
procedureFillPie(x,y,r,a1,a2: integer);
Заполняет на рисунке внутренность сектора окружности, ограниченного дугой с центром в точке (x,y) и радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки)
|
procedureDrawPie(x,y,r,a1,a2: integer);
Выводит на рисунке сектор окружности, ограниченный дугой с центром в точке (x,y) и радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки)
|
procedurePie(x,y,r,a1,a2: integer);
Выводит на рисунке заполненный сектор окружности, ограниченный дугой с центром в точке (x,y) и радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки)
|
procedureDrawPolygon(points: array ofPoint);
Выводит на рисунке замкнутую ломаную по точкам, координаты которых заданы в массиве points
|
procedureFillPolygon(points: array ofPoint);
Заполняет на рисунке многоугольник, координаты вершин которого заданы в массиве points
|
procedurePolygon(points: array ofPoint);
Выводит на рисунке заполненный многоугольник, координаты вершин которого заданы в массиве points
|
procedurePolyline(points: array ofPoint);
Выводит на рисунке ломаную по точкам, координаты которых заданы в массиве points
|
procedureCurve(points: array ofPoint);
Выводит на рисунке кривую по точкам, координаты которых заданы в массиве points
|
procedureDrawClosedCurve(points: array ofPoint);
Выводит на рисунке замкнутую кривую по точкам, координаты которых заданы в массиве points
|
procedureFillClosedCurve(points: array ofPoint);
Заполняет на рисунке замкнутую кривую по точкам, координаты которых заданы в массиве points
|
procedureClosedCurve(points: array ofPoint);
Выводит на рисунке заполненную замкнутую кривую по точкам, координаты которых заданы в массиве points
|
procedureTextOut(x,y: integer; s: string);
Выводит на рисунке строку s в прямоугольник к координатами левого верхнего угла (x,y)
|
procedureFloodFill(x,y: integer; c: Color);
Заливает на рисунке область одного цвета цветом c, начиная с точки (x,y).
|
procedureClear;
Очищает рисунок белым цветом
|
procedureClear(c: Color);
Очищает рисунок цветом c
|
Подпрограммы для работы с графическим окном
Доступ к свойствам графического окна можно осуществлять как в процедурном, так и в объектно-ориентированном стиле.
Процедуры и функции для доступа к свойствам окна сгруппированы парами: если Prop - имя свойства кисти, то функция PenProp возвращает значение этого свойства, а процедура SetPenProp(p) устанавливает это свойство:
functionWindowWidth: integer;
Возвращает ширину клиентской части графического окна в пикселах
|
functionWindowHeight: integer;
Возвращает высоту клиентской части графического окна в пикселах
|
functionWindowLeft: integer;
Возвращает отступ графического окна от левого края экрана в пикселах
|
functionWindowTop: integer;
Возвращает отступ графического окна от верхнего края экрана в пикселах
|
functionWindowIsFixedSize: boolean;
Возвращает True, если графическое окно имеет фиксированный размер, и False в противном случае
|
Читать дальше