Модуль: SysUtils

Описание
Функция удаляет пробелы и управляющие символы из начала и конца строки S.

Пример
var    S: string;
   L: Integer;
begin
   S:= #13' УРА! '#13;
   L:= length( S);      // L := 10
   S:= Trim( S);      // S := 'УРА!'
   L:= L-length( S);      // L := 5
   MessageDlg( 'Удалено символов - '+ IntToStr(L), mtInformation, [mbOk], 0);
end;