Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

"Самоагрегация" [D7, WinXP]


Страницы:   1 2

chaika_sv ©   (2010-12-24 09:49:00) 

Всем привет.

Подскажите, как сделать так, чтобы объект некоторого класса мог агрегировать объекты этого же класса.
Ну то есть, если есть класс TClass, то хочется сделать как-то так:

TClass = class
...
obj: TClass;
...
end;


chaika_sv   (2010-12-24 10:15:00) [21]


> если в секции type, то так нельзя...

Да, в секции Type...

Так-то я делал вот такую вещь:

 TClassRef = ^TClass;

 TClassMass = array of TClassRef;

 TClass = class
   ...
   obj: TClassMass;
   ...
 end;

- это работает, но уж больно неудобно потом с этими TClassRef работать.


brother   (2010-12-24 10:10:00) [22]

> TClassMass = array of TClass;

если в секции type, то так нельзя...


chaika_sv   (2010-12-24 10:01:00) [23]

Ой, да.. Прошу прощения, здесь я зря упростил пример.

На самом деле, надо чтобы объект некоторого класса мог агрегировать массивобъектов этого же класса. Причём нет никакой проблемы написать так:

TClass = class
...
obj: array of TClass;
...
end;

Но что если я хочу создать тип - массив:

TClassMass = array of TClass;

TClass = class
...
obj: TClassMass;
...
end;

- вот так не выходит :(


icWasya   (2010-12-24 09:51:00) [24]

А в чём проблема?


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо