Hab das jetzt so:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var i: Integer;
begin
List:=TStringList.Create;
List2:=TStringList.Create;
List2.Delimiter:='=';
try
List.LoadFromFile('C:\Datei.txt');
for i := 0 to List.Count-1 do
List2.DelimitedText:=List[i];
ListBox1.Items.Insert(i, List2[1]);
Bekomme aber zwei Fehlermeldungen:
Zitat:
1. FOR-Schleifenvariable 'i' kann nach dem Durchlauf undefiniert sein
2. Zeile kann nicht eingefügt werden