Bestimmtes Format aus Memo auslesen

[Testy]

Ich bin's nochmal! Habe noch ein Problem! Mein Quelltext sieht jetzt wie folgt aus:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
  l: TStringList;
  r: TRegExpr;
begin
  l := TStringList.Create;
  r := TRegExpr.Create;
  try
    l.LoadFromFile('deine.html');
    r.Expression := '[0-9]{2}:[0-9]{2}:[0-9]{2}';
    if r.Exec(l.Text) then
    repeat
      listbox1.items.Add(r.Match[0]);
    until not r.ExecNext;
  finally
    r.Free;
    l.Free;
  end;
end;

Funktioniert auch alles! Nun möchte ich statt 'deine.html' den vorhanden Quelltext aus meinem Memo1 nehmen!
l.LoadFromFile(memo1.lines); Funktioniert so aber nicht!