Aus Textfile in Combobox laden

[s-off]

Hallo,

Deine Combobox ist leer, daher greift ein Zähler darauf nicht.

Delphi-Quellcode:

Procedure TForm1.Button1Click(Sender: TObject);
Var
   i: integer;
   sl: Tstringlist;
Begin
   sl := Tstringlist.create;
   Try
      sl.LoadFromFile('save.txt');
      For i := 0 To sl.Count - 1 Do Begin
         combobox1.Items.Add(sl.Strings[i]);
      End;
   Finally
      FreeAndNil(sl);
   End;
End;