Pascal理解

Question

因此，假设这段代码可以工作。

{***Start declaration of TMakeProd ***}

TListMakeProd = class (TListNF)
  procedure SortProcProdSeqNum;
  procedure LoadFromRep(aFileRep, aNo : String);
  function Find(aMakeProdID : Integer) : TMakeProd;
  function FindObj(aMakeProd : TMakeProd) : TMakeProd;
end;

TMakeProd = class (TProduct)
private
  FMakeProductID : Integer;
  FProdLotSize : Longint;

public
  LiProcProd : TListProcProd;
            {Load from a database.}
 { procedure SortLiProcProdSeqNum;   }
  constructor Init(aMakeProductID: Integer; aProdLotSize: Longint);
  destructor Done; override;
  destructor Destroy;  override;
  property MakeProductID : Integer read FMakeProductID write FMakeProductID ;
  property ProdLotSize : Longint read FProdLotSize write FProdLotSize ;
  function findNextProcProd(aProcProd: TProcProd) : TProcProd;

{ create function with return if required. }
end;

我不理解的是这个声明，我知道TListProcProd是一个类，其他的我都理解，但是这部分我不理解，这只是一个类声明，假设所有的类都被正确地声明了

Answer 1

type
  TMakeProd = class(TProduct)
  ....
    LiProcProd : TListProcProd;
  ....
  end;

在此声明中，LiProcProd是一个公共字段。这是由documentation描述的。