Delphi7：THashedStringList 详细用法指南

原创

于 2025-08-15 15:26:22 发布 · 555 阅读

10 ·

CC 4.0 BY-SA版权

文章标签：

#Delphi #HashMap #Map #KeyValue #键值对 #词典

THashedStringList 详细用法指南

THashedStringList 是 Delphi 中一个高效的字符串列表类，它通过哈希表实现快速查找功能，特别适合需要频繁查找字符串的场景。下面我将详细介绍其用法、优势和应用场景。

基本介绍

THashedStringList 继承自 TStringList，但添加了基于哈希表的快速查找机制：

type
  THashedStringList = class(TStringList)
  private
    FValueHash: TStringHash; // 哈希表实现
    FValueHashValid: Boolean;
    procedure UpdateValueHash;
  public
    function IndexOf(const S: string): Integer; override;
    function IndexOfName(const Name: string): Integer; override;
    procedure Changed; override;
    destructor Destroy; override;
  end;

核心优势

特性	TStringList	THashedStringList
查找速度	O(n) 线性时间	O(1) 常数时间
内存占用	较低	较高（需额外哈希表）
适用场景	小型列表	大型列表（1000+项）
添加/删除效率	高	添加时需更新哈希表
排序支持	支持	不支持（哈希表限制）

基本用法

1. 创建和初始化

uses
  IniFiles; // THashedStringList 在 IniFiles 单元中

var
  HashedList: THashedStringList;
begin
  // 创建实例
  HashedList := THashedStringList.Create;
  try
    // 添加数据
    HashedList.Add('Name=John');
    HashedList.Add('Age=30');
    HashedList.Add('City=New York');
    
    // 查找示例
    if HashedList.IndexOf('Age=30') >= 0 then
      ShowMessage('Found Age entry');
      
    // 按名称查找
    ShowMessage