Delphi中Hash表的使用方法
2010-10-08 13:08
363 查看
版权声明:原创作品,允许转载,转载时请务必以超链接形式标明文章 原始出处 、作者信息和本声明。否则将追究法律责任。/article/4473818.html |
在游戏开发中经常需要保存一些数据结构,并且在使用的时候需要快速的查找出来.Hash表正是为了提高检索速度而设计出来的.下面我就将我在用Delphi开发中使用Hash表的方法写出来,希望对大家有一定的帮助! 在Delphi中有一个THashedStringlist类,使用这个类可以实现Hash表的操作.使用这个类需要引用IniFiles头文件. 例如:我们定义的数据结构是: 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; 在加入Hash表的时候,首先我们检查看这个Key是否在Hash表中,如果Index=-1则说明此Key不在Hash表中,则我们将这个结构指针加入到Hash表中. 3:将数据结构从Hash表中删除. 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; 4:删除Hash表 在删除Hash表的时候和一般的Tlist删除一样,使用Free. ScHash.Free; 以上就是简单的Hash表操作步骤,其中需要注意的是,在使用DELPHI7的使用hash表的时候,一定要安装补丁. |
相关文章推荐
- Delphi中Hash表的使用方法! 推荐
- Delphi中Hash表的使用方法
- Delphi中Hash表的使用方法
- Delphi中Hash表的使用方法(THashedStringlist)
- Delphi中Hash表的使用方法(THashedStringlist)
- Delphi 中使用 ADO 方法打开 MySQL5.0 数据库并避免汉字乱码
- [转]delphi建议使用的一些方法
- Delphi中的GetEnumName和GetEnumValue的使用方法
- 问题-Delphi在多线程中使用其他窗体上的控件,报“尚未调用CoInitialize”解决方法
- delphi 2010 fastMM 内存泄露使用方法
- 关于Delphi中预编译指令的使用方法
- 关于Delphi中预编译指令的使用方法
- delphi 的EditMask使用方法
- Delphi+MySQL:TADOQuery使用插入中文乱码解决方法
- 在Delphi中使用CreateOleObject方法对WORD文件进行操作
- Delphi使用大图标编译程序的方法
- Delphi匿名方法(二):使用本地变量
- DELPHI中使用DLL的方法以及INSTALLSHIELD中使用DLL方法
- Delphi 模式窗体返回值ModalResult的使用方法及注意事项
- DELPHI第三方控件及组件大全(安装方法与使用)