Класс графических объектов RoundSquareWPF

Класс графических объектов "Квадрат со скругленными краями". Базовый класс - CircleWPF.
Конструкторы класса RoundSquareWPF
constructor (x,y,w,r: real; c: GColor);
        Создает квадрат со скругленными краями со стороной w с радиусом скругления r заданного цвета с координатами левого верхнего угла (x,y)
constructor (p: Point; w,r: real; c: GColor);
        Создает квадрат со скругленными краями со стороной w с радиусом скругления r заданного цвета с координатами левого верхнего угла, задаваемыми точкой
Методы класса RoundSquareWPF
function WithBorder(w: real := -1): RoundSquareWPF;
        Декоратор включения границы объекта
function WithNoBorder: RoundSquareWPF;
        Декоратор выключения границы объекта
function WithRotate(da: real): RoundSquareWPF;
        Декоратор поворота объекта
function WithText(txt: string; size: real := 16; fontname: string := 'Arial'; c: GColor := Colors.Black): RoundSquareWPF;
        Декоратор текста объекта
Свойства базового класса CircleWPF
property Height: real;
        Высота круга
property Radius: real;
        Радиус круга
property Width: real;
        Ширина круга
Методы базового класса CircleWPF
function WithBorder(w: real := -1);
        Декоратор включения границы объекта
function WithNoBorder;
        Декоратор выключения границы объекта
function WithRotate(da: real): CircleWPF;
        Декоратор поворота объекта
function WithText(txt: string; size: real := 16; fontname: string := 'Arial'; c: GColor := Colors.Black): CircleWPF;
        Декоратор текста объекта
Свойства базового класса BoundedObjectWPF
property BorderColor: GColor;
        Цвет границы графического объекта
property BorderWidth: real;
        Ширина границы графического объекта
property Color: GColor;
        Цвет графического объекта
Методы базового класса BoundedObjectWPF
function WithBorder(w: real := -1): BoundedObjectWPF;
        Декоратор включения границы объекта
function WithNoBorder: BoundedObjectWPF;
        Декоратор выключения границы объекта
Свойства базового класса ObjectWPF
property Center: Point;
        Центр графического объекта
property Color: GColor;
        Цвет графического объекта
property Dx: real;
        Направление движения по оси X. Используется методом Move
property Dy: real;
        Направление движения по оси Y. Используется методом Move
property FontColor: Color;
        Цвет шрифта текста внутри графического объекта
property FontName: string;
        Имя шрифта текста внутри графического объекта
property FontSize: real;
        Размер текста внутри графического объекта
property Height: real;
        Высота графического объекта
property Left: real;
        Отступ графического объекта от левого края
property LeftBottom: Point;
        Левый нижний угол графического объекта
property LeftTop: Point;
        Левый верхний угол графического объекта
property Number: integer;
        Целое число, выводимое в центре графического объекта. Используется свойство Text
property RightBottom: Point;
        Правый нижний угол графического объекта
property RightTop: Point;
        Правый верхний угол графического объекта
property RotateAngle: real;
        Угол поворота графического объекта (по часовой стрелке)
property RotateCenter: Point;
        Центр поворота графического объекта
property Text: string;
        Текст внутри графического объекта
property TextAlignment: Alignment;
        Выравнивание текста внутри графического объекта
property Top: real;
        Отступ графического объекта от верхнего края
property Width: real;
        Ширина графического объекта
Методы базового класса ObjectWPF
procedure AddChild(ch: ObjectWPF);
        Добавляет к графическому объекту дочерний
procedure DeleteChild(ch: ObjectWPF);
        Удаляет из графического объекта дочерний
procedure Destroy;
        Удаляет графический объект
procedure Move;
        Перемещает графический объект на вектор (dx,dy)
procedure MoveForward(r: real);
        Перемещает графический объект в направлении RotateAngle (вверх при RotateAngle=0)
procedure MoveOn(a,b: real);
        Перемещает графический объект на вектор (a,b)
procedure MoveTo(x,y: real);
        Перемещает левый верхний угол графического объекта к точке (x,y)
procedure Rotate(da: real);
        Поворачивает графический объект по часовой стрелке на угол da
procedure ToBack;
        Переносит графический объект на задний план
procedure ToFront;
        Переносит графический объект на передний план
function WithRotate(da: real): ObjectWPF;
        Декоратор поворота объекта
function WithText(txt: string; size: real := 16; fontname: string := 'Arial'; c: GColor := Colors.Black): ObjectWPF;
        Декоратор текста объекта