'Activity module
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
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 Button1 As Button
Dim scrollview1 As ScrollView
Dim panel1 As Panel
End Sub
Sub Activity_Create(FirstTime As Boolean)
activity.AddMenuItem ("Settings","Settings")
activity.AddMenuItem ("Metro UI Settings","Metro UI Settings")
activity.LoadLayout ("windowphone7")
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Pause (UserClosed As Boolean)
End Sub
Sub Activity_KeyPress (KeyCode As Int) As Boolean 'return true if you want to consume the event
If keycode = KeyCodes.KEYCODE_BACK Then
Return True
Else
Return False
End If
End Sub
Sub Settings_click
Dim intent1 As Intent
intent1.Initialize(intent1.ACTION_MAIN,"")
intent1.SetComponent("com.android.settings/.framework.activity.HtcSettings")
StartActivity(intent1)
End Sub
Sub Metro_UI_Settings_click
panel1.[COLOR="Red"]Visible[/COLOR] = True
End Sub
Sub panel1
panel1.[COLOR="Red"]LoadLayout[/COLOR]("Metro_UI_Settings")
End Sub
Sub Button1_Click
button1.BringToFront
scrollview1.[COLOR="Red"]Visible[/COLOR] = True
If scrollview1.Visible = True Then
Return scrollview1.Visible = False
End If
End Sub
Sub scrollview1
End Sub