Функция AnsiPos ( const Substr, S: string ): Integer;
Модуль: SysUtils
Описание
Функция возвращает позицию подстроки Substr внутри строки S. Если строка S не содержит указанную подстроку, то функция возвращает 0. Данная функция поддерживает многобайтовые наборы символов (MBCS).
Пример var
Substr, S: string;
I: Integer; begin
S:= 'Исходная строка';
Substr:= 'ход';
I:= AnsiPos(Substr, S); // I:= 3
... end;