Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("1")
Sleep(50)
Label1.Ellipsize = "MARQUEE"
Label2.Ellipsize = "MARQUEE"
SetSelected(Label1)
SetSelected(Label2)
End Sub
Sub SetSelected(lbl As Label)
Dim jo As JavaObject = lbl
jo.RunMethod("setSelected", Array(True))
End Sub