procedure MoveTo(x,y: integer); Перемещает левый верхний угол графического объекта к точке (x, y) |
procedure MoveOn(a,b: integer); Перемещает графический объект на вектор (a, b) |
procedure Move; override; Перемещает графический объект на вектор, задаваемый свойствами dx, dy |
procedure Scale(f: real); override; Масштабирует графический объект в f раз (f>1 - увеличение, 0 |
procedure ToFront; Переносит графический объект на передний план |
procedure ToBack; Переносит графический объект на задний план |
function Bounds: System.Drawing.Rectangle; Возвращает прямоугольник, определяющий границы графического объекта |
function PtInside(x,y: integer): boolean; override; Возвращает 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; override; Возвращает клон графического объекта |
procedure Draw(x,y: integer; g: Graphics); override; Защищенная. Не вызывается явно. Переопределяется для каждого графического класса. Рисует объект на объекте g: Graphics |
destructor Destroy; Уничтожает графический объект |
Класс BoardABC
Класс BoardABC является потомком класса BoundedObjectABC и представляет графический объект Доска. Большинство свойств и методов унаследовано от классов ObjectABC и BoundedObjectABC.
constructor Create(x,y,nx,ny,szx,szy: integer; cl: GColor); Создает доску nx на ny клеток цвета cl с размером клетки (szx,szy) в позиции (x,y). |
constructor Create(g: BoardABC); Создает доску - копию доски g |
property DimX: integer; Количество клеток доски по горизонтали |
property DimY: integer; Количество клеток доски по вертикали |
property CellSizeX: integer; Размер клетки по горизонтали |
property CellSizeY: integer; Размер клетки по вертикали |
function Clone: BoardABC; Возвращает клон доски |
property BorderColor: GColor; Цвет границы |
property BorderWidth: integer; Ширина границы |
property Bordered: boolean; Имеет ли объект границу (по умолчанию True) |
property Filled: boolean; Заполнена ли внутренность объекта (по умолчанию True) |
procedure SetDrawSettings; Защищенный метод. Устанавливает атрибуты пера и кисти перед рисованием |