Вызвать наследника базового класса из другого модуля
Дано:
Проект OOPProject состоит из модуля главной формы UformOOP.pas и модуля UOOPBaseClass.pas, содержащего абстрактный класс TAbstractCalculation.
Класс TAbstractCalculation имеет публичную функцию Calculate для проведения вычисления с использованием двух чисел.
Переменные TAbstractCalculation могут храниться в списке. Для добавления используется процедура AddToObjList, для удаления – RemoveFromObjList.
Результаты вычисления по всему списку можно сохранить в объект класса TStrings при помощи процедуры CalcAllObj.
Вы не можете изменять текст модуля UOOPBaseClass.pas.
Вы не можете добавлять модули в UformOOP.pas, кроме стандартных модулей.
Задание:
1. Создать несколько наследников от класса TAbstractCalculation.
Разместить их в новом модуле (или модулях).
2. Добавить необходимые компоненты в модуль UformOOP.pas, для демонстрации работы ваших классов используя CalcAllObj.
Подскажите как вызвать наследника который находится в новом модуле из формы UformOOP.pas
Как это реализовать?
Вот исходник на этот пример. Как работать через полиморфизм я знаю. А вот чтобы через разные модули, вот этого я не знаю и ищу совета у вас