Методы класса string

const net='NET';
 
var s: string := '  Pascal__NET  ';
 
begin
  writelnFormat('Исходная строка: '' {0} '', ее длина - {1}',s,s.Length);
  s := s.Trim;
  writeln('После вызова s.Trim: ''',s,'''');
  var p := s.IndexOf(net); // Индексация - с нуля
  writelnFormat('Позиция подстроки ''{0}'' в строке ''{1}'' равна {2}',net,s,p);
  s := s.Remove(6,2);
  writeln('После удаления символов __: ',s);
  s := s.Insert(6,' ABC.');
  writeln('После вставки подстроки ''ABC.'': ',s);
  var a := s.Split(' ','.');
  System.Array.Reverse(a);  
  s := string.Join(',',a);
  writeln(s);
end.