- 人气:
- 放大
- 缩小
- 二维码
- 赞赏
delphi TDictionary 泛型如何排序
uses Generics.Collections; {Delphi 2009 新增的泛型容器单元}
var
aa: TDictionary;
arr : TArray;
n : integer;
begin
aa := TDictionary.Create;
try
aa.add(1,11);
aa.add(2,22);
aa.add(3,33);
arr := aa.Keys.ToArray;
TArray.Sort(arr);
for n in arr do
ShowMessage(IntToStr(aa[n]));
finally
aa.Free;
end;