Mid(Source: String, Start: Integer, [Length: Integer = 0]): String;
Source. Исходная строка;
Start. Номер позиции исходной строки, с которой должна начаться возвращаемая подстрока;
Length. Количество символов в возвращаемой подстроке.
Метод Mid возвращает подстроку указанной длины, которая начинается с указанного номера позиции исходной строки.
Нумерация символов в строке начинается с единицы.
Если параметр Length имеет значение «0», то возвращаемая подстрока будет содержать все символы с указанной позиции и до конца исходной строки.
Sub UserProc;
Var
s1, s2: String;
i1, i2: Integer;
Begin
s1 := "Calculator";
i1 := 2;
i2 := 4;
// Получаем строку
s2 := String.Mid(s1, i1, i2);
Debug.WriteLine("Mid(""" + s1 + """" + ", " + i1.ToString + ", " + i2.ToString + ") = " + s2);
End Sub UserProc;
В результате выполнения примера в окно консоли будет выведено четыре символа строки «Calculator», начиная со второго символа.
См. также: