Einzelnen Beitrag anzeigen

Benutzerbild von Binärbaum
Binärbaum

Registriert seit: 19. Jan 2005
Ort: Elstra
764 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: Arrays zur Laufzeit erzeugen lassen

  Alt 27. Feb 2005, 23:12
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 Delphi-Referenz durchsuchenHigh. 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
There are exactly 10 kinds of people: those who understand binary, and those who don't.
---
"Software reift beim Kunden. Bei Hardware ist es anders: Hardware fault beim Kunden." - Rainer G. Spallek
  Mit Zitat antworten Zitat