TStorage.AddChild

function AddChild(storeClass: TStorageClass): TStorage; virtual;