Have a problem with SetArrayVariable ... sometimes it works but in this example it appears it does not work - here is a code snippet ... I expected to see AN1 as an array variable in WATCH Variable module but AN1 does not show at all.
Can you point me where the problem might be?
Blobs = GetArrayVariable("BLOBS")
NoA = GetVariable("NumOfABox")
ABH = GetVariable("ABoxHeight")
ABW = GetVariable("ABoxWidth")
ABG = GetVariable("ABoxGap")
AH = GetVariable("AHeight")
ReDim Results(NoA,2)
for i = 0 to NoA-1
Results(i,0) = "-"
Results(i,1) = "-"
next
if isArray(Blobs) then
BCount = (ubound(Blobs) + 1) / 2
if BCount >= 1 then
ReDim YBoxes(NoA,2)
Y_Begin = AH
for i = 0 to NoA-1
YBoxes(i,0) = Y_Begin
YBoxes(i,1) = Y_Begin - ABH
Y_Begin = Y_Begin - ABH - ABG
next
ReDim XBoxes(4,2)
X_Begin = 0
for i = 0 to 4-1
XBoxes(i,0) = X_Begin
XBoxes(i,1) = X_Begin + ABW
X_Begin = X_Begin + ABW
next
for j = 0 to BCount-1
x = Blobs(j*2)
y = Blobs(j*2+1)
for i = 0 to NoA-1
if (y >= YBoxes(i,1)) and (Y <= YBoxes(i,0)) then
if (x >= XBoxes(0,0)) and (x <= XBoxes(0,1)) then
if (Results(i,0) = "-") or (Results(i,0) = "S") then
Results(i,0) = "S"
else
Results(i,0) = "?"
end if
elseif (x >= XBoxes(1,0)) and (x <= XBoxes(1,1)) then
if Results(i,0) = "-" or (Results(i,0) = "I") then
Results(i,0) = "I"
else
Results(i,0) = "?"
end if
elseif (x >= XBoxes(2,0)) and (x <= XBoxes(2,1)) then
if Results(i,0) = "-" or (Results(i,0) = "R") then
Results(i,0) = "R"
else
Results(i,0) = "?"
end if
elseif (x >= XBoxes(3,0)) and (x <= XBoxes(3,1)) then
Results(i,1) = "A"
else
' This should never happen
end if
exit for
end if
next
next
end if
end if
SetArrayVariable "AN1", Results
|
|
Kresimir,
The SetArrayVariable will expect a 1 dimensional array (i.e. a list of numbers). You are creating a two dimensional array which it will ignore. The reason for this is to keep things simple in terms of exporting and referencing arrays ... as not all the other scripting modules also have the concept of two dimensional arrays.
Instead, just double up, i.e. if you want to index the 10th row, use 10*2 and assume the array is double the size. In other words, simulate a 2 dimensional array using a single dimension.
STeven.
|
|
This Thread