Модуль: SysUtils

Описание
Функция возвращает указатель на первое вхождение подстроки SubStr в длинную строку S. Если строка не содержит подстроку SubStr, то функция возвращает nil. Данная функция в отличие от функции StrPos, поддерживает многобайтовые наборы символов (MBCS).

Пример
var
   S1,S2: Pchar;
begin
   S1:= 'Баба с возу - и волки сыты!';
   S2:= AnsiStrPos(S1,'волки');     // S2 :='волки сыты!'
   MessageDlg( S2, mtInformation, [mbOk], 0);
end;