Arrays zur Laufzeit erzeugen lassen

[MCXSC]

Arrays zur Laufzeit erzeugen lassen

Hallo,

ich habe ein kleines Problem mit Arrays, weiß allerdings nicht, ob es zu lösen ist.

Normalerweise werden Arrays doch fest als Konstante Werte gespeichert

Delphi-Quellcode:

const
BUCHSTABEN: array[0..3] of PWideChar = ('A','B','C','D');

Wie kann ich jedoch Arrays zur Laufzeit erzeugen lassen, indem ich Strings zu einem bereits erstellten Array hinzufüge?

Ein kleines Muster zur Erklärung:

FormCreate (oder FormShow, eigene Funktion, etc.)
|
Füllen der Variable "Var1"
|
Hinzufügen der Variable "Var1"
|
Speichern des aktuelles Arrays

Ich hoffe ihr versteht was ich meine... Habe mich leider noch nicht soweit mit Arrays beschäftigt....

Kann mir einer helfen?

Danke im vorraus,
MCXSC

[jfheins]

Du kannst Arrays auch unter var als Variable deklarieren, und dann verändern ...

[MCXSC]

Und wie mache ich das? Sorry, aber habe mich noch nicht soweit mit Arrays beschäftigt.

ganz normal deklarieren? Aber wie ann ich sie dann verändern?

[Binärbaum]

Man kann anstelle von statischen Arrays auch dynamische Arrays verwenden und deren Länge ändern:

Delphi-Quellcode:

var myArr: array of string;
...

//Länge festlegen und Speicher bereitstellen:
SetLength(myArr, 3);//Array mit 3 Feldern ( [0] bis [2])
myArr[0]:= 'Hallo';
myArr[1]:= 'Guten Morgen';
myArr[2]:= 'Auf Wiedersehen';
//mach irgendwas z.B.:
ShowMessage( myArr[0]);
...
SetLength(myArr, 5);//Array vergrößern
//dabei bleiben bereits vorhandene Werte erhalten
myArr[3]:= 'Irgendein Text';
myArr[4]:= 'Nichts';
ShowMessage( myArr[High(myArr)] );

Dynamische Arrays beginnen immer beim Index 0. Den letzen (=größten) Index erhält man mit der Funktion High. Also läuft z.B. myArr nach dem Aufruf SetLength(myArr, 5); von 0..4 und High(myArr); ergibt demzufolge nach diesem Aufruf 4.

MfG
Binärbaum

[Oxmyx]

Delphi-Quellcode:

var
  EinArray: array[0..2] of Integer;
begin
  EinArray[0] := 17;
  EinArray[1] := 22;
  EinArray[2] := 31;
end;

[MCXSC]

Ja, aer da muss ich die anzahl des arrays ja auch wieder festlegen. Kann ich die variable denn dann auch als globale verwenden?

[Oxmyx]

Wurde doch schon gesagt. Ein Array, bei dem du die Länge erst zur Laufzeit festlegst (dynamisches Array), machst du so:

Delphi-Quellcode:

var
  DynArray: array of Integer;
begin
  SetLength(DynArray, 3);
  DynArray[0] := 17;
  DynArray[1] := 22;
  DynArray[2] := 31;
end;

Eine Variable kannst du immer in ihrem Gültigkeitsbereich verwenden. Es gibt allerdings nur außerordentlich selten einen Grund, ein globales Array zu verwenden.

[Binärbaum]

Zitat von MCXSC:

Ja, aer da muss ich die anzahl des arrays ja auch wieder festlegen. Kann ich die variable denn dann auch als globale verwenden?

Ja, man kann auch dynamischen Arrays als globale Variablen verwenden. Dort darf man allerdings keine Länge festlegen, da man sonst wieder einen statischen Array hat.
Also stattvar MeinArray: array [0..19] of string;//statisch schreibt manvar MeinArray: array of string;//dynamisch und dann später im Quelltext legt man die Länge mitSetlength(MeinArray, 20); fest.

MfG
Binärbaum