Hi, what error message do you get? it looks fine from this angle. This is perfectly fine:
type mytype
x as integer
y as integer
z as integer
endtype
dim array(5) as mytype
for n = 1 to 5
array(n).x = n
print array(n).x
next n
wait key
end
Just adding to your code, this compiles for me
Type Rect
rLeft as integer
rRight as integer
rTop as integer
rBottom as integer
endtype
Dim MyArray(10) as Rect
for n = 1 to 10
myarray(n).rleft = n
print myarray(n).rleft
next n
wait key
end
Not sure why it doesn't work for you, do you have the latest build, 7.6? It's either that or you have overlooked something but from what I can see, you have done everything correctly.
A clever person solves a problem, a wise person avoids it - Albert Einstein