procedure MoveTo(x,y: integer); Перемещает левый верхний угол графического объекта к точке (x,y) |
procedure MoveOn(a,b: integer); Перемещает графический объект на вектор (a,b) |
procedure Move; virtual; Перемещает графический объект на вектор, задаваемый свойствами dx,dy |
procedure Scale(f: real); virtual; Масштабирует графический объект в f раз (f>1 - увеличение, 0 |
procedure ToFront; Переносит графический объект на передний план |
procedure ToBack; Переносит графический объект на задний план |
function Bounds: System.Drawing.Rectangle; Возвращает прямоугольник, определяющий границы графического объекта |
function PtInside(x,y: integer): boolean; virtual; Возвращает True, если точка (x,y) находится внутри графического объекта, и False в противном случае |
function Intersect(g: ObjectABC): boolean; Возвращает True, если изображение данного графического объекта пересекается с изображением графического объекта g, и False в противном случае. Белый цвет считается прозрачным и не принадлежащим объекту |
function IntersectRect(r: System.Drawing.Rectangle): boolean; Возвращает True, если прямоугольник графического объекта пересекается прямоугольником r, и False в противном случае |
function Clone0: ObjectABC; virtual; Возвращает клон графического объекта |
function Clone: ObjectABC; Возвращает клон графического объекта |
procedure Draw(x,y: integer; g: Graphics); virtual; Защищенная. Не вызывается явно. Переопределяется для каждого графического класса. Рисует объект на объекте g: Graphics |
destructor Destroy; Уничтожает графический объект |
Класс BoundedObjectABC
Класс BoundedObjectABC является непосредственным потомком класса ObjectABC и базовым классом для всех замкнутых графических объектов. Его основными потомками являются следующие классы: RectangleABC, SquareABC, EllipseABC, CircleABC, RegularPolygonABC, StarABC, BoardABC. Класс BoundedObjectABC - абстрактный: объекты этого класса не создаются.
property BorderColor: GColor; Цвет границы |
property BorderWidth: integer; Ширина границы |
property Bordered: boolean; Имеет ли объект границу (по умолчанию True) |
property Filled: boolean; Заполнена ли внутренность объекта (по умолчанию True) |
procedure SetDrawSettings; Защищенный метод. Устанавливает атрибуты пера и кисти перед рисованием |