TCnHashTable 怎么遍历

for I := 0 to TList.Count -1 do
  begin
    Obj:=TObject(TList[I]);
    Obj.Free;
  end;

TCnHashTable ???

有个函数
GetKeys
难道要 GetValues(GetKeys(I)) ???
感觉饶圈了啊
有Index 还要 Key....

UP

TCnHashTable目前确实未提供直接遍历的方式，暂时只能用GetValues(GetKeys(I))。
TCnHashMap提供了StartEnum以及GetNext的遍历方式，目前可以使用。

谢谢 大大的回复
自己加还有点麻烦.
代码还没看完.
尝试中...