Migrated to TObjectIntMap