为什么THashedStringList不会忽略重复？

Question

我有以下代码：

var
  sl: THashedStringList;
begin
  sl:= THashedStringList.Create;
  sl.Duplicates := dupIgnore;
  sl.Add('12345');
  sl.Add('12345');
  sl.Add('12345');
  sl.Add('12345');
  sl.Add('12345');
  sl.Add('12345');
  sl.Add('12345');
  ShowMessage(IntToSTr(sl.Count));
end;

但是当我看到sl.Count时，它给了我7.这是什么错误？

Answer 1

您需要将Sorted属性设置为TRUE才能使列表忽略重复项。该属性继承自TStringList，如果查看TStringList.Duplicates的文档，您会发现：

  

注意：如果未对列表进行排序，则重复项不会执行任何操作。