泛型在C++, C#中已有广泛应用,Delphi自2009版本也引入泛型,典型的应用如TList,TDictionary。如果你熟悉C#,其用法十分类似。
上面的代码中name和value都是string类型,实际应用中可以用其它的类型比如integer,double之类
因为Object Pascal没有垃圾收集,所以对应的每种泛型类都有一个对应引用类型实现,比如TObjectList,TObjectDictionary,这些类实现中, 当删除元素时会自动帮你释放对象。
上面的TList和TDictionary在Generics.Collections单元,有兴趣可以研究一下代码。除了已有的泛型类之外,你可以编写自己的泛型类,感兴趣的朋友可以google相关文章。
比如以前Delphi没有integer list,用泛型,我们可以这样声明:
var
list: TList<Integer>;
begin
list := TList<Integer>.Create;
list.Add(1);
list.Add(2);
list.Add(3);
list.Items[2] := 8;
list.Free;
end;
var
Dict: TDictionary<string, string>;
begin
Dict := TDictionary<string, string>.Create;
Dict.Add('key1', 'value1');
Dict.Add('key2', 'value2');
if not Dict.ContainsKey('key3') then
Dict.Add('key3','value3');
Dict.Free;
end;
上面的代码中name和value都是string类型,实际应用中可以用其它的类型比如integer,double之类
因为Object Pascal没有垃圾收集,所以对应的每种泛型类都有一个对应引用类型实现,比如TObjectList,TObjectDictionary,这些类实现中, 当删除元素时会自动帮你释放对象。
上面的TList和TDictionary在Generics.Collections单元,有兴趣可以研究一下代码。除了已有的泛型类之外,你可以编写自己的泛型类,感兴趣的朋友可以google相关文章。