Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.
Dim Imageview1 As ImageView
Dim Bitmap1 As Bitmap
Dim button1 As Button
End Sub
Sub Activity_Create(FirstTime As Boolean)
Imageview1.Initialize("")
Bitmap1.Initialize(File.DirAssets, "nameoffile.gif")
Imageview1.Bitmap = Bitmap1
Imageview1.Gravity = Gravity.FILL
Activity.AddView(Imageview1,0,0, 50%x,50%y)
button1.Initialize("button1")
button1.Color=Colors.Transparent
Activity.AddView(button1,0,0,50%x,50%y)
End Sub
Sub button1_Click
ToastMessageShow("Button Clicked",False)
End Sub