ScrollingPanel1.SetDirection(ScrollingPanel1.DIRECTION_RIGHT)
ScrollingPanel1.AddText("text1","1",Colors.Blue,200, Gravity.CENTER_VERTICAL )
ScrollingPanel1.AddText("text2","2",Colors.Green,50, Gravity.TOP)
ScrollingPanel1.AddText("text3","3",Colors.Red,50, Gravity.BOTTOM)
ScrollingPanel1.AddText("All good things come to an end: Japan's benchmark just finished its longest ever win streak","4",Colors.White,60, Gravity.CENTER_VERTICAL)
Dim nbutton As Button
nbutton.Initialize("")
nbutton.Text = "This is a button"
'Activity.AddView(ScrollingPanel1,0,0,1,1)
ScrollingPanel1.AddObjectToPanel(nbutton,300,50,"Button1")
ScrollingPanel1.StartScrolling(50000)
Sleep(20000)
ScrollingPanel1.RemoveObject("3")
Sleep(15000)
ScrollingPanel1.RemoveObject("1")