Problem mit SetLength

[Airblader]

Hi.
Mal was ganz banales (für mich und einen Freund).

Folgendes:
Ich hab 2 Arrays in die ich Daten einlese.
Zwischen die Daten muss nun etwas neues kommen.
Dazu muss ich ja das Array um 1 verlängern.

Delphi-Quellcode:

old_n: array [0..9] of string;
old_p: array [0..9] of string;

[...]

SetLength(old_n, Length(old_n)+1);
SetLength(old_p, Length(old_p)+1);

Allerdings bekomme ich für beide Zeilen:

Zitat:

Inkompatible Typen

Kann mich einer aufklären? Entweder ist es so kompliziert (eher nicht) oder ich hab Tomaten auf den Augen

[Sharky]

Hai Airblader,
ein Array mit fester Größe kannst Du nicht verändern. Schau dir mal die Dynamischen Array an.

[Matze]

Du musst diese array dynamisch deklarieren sprich:

Delphi-Quellcode:

old_n: array of string;
old_p: array of string;

Dann zu beginn die Anfangslänge mit SetLength festlegen, diese lässt sich auch später ohne weiteres verändern.

[Nikolas]

Es sind die Tomaten:
Mit old_n: array [0..9] of string; nimmst du dir ein statisches Array. Dessen Länge kannsrt du nicht mehr verändern.
Per old_n: array of string kannst du dir ein dynamsches nehmen, dessen Länge du dann verändern kannst. Bevor du das erste Mal da was reinschreibst, musst du aber mindestens einmal das setlength aufgerufen haben, denn sonst schreibst du ins Nirgendwo und bekommst eine AV.

[Chewie]

SetLength funktioniert nur bei dynamischen Arrays, nicht bei statischen (du hast ein statisches deklariert). Dynamisch Arrays haben bei der Deklaration keine Bereichsangabe.

[alcaeus]

Hi Airblader,

du kannst nur dynamische Arrays vergrößern oder verkleinern.
Du musst also old_n und old_p als array of string deklarieren, und im OnCreate folgendes schreiben:

Delphi-Quellcode:

SetLength(old_n, 10);
SetLength(old_p, 10);

damit haben die arrays wieder eine Länge von 10 Elementen, und das vergrößern wird auch klappen.

Greetz
alcaeus

[add] das ich langsam bin wusste ich, aber SO langsam [/add]

[Airblader]

Für eine Antwort hau ich 10 mal den Kopf gegen Wand, bei den 4 Antworten wird es 40 mal

Danke

Ich hau nun erstmal die Wand klein und dann änder ich das

[ibp]

cool 4 antworten zur gleichen zeit!