如何在 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.

Answer 1

如果你对你自己的代码内注册类，你可以先注册TCollectionItem没有property Collection: TCollection ，然后注册TCollection与property Items [Index: Integer]: TCollectionItem事后添加的property Collection: TCollection您TCollectionItem 。

Answer 2

You can use:

type
  TCollection = class;

  TCollectionItem = class
  published
    property Items: TCollection;
  end;

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