ReDim 3d array

[misioooo]

I am doing ReDim of this 3D array (1st dimension) and it works... But cant get 2nd dim to redim.

Hello! I have something like this:

Dim $controls[1][1][1];1st dim holds group, 2nd dim holds no of monitors, 3rd dim holds IDs of all controls for monitor
...
Func _AddMonitor()
    $i = GUICtrlRead($tabGroups,1)
    $tab_index = GUICtrlRead($tabGroups)
    GUISwitch($gui_main,$i)
    $monitors[$tab_index] = $monitors[$tab_index]+1 ;in this array is number of monitors for each group (group no is array index)
    $mon = $monitors[$tab_index]
    ReDim $controls[UBound($controls)][UBound($controls,1)+1][UBound($controls,2)] ;I JUST WANT TO INCREASE 2nd DIMENSION BOUNDS BY 1
    MsgBox(0,"",$monitors[$tab_index])
    $controls[$groups-1][$monitors[$tab_index]][$MANUFACTURER] = GUICtrlCreateCombo("",40,160+20+$y_offset) ;ERROR HERE DUE TO SUBSCRIPT OR OUT OF BOUNDS
    $controls[$groups-1][$monitors[$tab_index]][$MODEL] = GUICtrlCreateCombo("",40+120,160+20+$y_offset)
EndFunc

Edited August 28, 2014 by misioooo

[Melba23]

misioooo

You are using the wrong "Dimension" parameters for the UBound functions - at present you have "Default (1), 1, 2" when you need "1, 2, 3":

Global $aArray[1][1][1]

ConsoleWrite(UBound($aArray, 1) & " - " & UBound($aArray, 2) & " - " & UBound($aArray, 3) & @CRLF) ;Read 1 - 1 - 1

ReDim $aArray[UBound($aArray, 1) + 1][UBound($aArray, 2) + 2][UBound($aArray, 3) + 3]

ConsoleWrite(UBound($aArray, 1) & " - " & UBound($aArray, 2) & " - " & UBound($aArray, 3) & @CRLF) ; Should read 2 - 3 - 4

All clear?

M23

P.S. Please do not use Dim - it is much better to use Global/Local and be explicit about which scope you require.

[misioooo]

Thank You Melba. I have no idea why i missed so obvious error... Probably i was counting from "0" ;P

It is working now.

Edited August 28, 2014 by misioooo