hallo,

ich bins nochmal. wie kann ich mein array zur laufzeit erhöhen??? also ich meine die länge. die inhalte, die schon drinn gespeichert sind, soll erhalten bleiben. wie mache ich das

Dynamisches Array:
SetLength(Ar, Length(Ar)+1); Statisches Array: gar nicht.

Und fuers naechste Mal: Bitte suchen

Greetz
alcaeus

Du brauchst dazu ein dynamisches Array:
var IntegerArray: Array of Integer Zu Anfang ist dieses leer und hat die Länge 0, mit Length kannst du die Größe ermitteln, mit SetLength festsetzen. Wichtig: Das Array beginnt immer mit dem Index 0!

markieren

Delphi-Quellcode:

SetLength(IntegerArray,10);
for i:=0 to Length(IntegerArray)-1 do //oder auch High(), also von 0 bis 9
  IntegerArray[i]:=i;
ShowMessage(IntToStr(IntegerArray[Random(10)]));
SetLength(IntegerArray,0);

Wahlweise kann man auch folgendes verwenden:

markieren

Delphi-Quellcode:

var IntArray: Array of Integer
...
SetLength(IntArray,High(IntArray)+2);//Array um ein Element vergrößern

Die Funktion High gibt bei Arrays immer den höchsten Index zurück und bei dynamischen Arrays gilt somit:

markieren

Code:

Length(IntArr) = High(IntArr)+1

MfG
Binärbaum