ABCObjects: быстрое введение
Основными типами графических объектов, определенными в модуле
ABCObjects
, являются RectangleABC
, SquareABC
,
EllipseABC
, CircleABC
, TextABC
, RegularPolygonABC
,
StarABC
, PictureABC
, MultiPictureABC
, BoardABC
и ContainerABC
.
Типы графических объектов представляют собой классы,
состоящие из методов и свойств, а также нуждающиеся в конструировании перед
первым использованием. Изменение свойств влияет на внешний вид и поведение
графических объектов. Например, при изменении свойств Width
и Height
меняются
размеры графического объекта, при изменении свойства
Color
- цвет графического
объекта и т.д. Вызов методов
графического объекта возвращает или меняет его
характеристики. Например, при вызове метода ToFront
графический объект перемещается на передний план, а вызов метода Intersect(g)
возвращает, пересекается ли текущий объект с объектом g
.
Все графические объекты являются разновидностями класса
ObjectABC
, который содержит общие для всех
свойства и методы.
Создадим два перекрывающихся графических объекта:
uses ABCObjects,GraphABC;
var r: RectangleABC;
c: CircleABC;
begin
r := new RectangleABC(70,50,200,100,clMoneyGreen);
c := new CircleABC(120,80,110,clBlue);
end.
После запуска программы увидим на экране следующее:
Поменяем некоторые свойства графических объектов и вызовем метод MoveOn для окружности, дописав в конец программы следующие строки:
r.Width := 150;
c.Color := clRed;
c.MoveOn(30,30);
После запуска программы:
Добавим в конец программы следующие строки:
c.Number := 8;
r.Text := 'Hello';
r.ToFront;
После запуска программы: