Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Вызвать наследника базового класса из другого модуля

88K
29 июля 2013 года
Terabait
2 / / 29.07.2013
Задание на знание ООП.
Дано:
Проект 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
Как это реализовать?
88K
29 июля 2013 года
Terabait
2 / / 29.07.2013
Вот исходник на этот пример. Как работать через полиморфизм я знаю. А вот чтобы через разные модули, вот этого я не знаю и ищу совета у вас
Прикрепленные файлы:
8 Кб
Загрузок: 836
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог