Länge eines 2 dim. Arrays ändern?

[toyohj60]

Hallo,

wie kann ich bei einem 2 dimensionalen Array die Größe ändern (Anzahl der Zeilen erhöhen)?
Das Array ist ursprünglich so angelegt:

Delphi-Quellcode:

            
.
.
var
  RGArray     : Array of Array of String; 

begin
.
.
Setlength(RGArray,1,23);
.
.
end;

tschüß, Steffen

[Matze]

Hallo Steffen,

ich denke, das funktioniert wie bei eindimensionalen Arrays: Einfach erneut Setlength mit der neuen Feldgröße aufrufen.

Grüße

[himitsu]

SetLength arbeitet nur mit jeweils einer Array-Ebene

Delphi-Quellcode:

// 2. Ebene setzen, z.B. für das 2. Feld der 1. Ebene
Setlength(RGArray[1], 23);

// Erste Ebene setzen
Setlength(RGArray,1);

// bei Array of Array of Array ... usw.
Setlength(RGArray[i][j], x);
Setlength(RGArray[i, j], x);

[Matze]

Zitat:

Zitat von himitsu

SetLength arbeitet nur mit jeweils einer Array-Ebene

Jain. Ich zitiere aus der OH:

Zitat:

Mehrdimensionale dynamische Arrays

Zur Deklaration von mehrdimensionalen dynamischen Arrays verwenden Sie aufeinander folgende array of ...-Konstruktionen. Zum Beispiel:

Delphi-Quellcode:

type TMessageGrid = array of array of string;
var Msgs: TMessageGrid;

Hier wird ein zweidimensionales String-Array deklariert. Um dieses Array zu instantiieren, rufen Sie SetLength mit zwei Integer-Argumenten auf. Wenn beispielsweise I und J Integer-Variablen sind, wird Speicherplatz für ein I mal J großes Array zugewiesen:

Delphi-Quellcode:

SetLength(Msgs,I,J);

Bei der Funktionsbeschreibung von System.SetLength steht allerdings nur ein Integer-Parameter. Vielleicht gibt's in einer anderen Unit eine überladene Funktion.

Edit: Delphi schlägt mir auch nur einen Integer-Parameter vor und verlinkt zur Unit "System". Ich verstehe es auch nicht, aber es geht auf jedenfall. *g*

[toyohj60]

Hallo,

ja, das mit setlength klappt soweit, nun muß ich aber noch feststellen,
wie groß "I" ist, um "I" um 1 erhöhen zu können.

Delphi-Quellcode:

SetLength(Msgs,I,J);

tschüß, Steffen

[Matze]

Das kannst du so machen:

Delphi-Quellcode:

SetLength(Msgs, High(Msgs) + 1, J);

[DeddyH]

Das müsste doch auch mit Length(msgs) zu erfragen sein, oder nicht?

[Dax]

Jup, denn High(X)+1 = Length(X) für dynamische Arrays.

[DeddyH]

Meine ich doch, dann ist Matzes Code sogar falsch, das müsste + 2 heißen ;)

[toyohj60]

Hallo,

danke mit Length(x) funktioniert das endlich!! Da schweigt die OH aber total, dass das mit High(x) nicht finktioniert

tschüß, Steffen