delphi - 帕斯卡理解

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;

我不明白的是这个声明LiProcProd : TListProcProd; 我知道它TListProcProd是一个类，我理解它的其他所有内容，但这部分我也不知道这只是一个类声明，并假设所有类都已正确声明

Answer 1

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

在这个声明中，LiProcProd是一个公共字段。这由文档描述。