enumeration of items

[Amzerik]

Perfect, sorry to backtrack into comparing files and stuff again, but i need to compare data. This is what i have so far

Code:

Copy      Help

int w=win("Calculator" "SciCalc") ;;QM Options dialog
Acc a.Find(w "WINDOW" "Calculator" "class=SciCalc" 0x1005)
ARRAY(Acc) b.create(0x10000)
ARRAY(str) names.create(0x10000)
ARRAY(str) roles.create(0x10000)
int i
str data
str saveTo="$desktop$\Compare.txt"

ARRAY(int) location.create(0x10000)
ARRAY(str) s
a.GetChildObjects(b -1)
for i 0 b.len
,roles[i]=b[i].Role
,names[i]=b[i].Name
,location[i]=b[i].Location
,
,data.formata(" %i : %s : %s : %i[]" i roles[i] names[i] location[i])
if data="$desktop$\Compare.txt"
,out "Same data"
else
,data.setfile(saveTo)
,out "Different data"