Модуль: SysUtils

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

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