wie spricht man Array im Array direkt an?

; Version mit Arrays
Global $a = ['a.Element0', 'a.Element1']
Global $b = [0, $a]

; Schreibzugriff:
($b[1])[0] = 'Ich bin das neue Element 0' ; Klammernotation wirft zwar keinen Error, schreibt aber auch nicht.

; Lesezugriff: Klammernotation klappt.
ConsoleWrite('b[0] = ' & VarGetType($b[0]) & ' -> ' & $b[0] & @CRLF)
ConsoleWrite('b[1] = ' & VarGetType($b[1]) & ' -> [' & ($b[1])[0] & ', ' & ($b[1])[1] & ']' & @CRLF)

; Schreibzugriff via ByRef Hilfsfunktion:
_writeAt($b[1], 0, 'Ich bin das neue Element 0')

ConsoleWrite('b[0] = ' & VarGetType($b[0]) & ' -> ' & $b[0] & @CRLF)
ConsoleWrite('b[1] = ' & VarGetType($b[1]) & ' -> [' & ($b[1])[0] & ', ' & ($b[1])[1] & ']' & @CRLF)

Func _writeAt(ByRef $a, $i, $value)
    $a[$i] = $value
EndFunc

; Version mit Maps
Global $a[], $b[]
$a[0] = 'a.Element0'
$a[1] = 'a.Element1'
$b[0] = 0
$b[1] = $a

; Schreibzugriff: Funktioniert ohne Klammern, wenn beides Maps sind
$b[1][0] = 'Ich bin das neue Element 0'

; Lesezugriff: Funktioniert ohne Klammern, wenn beides Maps sind
ConsoleWrite('b[0] = ' & VarGetType($b[0]) & ' -> ' & $b[0] & @CRLF)
ConsoleWrite('b[1] = ' & VarGetType($b[1]) & ' -> [' & $b[1][0] & ', ' & $b[1][1] & ']' & @CRLF)

#AutoIt3Wrapper_Run_Au3Check=n ; Um auszuschließen, dass au3Check dazwischenfunkt, (selbst wenn es das in diesem Beispiel nicht macht)
 
#cs
; Map Version
Global $Map[], $Item[]
$Map.items = $Item
 
MapAppend($Map.items, 123)
 
;~ $Map.items[0] = 5 ; ERROR
;~ ($Map.items)[0] = 5 ; Kein Error, aber Klammersyntax ist readonly
$Map['items'][0] = 5 ; OK
 
ConsoleWrite('ReadAccess (dot syntax): ' & $Map.items[0] & @CRLF) ; OK
ConsoleWrite('ReadAccess (array syntax): ' & $Map['items'][0] & @CRLF) ; OK
#ce
 
;~ #cs
; Map Version2
Global $Array[1], $Item[]
$Array[0] = $Item
 
;~ $Array[0][0] = 5 ; ERROR
;~ ($Array[0])[0] = 5 ; Kein Error, aber Klammersyntax ist readonly
MapAppend($Array[0], 5) ; OK
;~ _($Array[0], 5) ; OK
 
ConsoleWrite('ReadAccess (parentheses syntax): ' & ($Array[0])[0] & @CRLF) ; OK
;~ ConsoleWrite('ReadAccess (bracket syntax): ' & $Array[0][0] & @CRLF) ; ERROR
 
Func _(ByRef $a, $b)
    $a[0] = $b
EndFunc
;~ #ce
 
#cs
; Array Version
Global $Map[], $Item[0]
$Map.items = $Item
 
ArrayAppend($Map.items, 123)
 
;~ $Map.items[0] = 5 ; ERROR
;~ ($Map.items)[0] = 5 ; Kein Error, aber Klammersyntax ist readonly
;~ $Map['items'][0] = 5 ; ERROR
 
; Weiß jemand wie man hier ohne error und ohne byref funktion schreiben kann?
 
ConsoleWrite('ReadAccess (dot syntax): ' & $Map.items[0] & @CRLF) ; OK
;~ ConsoleWrite('ReadAccess (array syntax): ' & $Map['items'][0] & @CRLF) ; ERROR
 
Func ArrayAppend(ByRef $a, $v)
    ReDim $a[UBound($a)+1]
    $a[UBound($a)-1] = $v
EndFunc
#ce

