MidStr(Text : String; Start, Count : Integer) : String
Часть строки

Функция MidStr возвращает часть строки Text начиная с символа номером Start длиной N символов. Нумерация символов начинается с 1.

Пример:

Procedure OnCreate;
Var
  S : String;
Begin
  S := MidStr('ABCDE', 2, 3);
  Warning('MidStr(ABCDE, 2, 3) = ' + S); // MidStr(ABCDE, 2, 3) = BCD

  S := MidStr('ABCDE', 2, 6);
  Warning('MidStr(ABCDE, 2, 6) = ' + S); // MidStr(ABCDE, 2, 6) = BCDE
End;

Смотри функции LeftStr и RightStr.

© RTIT