Порядок классов

[Celestia]

Здравствуйте!
Помогите пожалуйста решить такую проблему:

есть два класса:

TGUIItem = class(TObject)
private
  Childrens: TGUIChildrensList;
....
end;

//////////////-----------------------------------------------------
// класс рендер листа дочерних обьектов GUI
TGUIChildrensList = class( TList )
 public
  function GetItem( AIndex : integer ) : TGUIItem;
  constructor Create;
  destructor  Destroy; override;
  function    Add( AMyObject : TGUIItem ) : integer;
  function    IndexOf( AMyObject : TGUIItem ) : integer;
  procedure   Clear;
  procedure   Insert( AIndex : integer; AMyObject : TGUIItem );
  procedure   Delete( AIndex : integer );
  procedure   Remove( AMyObject : TGUIItem );
  property    Items[ AIndex : integer ] : TGUIItem read GetItem;
end;

Нужно каким то образом сделать так чтобы TGUIItem "видел" TGUIChildrensList. Вариант с использованием стороннего юнита в который бы можно было бы вынести что то не подойдёт.

[Аватар]

Или при создании TGUIItem передавайте параметр типа TGUIChildrensList, или свойство типа TGUIChildrensList сделайте, а перед объявлением TGUIItem добавьте строку
TGUIChildrensList = class;

[Celestia]

Спасибо, всё получилось