Книга: Описание языка PascalABC.NET
Графические примитивы
Графические примитивы
Графические примитивы представляют собой процедуры, осуществляющие рисование в графическом окне. Рисование осуществляется текущим пером (линии), текущей кистью (заливка замкнутых областей) и текущим шрифтом (вывод строк).
procedure SetPixel(x,y: integer; c: Color); Закрашивает пиксел с координатами (x,y) цветом c |
procedure PutPixel(x,y: integer; c: Color); Закрашивает пиксел с координатами (x,y) цветом c |
function GetPixel(x,y: integer): Color; Возвращает цвет пиксела с координатами (x,y) |
procedure MoveTo(x,y: integer); Устанавливает текущую позицию рисования в точку (x,y) |
procedure LineTo(x,y: integer); Рисует отрезок от текущей позиции до точки (x,y). Текущая позиция переносится в точку (x,y) |
procedure LineTo(x,y: integer; c: Color); Рисует отрезок от текущей позиции до точки (x,y) цветом c. Текущая позиция переносится в точку (x,y) |
procedure Line(x1,y1,x2,y2: integer); Рисует отрезок от точки (x1,y1) до точки (x2,y2) |
procedure Line(x1,y1,x2,y2: integer; c: Color); Рисует отрезок от точки (x1,y1) до точки (x2,y2) цветом c |
procedure FillCircle(x,y,r: integer); Заполняет внутренность окружности с центром (x,y) и радиусом r |
procedure DrawCircle(x,y,r: integer); Рисует окружность с центром (x,y) и радиусом r |
procedure FillEllipse(x1,y1,x2,y2: integer); Заполняет внутренность эллипса, ограниченного прямоугольником, заданным координатами противоположных вершин (x1,y1) и (x2,y2) |
procedure DrawEllipse(x1,y1,x2,y2: integer); Рисует границу эллипса, ограниченного прямоугольником, заданным координатами противоположных вершин (x1,y1) и (x2,y2) |
procedure FillRectangle(x1,y1,x2,y2: integer); Заполняет внутренность прямоугольника, заданного координатами противоположных вершин (x1,y1) и (x2,y2) |
procedure FillRect(x1,y1,x2,y2: integer); Заполняет внутренность прямоугольника, заданного координатами противоположных вершин (x1,y1) и (x2,y2) |
procedure DrawRectangle(x1,y1,x2,y2: integer); Рисует границу прямоугольника, заданного координатами противоположных вершин (x1,y1) и (x2,y2) |
procedure FillRoundRect(x1,y1,x2,y2,w,h: integer); Заполняет внутренность прямоугольника со скругленными краями; (x1,y1) и (x2,y2) задают пару противоположных вершин, а w и h – ширину и высоту эллипса, используемого для скругления краев |
procedure DrawRoundRect(x1,y1,x2,y2,w,h: integer); Рисует границу прямоугольника со скругленными краями; (x1,y1) и (x2,y2) задают пару противоположных вершин, а w и h – ширину и высоту эллипса, используемого для скругления краев |
procedure Circle(x,y,r: integer); Рисует заполненную окружность с центром (x,y) и радиусом r |
procedure Ellipse(x1,y1,x2,y2: integer); Рисует заполненный эллипс, ограниченный прямоугольником, заданным координатами противоположных вершин (x1,y1) и (x2,y2) |
procedure Rectangle(x1,y1,x2,y2: integer); Рисует заполненный прямоугольник, заданный координатами противоположных вершин (x1,y1) и (x2,y2) |
procedure RoundRect(x1,y1,x2,y2,w,h: integer); Рисует заполненный прямоугольник со скругленными краями; (x1,y1) и (x2,y2) задают пару противоположных вершин, а w и h – ширину и высоту эллипса, используемого для скругления краев |
procedure Arc(x,y,r,a1,a2: integer); Рисует дугу окружности с центром в точке (x,y) и радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки) |
procedure FillPie(x,y,r,a1,a2: integer); Заполняет внутренность сектора окружности, ограниченного дугой с центром в точке (x,y) и радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки) |
procedure DrawPie(x,y,r,a1,a2: integer); Рисует сектор окружности, ограниченный дугой с центром в точке (x,y) и радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки) |
procedure Pie(x,y,r,a1,a2: integer); Рисует заполненный сектор окружности, ограниченный дугой с центром в точке (x,y) и радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки) |
procedure DrawPolygon(points: arrayof Point); Рисует замкнутую ломаную по точкам, координаты которых заданы в массиве points |
procedure FillPolygon(points: arrayof Point); Заполняет многоугольник, координаты вершин которого заданы в массиве points |
procedure Polygon(points: arrayof Point); Рисует заполненный многоугольник, координаты вершин которого заданы в массиве points |
procedure Polyline(points: arrayof Point); Рисует ломаную по точкам, координаты которых заданы в массиве points |
procedure Curve(points: arrayof Point); Рисует кривую по точкам, координаты которых заданы в массиве points |
procedure DrawClosedCurve(points: arrayof Point); Рисует замкнутую кривую по точкам, координаты которых заданы в массиве points |
procedure FillClosedCurve(points: arrayof Point); Заполняет замкнутую кривую по точкам, координаты которых заданы в массиве points |
procedure ClosedCurve(points: arrayof Point); Рисует заполненную замкнутую кривую по точкам, координаты которых заданы в массиве points |
procedure TextOut(x,y: integer; s: string); Выводит строку s в прямоугольник к координатами левого верхнего угла (x,y) |
procedure TextOut(x,y: integer; n: integer); Выводит целое n в прямоугольник к координатами левого верхнего угла (x,y) |
procedure TextOut(x,y: integer; r: real); Выводит вещественное r в прямоугольник к координатами левого верхнего угла (x,y) |
procedure DrawTextCentered(x,y,x1,y1: integer; s: string); Выводит строку s, отцентрированную в прямоугольнике с координатами (x,y,x1,y1) |
procedure DrawTextCentered(x,y,x1,y1: integer; n: integer); Выводит целое значение n, отцентрированное в прямоугольнике с координатами (x,y,x1,y1) |
procedure DrawTextCentered(x,y,x1,y1: integer; r: real); Выводит вещественное значение r, отцентрированное в прямоугольнике с координатами (x,y,x1,y1) |
procedure FloodFill(x,y: integer; c: Color); Заливает область одного цвета цветом c, начиная с точки (x,y). |
- Типы и переменные модуля GraphABC
- Графические примитивы
- Функции для работы с цветом
- Цветовые константы
- Подпрограммы для работы с пером
- Текущее перо Pen
- Стили пера
- Подпрограммы для работы с кистью
- Текущая графическая кисть Brush
- Стили кисти
- Стили штриховки кисти
- Подпрограммы для работы со шрифтом
- Текущий шрифт Font
- Стили шрифта
- Класс Picture графического рисунка
- Подпрограммы для работы с графическим окном
- Класс GraphABCWindow графического окна
- Подпрограммы для работы с координатами графического окна
- Класс GraphABCCoordinate графического окна
- Подпрограммы блокировки рисования
- Подпрограммы режимов рисования
- События модуля GraphABC
- Виртуальные коды клавиш
- 1.2. Создание изображений. Графические примитивы
- Графические гиперссылки
- Практическая работа 41. Графические объекты в документах Word
- Библиографические замечания
- Базовые криптографические механизмы сервисов безопасности PKI
- 5.1.11. Графические объекты
- Простые графические шаблоны
- 5. Графические редакторы
- Примитивы DLPI
- Глава 21 Графические возможности GDI+
- Глава 12. Графические интерфейсы для Ruby
- Глава 17 Графические возможности