delphi – 在创建示例代码期间填充的TDictionary

例如,假设我们有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);