Array variable has incorrect number of subscripts or subscript dimension range exceeded.

[Mucho 0]

$ChartList = WinList ("[CLASS:TfrmCharts]");  ("", "Processing data")

If $Chartlist[1][0] <> "" And BitAND(WinGetState($Chartlist[1][1]), 2) And BitAND(WinGetState($Chartlist[1][1]), 16) Then
       WinWait("Advisor Professional  v","",1)

 

I know it is caused by an empty array, but can someone help me with the correct coding?

 

[Kovacic 7]

Try defining your array with more spots than you need...

add this:

local $Chartlist[100][100]

 

[Danp2 274]

If $Chartlist[1][0] <> ""

Try changing this to:

If $Chartlist[0][0] > 0

 

[Mucho 0]

So I tried Kovacic's suggestion as follows:

Local $ChartList = WinList("[CLASS:TfrmCharts]")
local $Chartlist[100][100]

If $Chartlist[1][0] <> "" And BitAND(WinGetState($ChartList[1][1]), 2) And BitAND(WinGetState($ChartList[1][1]), 16) then; 
    MsgBox($MB_SYSTEMMODAL, "Wait", "A chart is either minimized or not detached. Process Attached Chart", 1)
    _WinWaitActivate("Advisor Professional  v","")

Else ;( Detached Chart )               { Even though there is no detached chart, the script still execute this condition. }
    MsgBox($MB_SYSTEMMODAL, "Wait", "Process Detached Chart that is not minimized", 1)
    WinSetState ($ChartList[1][0], "", @SW_MAXIMIZE)
    MouseClick("left", 130, 40, 1,0)

EndIf

 

The array variable error is still there if there is no detached chart, that is to say no chart in the array.  If there is a minimized detached chart, then the error disappears, the script works fine.

Edited December 10, 2015 by Mucho

[UEZ 1,070]

Try:

$ChartList = WinList ("[CLASS:TfrmCharts]");  ("", "Processing data")
If $ChartList[0][0] Then
    If $Chartlist[1][0] <> "" And BitAND(WinGetState($Chartlist[1][1]), 2) And BitAND(WinGetState($Chartlist[1][1]), 16) Then
       WinWait("Advisor Professional  v","",1)
    EndIf
EndIf

 

[Mucho 0]

UEZ,

It does not even test either of the two conditions. BitAND(WinGetState($Chartlist[1][1]), 16) does not seem to work; it does not see that the chart is minimized, although BitAND(WinGetState($Chartlist[1][1]), 2) is ok. I do not have this problem in my office computer.

[UEZ 1,070]

Your condition seems to be wrong which I didn't check previously.

Try this instead:

$ChartList = WinList ("[CLASS:TfrmCharts]");  ("", "Processing data")
If $ChartList[0][0] Then
    If $Chartlist[1][0] <> "" And BitAND(WinGetState($Chartlist[1][1]), 18) = 18 Then
       WinWait("Advisor Professional  v","",1)
    EndIf
EndIf

This will check whether Wintitle is <> "" AND bits 2 and 16 are set (Window is visible & Window is minimized).

Edited December 10, 2015 by UEZ