Find(Source: String; SubStr: String;[Start: Integer = 1]): Integer;
Source. Исходная строка;
SubStr. Искомая подстрока;
Start. Номер позиции строки, с которой будет выполняться поиск искомой подстроки.
Метод Find возвращает номер позиции начала искомой подстроки в указанной исходной строке.
Особенности использования метода:
если указанная подстрока в исходной строке не найдена, то метод будет возвращать значение «0»;
поиск искомой подстроки в исходной строке выполняется с учётом регистра;
нумерация символов в строке начинается с единицы.
Sub UserProc;
Var
s1, s2: String;
i: Integer;
Begin
s1 := "Calculator";
s2 := "cul";
// Находим позицию искомой
подстроки в исходной строке
i := String.Find(s1, s2);
Debug.WriteLine("Find(""" + s1 + "; " + s2 + """) = " + i.ToString);
End Sub UserProc;
В результате выполнения примера в окно консоли будет выведена позиция подстроки «cul» в строке «Calculator».
См. также: