Is there a way of iterating over the Type fields? Maybe with reflection? For example:
B4X:
Type LogTypes(NONE As Int, TEXT As Int, INFO As Int, ERROR As Int, _
WARNING As Int, DEBUG As Int, COMMAND As Int, RESPONSE As Int )
Dim LOGTYPE As LogTypes
' This doesn't work, obviously
Dim n as Int : n = 0
For Each item As Int in LOGTYPE
n = n +1
item = n
Next