Cycling through types?

BlitzPlus Forums/BlitzPlus Beginners Area/Cycling through types?

neos300(Posted 2009) [#1]
How do i cycle through types, then pick one out based on a field?


GIB3D(Posted 2009) [#2]
Type Apple
Field ReadyToEat
End Type

Global MyApple.Apple = PickApple()

Function PickApple.Apple()
 For a.Apple = Each Apple
  If a\ReadyToEat = True
   Return a
  EndIf
 Next
End Function



neos300(Posted 2009) [#3]
Ok, thanks.