TDictionary.values as Set added