Форум: "Основная";
Текущий архив: 2003.07.24;
Скачать: [xml.tar.bz2];

Вниз

Как обойти circular unit reference ?   Найти похожие ветки 

← →
AndreyAs   (2003-07-11 11:36) [0]

Часто встречается задача, когда есть 2 класса, которые имеют ссылки друг на друга. Примером являются классы VCL - TTreeNodes И TTreeNode. Проиллюстрирую:

TObject1 = class
Object2: TObject2;
end;

TObject2 = class
Object1: TObject1;
end;

Проблема возникает только в случае, если эти классы нужно разместить в разных модулях. Возникает ошибка компиляции [Fatal Error] Circular unit reference.

Можно хранить ссылку на дуругой класс как pointer или TObject и приводить к необходимому типу, но такое решение мне видится не очень элегантным.

Уважаемые коллеги, если кому-то приходилось решать эту задачу, пожалуйста, подскажите.
Заранее огромное спасибо.

---

← →
Poirot   (2003-07-11 11:37) [1]

Делай не сами классы, а типы указателей на них!

---

← →
Skier   (2003-07-11 11:40) [2]

Издеваетесь Вы что ли ?!
http://delphimaster.net/view/15-1057754132/

---

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

Форум: "Основная";
Текущий архив: 2003.07.24;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.007 c