Функция AnsiMatchStr – возвращается истина, если строка точно соответствует какой-либо строке из списка

Функция AnsiMatchStr в Delphi возвращает True, если строка точно соответствует какой-либо строке из списка.

Функция AnsiMatchStr: Пример кода

var
  source : AnsiString;
begin
  source := 'Henry';   // Строка для соответствия

  // Обратите внимание, что AnsiMatchStr чувствительна к регистру
  // Мы используем предустановленный массив строк констант
  if AnsiMatchStr(source, ['BRIAN', 'JIM', 'HENRY'])
  then ShowMessage('Первое соответствие успешно найдено')
  else ShowMessage('Первое соответствие не было найдено');

  // Обратите внимание, что массивы начинаются с 0
  if AnsiMatchStr(source, ['Brian', 'Jim', 'Henry'])
  then ShowMessage('Второе соответствие успешно найдено')
  else ShowMessage('Второе соответствие не было найдено');
end;