Dephi泛型generic的应用

Dephi泛型generic的应用

 

泛型在C++, C#中已有广泛应用,Delphi自2009版本也引入泛型,典型的应用如TList,TDictionary。如果你熟悉C#,其用法十分类似。

比如以前Delphi没有integer list,用泛型,我们可以这样声明:

[delphi] view plaincopy在CODE上查看代码片派生到我的代码片
 
  1. var  
  2.   list: TList<Integer>;  
  3. begin  
  4.   list := TList<Integer>.Create;  
  5.   list.Add(1);  
  6.   list.Add(2);  
  7.   list.Add(3);  
  8.   list.Items[2] := 8;  
  9.   list.Free;  
  10. end;  

TDictionary类是一个name,value容器,内部是哈希索引,所以对于数据查找非常高效,如下面的代码:

[delphi] view plaincopy在CODE上查看代码片派生到我的代码片
 
  1. var  
  2.   Dict: TDictionary<stringstring>;  
  3. begin  
  4.   Dict := TDictionary<stringstring>.Create;  
  5.   Dict.Add('key1''value1');  
  6.   Dict.Add('key2''value2');  
  7.   if not Dict.ContainsKey('key3'then  
  8.     Dict.Add('key3','value3');  
  9.   Dict.Free;  
  10. end;  

上面的代码中name和value都是string类型,实际应用中可以用其它的类型比如integer,double之类

因为Object Pascal没有垃圾收集,所以对应的每种泛型类都有一个对应引用类型实现,比如TObjectList,TObjectDictionary,这些类实现中, 当删除元素时会自动帮你释放对象。

上面的TList和TDictionary在Generics.Collections单元,有兴趣可以研究一下代码。除了已有的泛型类之外,你可以编写自己的泛型类,感兴趣的朋友可以google相关文章。 最后不要忘了加上 Uses   Generics.Collections

来源:

http://blog.csdn.net/ppayun/article/details/17628333

原文地址:https://www.cnblogs.com/findumars/p/3496044.html