Class

TLot = class (TObject)Interface de TLotExemples de TLot