本文整理自网络,侵删。
uses Generics.Collections; {Delphi 2009 新增的泛型容器单元}
var aa: TDictionary<integer,integer>; arr : TArray<Integer>; n : integer;begin aa := TDictionary<integer,integer>.Create; try aa.add(1,11); aa.add(2,22); aa.add(3,33);
arr := aa.Keys.ToArray; TArray.Sort<Integer>(arr);
for n in arr do ShowMessage(IntToStr(aa[n])); finally aa.Free; end;
相关阅读 >>
monthoftheyear:取得一个tdatetime变量的月份在年度中的索引
更多相关阅读请进入《Delphi》频道 >>