Enum (gb)

This static class is used for implementing enumerable classes.

You must use this class inside the implementation of _next special method.

Note: ENUM is also a keyword used for Enumeration declaration

Deze klasse is statisch.

Deze klasse is statisch opsombaar met sleutelwoord FOR EACH.

Statische eigenschappen
Index   Returns or sets a value that is used for referencing the next enumerated element.
Stopped   Return if the current enumeration has been stopped.

Statische methode
Stop   Stops the current enumeration.

See also

Example

From Gambas source code:

'' Return recursively all the options available (line 307)
Public Function _next() As String
  
  Dim s As String
  
  If Not $aOptionsNames Then GetOptions
  If IsNull(Enum.Index) Then 
    Enum.Index = 0
  Else
    Inc Enum.Index
  Endif
  If Enum.Index >= $aOptions.Count Then 
    Enum.Stop
    Return
  Endif
  
  s = $aOptionsNames[Enum.Index]
  Return s
  
End