在字符串数组中查找字符串

在字符串数组中查找字符串

uses StrUtils;

const
  arr: array[0..3] of string = ('a', 'b', 'c', 'd');
var
  s: AnsiString;
  b: Boolean;
begin
  s := 'C';

  b := AnsiMatchStr(s,arr);   {区分大小写}
  ShowMessage(BoolToStr(b));  {False}

  b := AnsiMatchText(s,arr);  {不区分大小写}
  ShowMessage(BoolToStr(b));  {True}
end;