2-Dim Array "nach rechts" erweitern ? [erledigt]

[AUGE_OHR]

hi,
... ich komme nicht drauf :

Wenn ich ein Array mit AADD() erweitere wird das Array in der X-Achse "länger".
Wie ist das mit der Y-Achse wenn ich das ganze Array "nach rechts" erweitern will um in einem XbpBrowse eine weite Column anzuhängen zu können ?

Code: Alles auswählen

aExcel := ARRAY(5,10)  // 5 Row, 10 Column
AADD(aExcel,ARRAY[10]) -> 6 Row, 10 Column


und wie wäre dann ??? -> 6 Rows, 11 Column, aber nicht mit

Code: Alles auswählen

AADD(aExcel,ARRAY[11])


weil dann 5 Row mit 10 und 1 mit 11

und wenn wir schon dabei sind auch das "umgekehrte" wenn man 6 Row 11 Column hätte wie würde ich es auf 6 Row 10 Column bekomme, also das Array "von rechts verkürzen" ?
(nicht nur die 11th Column "ausblenden" )

p.s. im Array sind "Inhalte", also kann ich nicht einfach ARRAY(6,11) verwenden da ich dann ja auch den "Inhalt um-schaufeln" müsste ...muss ich das wirklich ...

[Sören]

Hallo Jimmy,

das geht nur, indem jede Array-Zeile einzeln "angepackt" wird:

Code: Alles auswählen

aExcel := ARRAY(5,10)
AEval( aExcel, { |a| AAdd( a, "Col11" ) } )


[AUGE_OHR]

ich habe ein Idee ...

ich kann mit XbpBrowse eine XbpColumne anlegen für ein 1-Dim Array (... denke ich doch ...)

nur würde man, wie bei Directory, ein 2-Dim Array nehmen um daraus wieder XbpColumne zu machen,
also warum sollte ich nicht gleich 1-Dim Array´s für jede einzelne XbpColumne nehmen können ?

wenn ich also eine weiter XbpColumne "rechts" anhängen will kommt Parallel ein 1-Dim Array dazu
was die selbe LEN() wie die anderen Array hat... das "müsste" doch gehen ?

ich bräuchte dann "nur" noch einen Array "Skipper" der alle Array "synchronisiert" damit die "richtigen"
Elemente für die betreffenden Zeilen angezeigt wird ... oder

[brandelh]

Hallo Jimmy,

ja das geht, 5x 1-dim mit gleicher Länge kann die gleichen Infos speichern, wie ein 2-dim mit 5 Elementen in der 2. Dimension.
Die Syncronisationsarbeit liegt dann aber natürlich bei dir (Sortierung, Element einfügen etc.).

[AUGE_OHR]

ja das geht, 5x 1-dim mit gleicher Länge kann die gleichen Infos speichern, wie ein 2-dim mit 5 Elementen in der 2. Dimension.
Die Syncronisationsarbeit liegt dann aber natürlich bei dir (Sortierung, Element einfügen etc.).

WOW tatsächlich es funktioniert.

ok dann werde ich mich mal ran machen und eine komplette X-Dim Array Class schreiben.

[Manfred]

Hi,

vor dem gleichen Problem stehe ich jetzt auch. Ist da jetzt eine Lösung bekannt geworden, oder übersehe ich hier was?

Ich möchte eine Spalte irgendwo anfügen, verschieben, oder löschen können. Die Spalten sind mit Daten belegt.

[brandelh]

Hallo Manfred,

wenn ich dich recht verstehe hast du etwa das:

Code: Alles auswählen

aData := { { "a","b" }, {"1","2"} }

und willst jeweils ein weiteres element ...

Code: Alles auswählen

{ { "a","b","c" }, {"1","2","3"} }

oder ?

das geht so ...

Code: Alles auswählen

for x := 1 to len(aData)
    xWert := ????
    aadd( aData[x] , xWert )
next


[Manfred]

Hi Hubert,

1) es ist mal wieder äußerst peinlich festzustellen, das es so simpel geht. (so ähnlich hatte ich mir das schon gedacht, das es gehen müßte.)

2) was unterscheidet denn mein Problem von Jimmys Problem?

3) das war auch der Grund, warum ich es für schwieriger zu lösen hielt.. (wenn Jimmy schon fragt)

und

4) das war es wohl.

Danke für den Tipp

[brandelh]

Hmmnm ... waren die Fragen ernst gemeint ... grübel ...

1.) wirst schon nicht umkommen
2.) Durch nichts
3.) manchmal sieht man den Wald vor lauter Bäumen nicht, das kenn ich
4.) schön

[Manfred]

Hi Hubert,

zu 2)

oben für Jimmy steht aber ein ganz andere Lösung. Das hat mich etwas verwirrt.

[brandelh]

Hallo Manfred,

nein, die Lösung des Problems war genau die Gleiche (2. Message; von Sören).
Ich habe nur For/Next statt seiner AEval() verwendet. Vom Prinzip her das Gleiche.
Allerdings wollte Jimmy lieber (warum weiß ich nicht) mehrere eindimensionale Arrays syncron halten. Das ist ein anderer Weg zum Ziel.