解决方法
您需要调用接收类型为TEnumerable< TPair< TKey,TValue>>类型的Collection参数的
dictionary constructor overload.
例如,假设我们有TDictionary< string,Integer>.然后我们可以向构造函数传递一个TEnumerable< TPair< string,Integer>>的实例.这种事的一个例子是TList<TPair<string,Integer>>.
List := TList<TPair<string,Integer>>.Create;
List.Add(TPair<string,Integer>.Create('Foo',42));
List.Add(TPair<string,Integer>.Create('Bar',666));
Dictionary := TDictionary<string,Integer>.Create(List);
这是非常笨拙的,你永远不会喜欢这个选项而不是简单的Create,然后是一系列对Add的调用.如果你碰巧手边有一个现成的集合,你只能使用传入现有集合的选项.
从TEnumerable< T>派生的类的另一个例子.是TDictionary本身：
type TDictionary<TKey,TValue> = class(TEnumerable<TPair<TKey,TValue>>)
因此,如果您已经有一个字典实例,则可以创建另一个实例并使用第一个实例的内容对其进行初始化：
Dict2 := TDictionary<string,Integer>.Create(Dict1);