假设哈希函数的值空间是100。共有四台服务器，其哈希值分别为20，40，60，80，组成一个哈希环

其他回答

RTest = record　　Key:Integer;　　Name:String[20];　　Sex:Boolean;　　Age:Integer;　　end;　　PTest = ^RTest ;　　1：创建Hash表.　　ScHash:=THashedStringlist.Create;　　2：将数据结构加入Hash表中.　　var　　Index:Integer;　　p_Test:PTest;　　Index:=ScHash.IndexOf(IntToStr(p_Test.Key));　　if Index=-1 then　　begin　　ScHash.AddObject(IntToStr(p_Test.Key),TObject(Integer(p_Test)));　　end;[/td][/tr][/table]　　在加入Hash表的时候，首先我们检查看这个Key是否在Hash表中，如果Index=-1则说明此Key不在Hash表中，则我们将这个结构指针加入到Hash表中.　　3：将数据结构从Hash表中删除.[table=95%][tr][td][b]以下是引用片段：[/b]　　var　　Index:Integer;　　t_Object: TObject;　　Index:=ScHash.IndexOf(IntToStr(p_Test.Key));　　if Index<>-1 then　　begin　　t_Object:=ScHash.Objects[Index];　　ScHash.Delete(Index);　　end;[/td][/tr][/table]　　4：删除Hash表　　在删除Hash表的时候和一般的Tlist删除一样，使用Free.