INI laden funzt nicht

[Dax]

Noch eine Idde:

Delphi-Quellcode:

var a: integer;
i: TIniFile;
begin
  i := TIniFile.Create((ExtractFilePath(ParamStr(0))+'Einstellungen.ini'));
  for a := 1 to 97 do
    begin
      with  i do
        begin
          (findcomponent('form2.edit' + inttostr(a)) as tedit).Text := readstring ('Daten','Feld'+
           inttostr (a),'');
        end;
    end;
  i.free;
end;