TObjectRange::TObjectRange