Стандартные функции и процедуры для строк

Функции и процедуры

Значение функции или результат вызова процедуры

function Concat(S1, S2 [,...,Sn]):string

Возвращает строку, полученную конкатенацией строк S1, S2, ... , Sn.

Равносильно выражению S1+ S2 + ... +Sn

function Copy(S,i,cnt):string

Возвращает подстроку строки S, начиная с позиции i, и состоящую из cnt символов , .

Например, S:=’Pascal’; Функция Copy(S,1,3) выдает строку 'Pas'.

Если i больше, чем длина S, функция возвращает пустую строку.

function Length(S):integer

Возвращает текущую длину строки S.

Например, S:=’Pascal’; Функция Length(S) выдает значение 6

Procedure SetLength(S,new)

Устанавливает длину, равную new, строки S (для строк типа ShortString это равносильно S[0]:=Chr(new)).

Если новая длина меньше текущей, то строка отсекается. Если больше, то добавленная часть строки (в некоторых системах программирования) инициализируется пробелами.

function Pos(subs,S):integer

Находит первое вхождение подстроки subs в строку S, возвращая номер позиции, где находится первый символ подстроки.

Если подстрока не найдена, функция возвращает 0.

Например, S:=’Pascal’. Функция Pos(‘a’, S) выдает значение 2

procedure Delete(S,i,cnt)

Удаляет из строки S, начиная с позиции i, подстроку из cnt символов. Здесь S – только строковая переменная, не константа.

Например, S:=’Pascal’; Процедура Delete(S,4,3) возвратит строку S=’Pas’, удалив 3 символа, начиная со 4-го.

Если i больше длины строки S, символы не удаляются.

Если количество удаляемых символовДля удаления «хвоста» строки указать позицию i первого его символа, а в качестве длины «хвоста» достаточно указать длину исходной строки, не подсчитывая длину «хвоста». Например, S:=’Object Pascal’; Процедура Delete(S,4,Length(S)) возвратит строку S=’Obj’, удалив 3 символа, начиная со 4-го.

procedure Insert(subs,S,i)

Вставляет подстроку subs в строку S, начиная с позиции i. Здесь subs – любое строковое выражение, S – строковая переменная.

Например, S:=’ac’; subs:='bbb'; Процедура Insert(subs,S,2) возвратит строку S=’abbbc’,

вставив подстроку 'bbb' в строку’ac’, начиная с позиции номер 2.

Полученная строка при необходимости усекается до объявленной длины переменной S.

Procedure Str(x[:width[:dec]],S)

Преобразует число x любого вещественного или целого типа в строковый формат (аналогично процедуре write).

Здесь x – любое числовое выражение, S – строковая переменная, width – общее количество знаков в числе x, dec – количество знаков после точки (указывается только для вещественных).

Например, x:=123.45; str(x:8:3,S); – строка-переменная S получит значение ' 123.450'

Procedure Val(S, x, code)

Преобразует строку символов S во внутреннее представление целого или вещественного x.

Здесь S – строковое выражение, x – числовая переменная, в которую помещается результат.

Целочисленная переменная code на выходе содержит либо 0 (если преобразование успешно),

либо номер позиции в строке S, начиная с которой произошла ошибка преобразования.

Например, S:=’123,45’; val(S,x,code) – Преобразование не произойдет. Параметр code получит значение 4, т.к. 4-ый символ – запятая, а не точка.