Функция AnsiStartsStr – возвращает True, если строка начинается с подстроки

Функция AnsiStartsStr в Delphi возвращает True, если строка начинается с подстроки.

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

var
  haystack : AnsiString;
begin
  haystack := 'The cat sat on the mat';

  // Обратите внимание, что AnsiStartsStr чувствительна к регистру
  if AnsiStartsStr('THE cat', haystack)
  then ShowMessage('''THE cat'' начинает предложение')
  else ShowMessage('''THE cat'' не начинает предложение');

  if AnsiStartsStr('The cat', haystack)
  then ShowMessage('''The cat'' начинает предложение')
  else ShowMessage('''The cat'' не начинает предложение');
end;