How registrate two class with circular references in DWScript?

Question

I need to register TCollection and TCollectionItem classes, but because of the properties of

{TCollection}
property Items [Index: Integer]: TCollectionItem
{TCollectionItem}
property Collection: TCollection

сonstantly raises the exception of the impossibility to find TCollectionItem/TCollectionItem type.

Do you use the auto RTTI register class or do you register the class on you own? — DragonFlyOfGold, Sep 23 '16 at 10:48

score 0 · Answer 1 · answered Sep 23 '16 at 10:53

0

If you register the class on you own within code, you could first register the TCollectionItem without the property Collection: TCollection, then register TCollection with property Items [Index: Integer]: TCollectionItem and afterwards adding the property Collection: TCollection to your TCollectionItem.

answered Sep 23 '16 at 10:53

DragonFlyOfGold

83
2
7

But exception is raised in DoGenerate procedure when code compiling. How I can register property Collection: TCollection before TCollection class registration??? – Alexey Ignatenko Sep 23 '16 at 11:29

score 0 · Answer 2 · answered Sep 11 '20 at 20:06

0

You can use:

type
  TCollection = class;

  TCollectionItem = class
  published
    property Items: TCollection;
  end;

  TCollection = class
  published
    property Items [Index: Integer]: TCollectionItem;
  end;

answered Sep 11 '20 at 20:06

Toky Olivier Razanakotonarivo

13
2

How registrate two class with circular references in DWScript?

2 Answers2