delphi - 在 Delphi 中搜索字符串数组

Question

Delphi 标准库中是否有函数可以在字符串数组中搜索特定值？

例如

someArray:=TArray<string>.Create('One','Two','Three');
if ArrayContains(someArray, 'Two') then
    ShowMessage('It contains Two');

Answer 1

完全没有必要重新发明轮子。 StrUtils.MatchStr完成这项工作。

procedure TForm1.FormCreate(Sender: TObject);
var
  someArray: TArray<string>;
begin
  someArray:=TArray<string>.Create('One','Two','Three');
  if MatchStr('Two', someArray) then
    ShowMessage('It contains Two');
end;

注意参数顺序约定。

另一个注意事项:MatchStr 是在 Delphi 7 和 Delphi 2007 之间的某个时间分配给此函数的规范化名称。历史名称是 AnsiMatchStr (约定与RTL 的其余部分:Str/Text 后缀表示区分大小写，Ansi 前缀表示 MBCS/Locale)