How to define a Type A in Type B and Type B in Type A?

Question

I have two types. One Type A and one Type B. The Problem Type A contains Type B and Type B contains Type A. Such a thing like this won\'t work:

  type
    ty         


        

Answer 1

Perhaps the best solution is to rethink the design. But you might also be interested in so-called forward declarations of classes:

type
  TTypeB = class;

  TTypeA = class
    test: TTypeB;
  end;

  TTypeB = class
    test: TTypeA;
  end;      

SIC! This only works for classes, not records.