Array der "automatisk" vokser?

Nej, Men når du tilføjer kan du skrive


  SetLength(MyArray,Length(MyArray)+1);
  MyArray[High] := 123;
  ...

Jep, men afvilkingen af programmet tager mange hundrede gange så lang tid, når man gør det ... At indlæse en 100000 elementer tager adskillige minutter i stedet for ganske få millisekunder.

Men det kan godt være at jeg ender med at forøge arrayet med fx 1000 elementer hver gang man er ved at "nærme sig" grænsen. Er dette en dårlig ide?

Nej, det er den rigtige måde at gøre det på. Kræver en smule mere kode

OK, tak for hjælpen

Brug en Tlist istedet for et array !

Du skal allokere plads til fx 100 ad gangen istedet for en ad gangen.
Fx:
var
  a: array of integer;
  ix: integer;
  alloc: integer;

procedure add(x: integer);
begin
  inc(ix);
  if ix>alloc then begin
    inc(alloc,100);
    setlength(a,alloc);
  end;
  a[ix-1]:=x;
end; //add

begin
  alloc:=0;
  ix:=0;
  //assign + reset
  repeat
      readln(txt-fil,s); //s: string
      add(strToInt(s));
  until eof(txt-fil);
  //close
end.

Nå ja men jeg kunne osse lige læse alle svar

Jeg mener nu stadig at en Liste er det mest rigtige ...
Jens b

Ja, en liste er garanteret det mest rigtige. Tak for svarene alle sammen!