Delphi:TStringList.Contains？

Question

Delphi 2007中有没有集成的解决方案来检查TStringList是否包含某个值的一部分？

例如:

List.AddObject('This is a string', customStringObject1); 
List.AddObject('This is a mushroom', customStringObject2); 
List.AddObject('Random stuff', customStringObject3); 

搜索“This is a”应该给我“true”，因为前两个元素部分包含这个。

到目前为止我知道的唯一方法是TStringList.find(string,integer)，但这会执行完整的字符串比较，即仅搜索This is a string 将返回 true。

有什么建议吗？

Answer 1

未集成，但您可以在 Text 属性上使用 Pos 函数:

Pos('This is a', List.Text)

如果您希望将其集成，您可以为 TStrings 创建一个类帮助器。