Класс CircleABC
Класс CircleABC является потомком класса
EllipseABC и представляет графический объект
"Круг". Большинство свойств и
методов унаследовано от
классов ObjectABC и BoundedObjectABC.
| Конструкторы класса CircleABC |
constructor Create(x,y,r: integer; cl: GColor);
Создает круг радиуса r цвета
cl с координатами центра (x,y)
|
constructor Create(g: CircleABC);
Создает круг - копию круга g
|
procedure Scale(f: real);Масштабирует круг в f раз
(f>1 - увеличение, 0<f<1 - уменьшение) |
function Clone: CircleABC;
Возвращает клон круга |
| Свойства класса CircleABC |
property Radius: integer;
Радиус круга |
| Свойства, унаследованные от класса BoundedObjectABC |
property BorderColor: GColor;
Цвет границы |
property BorderWidth: integer;
Ширина границы |
property Bordered: boolean;
Имеет ли объект границу (по умолчанию True)
|
property Filled: boolean;
Заполнена ли внутренность объекта (по умолчанию True)
|
| Методы, унаследованные от класса BoundedObjectABC |
procedure SetDrawSettings;
Защищенный метод. Устанавливает атрибуты пера и кисти перед рисованием |
| Свойства, унаследованные от класса ObjectABC |
property Left: integer;
Отступ графического объекта от левого края |
property Top: integer;
Отступ графического объекта от верхнего края |
property Width: integer;
Ширина графического объекта |
property Height: integer;
Высота графического объекта |
property dx: integer;
x-координата вектора перемещения объекта при вызове метода Move. По
умолчанию установлено в 0. Для неподвижных объектов может быть использовано для
хранения любой дополнительной информации, связанной с объектом
|
property dy: integer;
y-координата вектора перемещения объекта при вызове метода Move. По
умолчанию установлено в 0. Для неподвижных объектов может быть использовано для
хранения любой дополнительной информации, связанной с объектом
|
property Center: Point;
Центр графического объекта |
property Position: Point;
Левый верхний угол графического объекта |
property Visible: boolean;
Видим ли графический объект |
property Color: GColor;
Цвет графического объекта |
property FontColor: GColor;
Цвет шрифта графического объекта |
property Text: string;
Текст внутри графического объекта |
property TextVisible: boolean;
Видимость текста внутри графического объекта |
property TextScale: real;Масштаб текста относительно размеров графического объекта, 0<= TextScale<=1.
При TextScale=1 текст занимает всю ширину или высоту объекта. По умолчанию
TextScale=0.8 |
property FontName: string;
Имя шрифта для вывода свойства Text
|
property FontStyle: FontStyleType;
Стиль шрифта для вывода свойства Text
|
property Number: integer;
Целое число, выводимое в центре графического объекта. Для вывода используется свойство Text
|
property RealNumber: real;Вещественное число, выводимое в центре графического объекта. Для вывода используется свойство Text. Вещественное число выводится с одним знаком после
десятичной точки |
property Owner: ContainerABC;
Владелец графического объекта, ответственный также за перерисовку графического объекта внутри себя (по умолчанию nil)
|
| Методы, унаследованные от класса ObjectABC |
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<f<1 - уменьшение)
|
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;
Уничтожает графический объект |