Func _ArrayIn1D_RW(ByRef $_ArrayOuter, $_iOuter, $_iInner, $_vWrite=Null)
    If $_vWrite <> Null Then ; Schreiben
        Local $aInside = $_ArrayOuter[$_iOuter]
        $aInside[$_iInner] = $_vWrite
        $_ArrayOuter[$_iOuter] = $aInside
    EndIf
    Return ($_ArrayOuter[$_iOuter])[$_iInner]
EndFunc

Global $a = ['a.Element0', 'a.Element1']
Global $b = [0, $a]

ConsoleWrite('Lese aus $b[1], Item 1' & @CRLF)
ConsoleWrite(_ArrayIn1D_RW($b, 1, 1) & @CRLF)

ConsoleWrite('Schreibe $b[1], Item 1 "NEU"' & @CRLF)
ConsoleWrite(_ArrayIn1D_RW($b, 1, 1, "NEU") & @CRLF)

#include "JSON.au3"

; [optional] Funktionen in Funktionsvariablen stecken um diese "umzubenennen"
; man kann natürlich stattdessen auch direkt die Funktionsnamen verwenden
Global $_get = _JSON_Get
Global $_write = _JSON_addChangeDelete
Global $_print = _JSON_Generate

; Unsere verschachtelte Beispielstruktur:
Global $a = ['a.Element0', 'a.Element1']
Global $b = [0, $a]

; Beispiel um aus der verschachtelten Struktur zu lesen:
ConsoleWrite('Lese aus $b[1], Item 1:' & @CRLF)
ConsoleWrite($_get($b, "[1][1]") & @CRLF & @CRLF)

; Schreibe / ändere einen Wert:
$_write($b, "[1][1]", "Neu")

; die gesamte Struktur nach dem Schreiben darstellen:
ConsoleWrite("Die gesamte Struktur nach dem Schreiben:" & @CRLF)
ConsoleWrite($_print($b) & @CRLF)

Global $a[1], $b[1]
$b[0] = 123
$a[0] = $b ; Legt eine Kopie von $b in $a[0] an.

;~ $a[0][0] = 5
; Interpretation:
; - gib mir den Index [0][0] von $a -> Error, $a hat keinen Index [0][0]

($a[0])[0] = 5
; Interpretation:
; - Werte den Klammerinhalt zuerst aus
; - aktualisiere die gerade verwendete Variable ByVal auf $a[0] (unsichtbare Kopie)
; - schreibe an Index [0] von dieser Kopie eine 5 -> Das bewirkt nichts, geht aber.

ConsoleWrite(($a[0])[0] & @CRLF)
; Lesezugriff geht natürlich, weil es wurst ist ob man eine Kopie, oder das Original ausliest.

Global $a[], $b[]
$b[0] = 123
$a[0] = $b ; Legt eine Kopie von $b in $a[0] an.

$a[0][0] = 5
; Interpretation:
; - gib mir den Index [0] von $a
; - aktualisiere die gerade verwendete Variable ByRef auf $a[0]
; - schreibe an Index [0] von dieser Variable eine 5

ConsoleWrite($a[0][0] & @CRLF)
; Interpretation:
; - gib mir den Index [0] von $a
; - aktualisiere die gerade verwendete Variable ByRef auf $a[0]
; - lese von Index [0] von dieser Variable

Func _GUICtrlListView_GetTextArray($idLV)
    Local $hLV = GUICtrlGetHandle($idLV)
    Local $iRows = ControlListView("", "", $hLV, "GetItemCount")
    Local $iCols = ControlListView("", "", $hLV, "GetSubItemCount")
    Local $aText[$iRows][$iCols]
    For $I = 0 To $iRows - 1
        For $J = 0 To $iCols - 1
            $aText[$I][$J] = ControlListView("", "", $hLV, "GetText", $I, $J)
        Next
    Next
    Return $aText
EndFunc   ;==>_GUICtrlListView_GetTextArray

#include "JSON.au3"
#include <Array.au3>

; Array-In Array bauen
Global $A[3] = [1,2,3]
Global $B[3] = [5,6,7]
Global $C[3] = [8,9,10]
Global $AInA[] = [$A, $B, $C]

; Array-In-Array in ein 2D-Array konvertieren:
$AInA = __JSON_AinAToA2d($AInA)
ConsoleWrite(@error & @CRLF)

; 2D-Array anzeigen
_ArrayDisplay($AInA, "2D-Array")