Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
Dim Image As String
Dim Type1 As String
Dim Type2 As String
Dim Type1Label As String
Dim Type2Label As String
Dim lblText As String
Dim LBulb 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 ListView1 As ListView
Dim ScrollView1 As ScrollView
Dim PokeImageInfo As ImageView
Dim Panel4 As Panel
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("test")
End Sub
Sub Activity_Resume
ListView1.AddTwoLinesAndBitmap("#1", "Test", LoadBitmap(File.DirAssets, "1.png"))
ListView1.AddTwoLinesAndBitmap("#2", "Test", LoadBitmap(File.DirAssets, "2.png"))
End Sub
Sub ListView1_ItemClick (Position As Int, Value As Object)
If Value = "#1" Then
StartActivity(BulbAct)
Image = "1test.png"
LBulb = "#Test Text"
Type1 = "Test.jpg"
Type2 = "Test.jpg"
Type1Label = "Test"
Type2Label = "Test"
lblText = "This is the line that I am having trouble with sizing."
End If