Delphi 帕斯卡理解
所以假设这段代码有效Delphi 帕斯卡理解,delphi,freepascal,Delphi,Freepascal,所以假设这段代码有效 {***Start declaration of TMakeProd ***} TListMakeProd = class (TListNF) procedure SortProcProdSeqNum; procedure LoadFromRep(aFileRep, aNo : String); function Find(aMakeProdID : Integer) : TMakeProd; function FindObj(aMakeProd : TM
{***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
是一个类,其他我都理解,但这部分我也不知道,这只是一个类声明,假设所有类都已正确声明
type
TMakeProd = class(TProduct)
....
LiProcProd : TListProcProd;
....
end;
在此声明中,LiProcProd
是一个公共字段。这是由。描述的,它只是一个公共财产,需要理解什么?@et1975公共领域,对吗?不是属性,因为它没有读/写限定符,属性
关键字,以及一个备份它的字段(显然,除了它本身),我不知道我不了解的pascal,这是类类型x的变量声明)谢谢