'Activity module
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
Dim mode As String
End Sub
Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.
Dim standard As Boolean
Dim lvSettings As ListView
End Sub
Sub Activity_Create(FirstTime As Boolean)
lvSettings.Initialize("lvSettings")
Activity.AddView(lvSettings,0,0,100%x,50%y)
mode = "Advanced Mode"
FillListView
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Pause (UserClosed As Boolean)
End Sub
Sub lvSettings_ItemClick (Position As Int, Value As Object)
standard = Not(standard)
If standard Then mode = "Standard Mode" Else mode = "Advanced Mode"
FillListView
End Sub
Sub FillListView
lvSettings.Clear
lvSettings.AddTwoLines2(mode,"Select Standard or Advanced Mode","GM")
End Sub