Программирование на С++ - eDrive

30
В файле кода модуля определить статическую функцию Clear класса
Shape, управляющую удалением изображения из элемента Image:
void Shape::Clear () {
{ Form1–>Image1–>Canvas–>Brush–>Color = clWhite;
TRect myRect =
Rect (0, 0, Form1–>Image1–>Width, Form1–>Image1–>Height);
Form1–>Image1–>Canvas–>FillRect (myRect); }
2. Производный класс-образец. В том же файле заголовка модуля объявить
производный класс Circle:
class Circle : Shape
{ int cx, cy, rad;
public:
Circle (int x, int y, int r, TColor p, TColor b) :
cx (x), cy (y), rad (r), Shape (p, b) {}
void Draw ();
void Move (int x, int y);
void Fill (); };
В конструкторе класса переменные x, y и r задают координаты центра и радиус
окружности, а p и b – цвета линии и заливки, передаваемые конструктору
базового класса. Функция Draw рисует окружность, Move перемещает
ее, а Fill закрашивает. В файле кода модуля надо определить эти методы
класса Circle:
void Circle::Draw ()
{ Form1–>Image1–>Canvas–>Pen–>Color = penColor;
TRect myRect = Rect (cx – rad/2, cy – rad/2, cx + rad/2, cy + rad/2);
Form1–>Image1–>Canvas–>Ellipse (myRect); }
void Circle::Move (int x, int y)
{ cx += x; cy += y; }
void Circle::Fill ()
{ Form1–>Image1–>Canvas–>Brush–>Color = brushColor;
Form1–>Image1–>Canvas–>FloodFill (cx, cy, penColor, fsBorder); }
3. Применение класса Circle. В классе формы объявить указатель на объект
базового класса:
Shape *myShape;
в конструкторе создать соответствующий объект:
myShape = (Shape*) new Circle (100, 150, 10, clGray, clYellow);