Array vergrößern. [ERLEDIGT]

[Manfred]

Hm,

jetzt stehe ich hier doch wie ein Depp. Wie kann ich denn ein Array erweitern, wenn ich weiß wieviel Elemente ich haben muß? Also sowas hier

Code: Alles auswählen

aArray := {"1","1","1","1","1","1","1","1","1","1","1","1","1","1","1"}

jetzt muß ein weiterer "Satz" dran, der aber eigentlich nur das erste Element beinhaltet, aber den Rest mit "" gefüllt haben muß, damit ich die später mit Werten füllen kann. Also sowas hier.

Code: Alles auswählen

aadd(aArray,{"wert","","","","","","","","","","","","","",""})

Nur, wieviel "" rein müssen, weiß ich erst, nachdem das obere erstellt wurde und würde es dann mit Len(aArray[1]) erfragen.

[Jan]

Hä?

Jan

[Manfred]

ja, das dachte ich mir schon.

aber wie soll ich es erklären?

der erste Schritt ist klar? Bestimmt.

dann muß da folgendes dran.

Code: Alles auswählen

aadd(array,{"Wert"})

es müßte aber so lang werden wie der erste Eintrag. Ich habe nur zu dem Zeitpunkt die Daten dafür nicht da, also müßte ich NIL oder was leeres anhängen. Aber wie macht man das?
Wenn man ein Array direkt anlegt dann kann man das ja so machen

Code: Alles auswählen

array := Array(12)

aber wie macht man das, wenn man den ersten Wert kennt und dann nur 11 dran hängen muß.

[Martin Altmann]

Schau Dir mal AFill() an.

Viele Grüße,
Martin

[Jan]

Alternativ in mehreren Schritten:

Code: Alles auswählen

AAdd(aArray, {"wert"})
FOR i := 2 to Len(aArray[1]
    AAdd(aArray[Len(aArray)], "")
NEXT

Jan

[Manfred]

das ist es auch nicht.

also nochmal anders erklärt.

ich habe nur einen Wert, müßte aber den Rest dahinter mit Dummys belegen, damit diese im nächsten Schritt gesetzt werden können.

Ich könnte natürlich auch so machen

Code: Alles auswählen

array := {}
         aadd(array,{"Wert"})

und dann

Code: Alles auswählen

for i := 1 TO 10
     aadd(array,{""})
next

OOps, Jan war schneller. Genau das wollte ich nicht, bzw. wollte wissen ob es nicht einfacher geht.
aber das ist ja nicht das Dingen. Es muß ja anders gehen, oder nicht?

[Martin Altmann]

Klar ist es das.
Mach erst das AFill() und danach setzt Du den ersten Wert auf das gewünschte.

Viele Grüße,
Martin

[Manfred]

ich habe es mit Afill versucht, aber wenn nichts außer dem ersten Wert drin ist, passiert nichts.

[UliTs]

ich habe es mit Afill versucht, aber wenn nichts außer dem ersten Wert drin ist, passiert nichts.

Wie wäre es mit

Code: Alles auswählen

aFeld := array(10)
aFill( aFeld,"" )[1] := "Ich bin toll!"

Das Ergebnis müßte

Code: Alles auswählen

{"Ich bin toll!","","","","","","","","",""}

sein

Uli

EDIT: sogar getestet

[Martin Altmann]

Manfred,
verstehe ich nicht. Abgesehen davon, dass Deine Array-Definition am Anfang falsch ist müsste das doch so gehen:

Code: Alles auswählen

aArray := { {"1","1","1","1","1","1","1","1","1","1","1","1","1","1","1"} }
aAdd( aArray, Array( len( aArray[ 1 ] ) )
aFill( aArray[ len( aArray ) ], "", 2 )
aArray[ len( aArray ), 1 ] := "wert"

Viele Grüße,
Martin

[Manfred]

OK Martin,

ich habe das gestern Abend mal eben so hingeschrieben um zu erklären, was ich brauche.

[brandelh]

Hallo Manfred,

deine Beschreibung ist aber nicht gerade eindeutig
Wenn du dynamische Arrays brauchst, dann lege sie auch so an ...

aArray := {}
aadd(aArray, array(10) )
n := len(aArray) // das ist das neue STAMMELEMENT
aFill( aArray[n], ... ) // alle Werte im neuen Array auf einen Wert setzen.
aArray[n,x] := ... // einen Wert im neuen Array auf einen Wert setzen.

wie Martin schon schrieb, wo ist das Problem, das kennst du doch

[Manfred]

Hi,

das hier war das magische Zauberkonstrukt, was ich nicht verinnerlicht hatte.

Code: Alles auswählen

Aadd(array,array(zahl))

Danke an euch.

Man sollte eher Feierabend machen.

[UliTs]

...
Man sollte eher Feierabend machen.

Ja ja ...
Oder zumindest erwähnen, dass Du ein mehrdimensionales Array bilden möchtest .

[Manfred]

iss ja jut,

ich hatte gestern halt ein Brett vorm Kopf.