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

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

Классы


Belorus ©   (2007-05-01 19:58:00) 

Можно ли сделать нечто в этом роде

type TSomeItem = class
    .....
    .....
    FParent : ^TItemList;
    end;
type TItemList = class
    FItems : array of TSomeItem;
    end;



Мне в дочернем классе нужно как нибудь узнать "предка" этого экземпляра.
То есть по идее при создании объекта класса TSomeItem и добвалении его я бы присваивал полю FParent значение экземпляра TItemList который создал этот объект и всё было бы отлично.

Но это вариант  не подходит т.к делфи не позволяет зациклить так классы.
Что делать ?


Belorus   (2007-05-06 19:19:00) [1]

Спасибо Сергей.М .
Реализовал через коллекции..


Сергей М.   (2007-05-02 09:09:00) [2]


> Belorus ©   (01.05.07 19:58)


А может быть и нет повода изобретать велосипед с "родительско-дочерними" отношениями объектов ?

Есть же TComponent, TCollection/TCollectionItem - в этих известных классах поддержка таких отношений уже реализована, достаточно просто унаследовать от них свои классы..


Anatoly Podgoretsky   (2007-05-01 23:52:00) [3]

> MBo  (01.05.2007 20:10:01)  [1]

Еще дальше, эта строчка лишняя, поскольку владельцем является TItemList


MBo   (2007-05-01 20:10:00) [4]

type
TItemList = class;// а полное объявление сделаешь позже

TSomeItem = class
   .....
   .....
   FParent : TItemList;
 end;


Наверх

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