Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Объект экрана — Screen
   Категория: Компоненты
  Подсветить часть текста в DBGrid
   Категория: Компоненты
  Получить версию программы VersionInfo
   Категория: Приложение
  Замена подстроки в строке
   Категория: Текст и строки
  Создание ярлыка на Рабочем столе
   Категория: Приложение
  Переключение раскладки клавиатуры
   Категория: Приложение
  Сохраняем Bitmap в поле dbase
   Категория: Базы данных
  Cколько файлов есть в определённой папке
   Категория: Файловая система
  Упаковать *.mdb-файл
   Категория: Базы данных

Delphi - Справочник: AnsiIndexStr

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 AnsiIndexStr
function AnsiIndexStr ( const Source : string; const StringList : array of string ) : Integer;
Функция (Unit StrUtils)
Сравнивает строку со списком строк, возвращает соответствующий индекс
Описание:
Функция AnsiIndexStr выясняет, соответствует ли точно любая из строк StringList строке Source.

Когда соответствие найдено, возвращается индекс 1. Иначе, возвращается -1.

Список строк может быть определен как список взятый в квадратные скобки, как в примере, или как массив строк.

Это команда чувствительна к регистру.
Пример кода: Простой пример

var source : AnsiString; position : Integer; begin source := 'Henry'; // Строка для соответствия // Обратите внимание, что AnsiIndexStr чувствительна к регистру // Мы используем жестко установленный постоянный строковый массив position := AnsiIndexStr(source, ['BRIAN', 'JIM', 'HENRY']); ShowMessageFmt('Индекс первого соответствия = %d',[position]); // Обратите внимание, что массивы начинаются с 0 position := AnsiIndexStr(source, ['Brian', 'Jim', 'Henry']); ShowMessageFmt('Индекс второго соответствия = %d',[position]); end;

Результат:
Индекс первого соответствия = -1
Индекс второго соответствия = 2

  << Вернуться