Textdatei in Liste laden

[Schnittcher]

Hallo,

ich speicher meine Liste so:

Delphi-Quellcode:

procedure TForm1.cmdListSpeichernClick(Sender: TObject);
var
  i: integer;
  pAuto: IAuto;
  myfile: TextFile;
  temp, temp2, temp3: string;
begin
  try
    if AutoList = nil then
      raise
        EBerechnung.Create('Wenn es keine Liste gibt, kann man sie auch nicht speichern.');
    if SaveDialog1.Execute then
      AssignFile(myFile, SaveDialog1.FileName);
    Rewrite(myFile);
    for i := 0 to AutoList.Count - 1 do
    begin
      pAuto := AutoList.Items[i];
      temp := pAuto.ErgebnisName;
      temp2 := FloatToStr(pAuto.ErgebnisKW);
      temp3 := FloatToStr(pAuto.ErgebnisPS);
      WriteLn(myfile, 'Name:    ', temp, 'KW:    ', temp2, 'PS:    ',
        temp3);
    end;
    CloseFile(myFile);
  except
    on E: EBerechnung do
      MessageDlg(E.Message, mtInformation, [mbOK], -1);
  end;
end;

Wie kann ich diese Liste jetzt wieder laden?

Gruß,
Schnittcher