Leere MemoLines herausfiltern

[b0urb0nkid]

Moin Moin,
Ich schreibe gerade an einem Programm, welches mit einer selbsterstellten Config.txt arbeiten soll.
Diese lasse ich auslesen und splitte den Inhalt in verschiedene Memos auf.
Nun sind in den Memos am Ende immer Leerzeichen, welche ich herausfiltern wollte, da ich sonnst beim Einlesen wieder Probleme hab.
Mein Ansatz war:

Delphi-Quellcode:

procedure TFEinstellungen.BSpeichernClick(Sender: TObject);
var
  List: TStrings;
  i : integer;
  k : integer;
begin
  List := TStringList.Create;
  try
    List.Add('#Pfad der Vorlage');
    List.Add(EVor.Text);
    List.Add('#Pfad des neuen Ordners');
    List.Add(ENeu.Text);
    for i := 0 to MAnfangsDatum.Lines.Count-1 do
      if List[i] <> '' then
        List.Add(MAnfangsDatum.Lines[i]);
    for k := 0 to MEndDatum.Lines.Count-1 do
      if List[k] <> '' then
        List.Add(MEndDatum.Lines[k]);
    List.SaveToFile('*Beispielpfad*');
  finally
    List.Free;
  end;
  ShowMessage('Ihre Konfiguration wurde gespiechert.');
  Close;
end;

jedoch sind in der Config.txt trotzif List[i] <> '' then noch Leerzeichen.

Ich hoffe ihr könnt mir helfen
Gruß Hendrik