Delphi-Help

Описание

Функция AnsiPos ищет подстроку Needle в строке HayStack, возвращая позицию в строке первого вхождения.
Весь Ansi команды поддерживают многобайтовые символы и символы с диакритическим знаком.
Если строка не найдена, то возвращается 0.
Поиск чувствителен к регистру.

Пример кода

var
position : Integer;

begin
// Поиск слово 'Cat' в предложении
// Обратите внимание: что этот поиск чувствителен к регистру, так, что
//                    первое 'cat' не рассматривается
position := AnsiPos('Cat', 'The cat sat on the Cat mat');
if position = 0
then ShowMessage('''Cat'' не найдено в предложении')
else ShowMessage('''Cat'' было найдено начиная с символа '+IntToStr(position));
end;

'Cat' было найдено начиная с символа 20

Примечание

Обратите внимание, что строки начинаются с позиции равной 1.
Многобайтовые наборы символов, определенные операционной системой. Например, Восточные версии Windows используют многобайтовые символы для поддержания их очень большого набора символов.