【结贴】[请求]请问在D6下如何变相的获取System.Object.GetHashCode？**

s1113

如题。

SMP

GetHashCode,是啥，Delphi中没有这种概念！一般java有，我是当成java对象的唯一标识来理解的，觉得某种程度上跟存储地址一样！

SMP

不过delphi有一个底层与这个名子类似的算法：
function TStringHash.HashOf(const Key: string): Cardinal;
var
  I: Integer;
begin
  Result := 0;
  for I := 1 to Length(Key) do
    Result := ((Result shl 2) or (Result shr (SizeOf(Result) * 8 - 2))) xor
      Ord(Key[I]);
end;

是不是根楼主要的东东一样，就不知道了！但Delphi中一般不会用到这样的概念！这个只能取字符串至于 怎么取对象的就不知道了！

s1113

好的，谢谢！！