Главная страница
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.014 c
14-31518
TCrash
2003-06-25 14:40
2003.07.10
проблема с кодеками


3-31118
Max_
2003-06-17 16:50
2003.07.10
Trigger в Oracle


3-31130
Max_
2003-06-18 10:59
2003.07.10
Query.Last в отдельном потоке?


4-31580
Nick Denry
2003-05-08 20:12
2003.07.10
SetMenuItemBitmaps or SetMenuItemInfo


7-31546
Shiza
2003-04-28 11:26
2003.07.10
Свойства файла.