dynamischen Array laden

[ibp]

Delphi-Quellcode:

procedure TFStartseite.LadenClick(Sender: TObject);
var
  i, j: integer;
  slDaten: TStringList;

begin
  slDaten := TStringList.Create;
  slDaten.LoadFromFile('termine');
  for i := 0 to slDaten.count-1 do   <-- hier ist die lösung!!!!
  begin
    for j := 0 to 132 do
    begin
      Oberarray[i, j] :=slDaten[i];
    end;
  end;
  slDaten.Free;
end;