aus einer textfile wieder in die edits einlesen!

[Bruce86]

Delphi-Quellcode:

procedure TForm1.LoadClick(Sender: TObject);
var
List: TStrings;
i:integer;
begin
List := TStringList.Create;
try
  List.LoadFromFile('C:\Datei.txt');
  for i := 1 to 34 do
  begin
  with TEdit(FindComponent( 'Edit' + IntToStr( i)) ) do
  begin
  Edit1.Text:=List[0];
  end;
  end;
  finally
  List.Free;
end;
end;

hi leute das ist meine laden prozedur! doch hier lädt er nur in das erste edit! er soll aber in die edits zurück lesen wo ich die daten eingeschrieben habe! Könnt ihr mir bitte weiterhelfen?

denke mal der fehler liegt hier: Edit1.Text:=List[0]; doch wenn ich anstatt der null ne eins setzte bricht er ab und wenn ich es mit TEdit(i) versuche bricht er auch ab!

bitte helft mir

unten ist nen screenshot zu unterstützung meines problems

MFG

Bruce86