Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.10;
Скачать: CL | DM;

Вниз

Зацикливание классов   Найти похожие ветки 

 
SEYD   (2003-06-28 14:00) [0]

вощем есть 2 класса:

Class1=class
.....
Owner:class2;
.....
end;


Class2=class
.....
variable1:class1;
.....
end;

смысл такой, что есть некий класс (в данном случае Class2) который может содержать наследников Class1, но при этом из этих наследников нужен достум к их хозяину (переменной тпа Class2), как это реализовать?

PS: Class1 и Class2 находятся в разных модулях.


 
SEYD   (2003-06-28 14:22) [1]

и если не лень напишите плиз на мыло


 
Тих   (2003-06-28 14:33) [2]

ИМХО никак. Выход - сделать третий модуль, в котором в Interface прописать uses Class1, Class2, создать от них наследников и юзать друг в дружке, что-то навроде

unit Unit4;
interface
uses Unit2, Unit3;

type
Class2Child = class;

Class1Child = class(Class1)
pClass2: Class2Child;
end;

Class2Child = class(Class2)
pClass1: Class1Child;
end;



Страницы: 1 вся ветка

Текущий архив: 2003.07.10;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.015 c
14-31458
race1
2003-06-24 08:52
2003.07.10
chm help


1-31336
Jao
2003-06-27 09:32
2003.07.10
Фильтр для файлов в ShellListView1


1-31237
region
2003-06-29 15:34
2003.07.10
List index out of bounds ...


3-31155
n1tro
2003-06-19 06:44
2003.07.10
Помогите с запросом


3-31136
ZDN
2003-06-18 09:23
2003.07.10
MSSQL, Oracle & DB2