Delphi Написать программу, которая удаляет начальные пробелы из введенной с клавиатуры строки.

[Xetag]

Привет всем, можете помочь написать программу:
Написать программу, которая удаляет начальные пробелы из введенной с клавиатуры строки.

[Stilet]

Собственно для этого есть функция TrimLeft, которая в генофонде выглядит так:

function TrimLeft(const S: string): string;
var
  I, L: Integer;
begin
  L := Length(S);
  I := 1;
  while (I <= L) and (S[I] <= ' ') do Inc(I);
  Result := Copy(S, I, Maxint);
end;

[Xetag]

Можешь попонятнее обьяснить, а то в интернете тоже не совсем понятные примеры.
Я например записываю в переменную а предложение, как дальше написать чтобы программа удаляла пробелы?