Class

TUnit = class (TObject)Interface de TUnitExemples de TUnit