Sub Globals
Dim sv As ScrollView
Dim ed As EditText
End Sub
Sub Activity_Create(FirstTime As Boolean)
sv.Initialize(1000)
activity.AddView(sv, 0, 0, 100%x, 100%y)
sv.Panel.Color = Colors.White
ed.Initialize("ed")
sv.Panel.AddView(ed, 0, 0, 100%x, 100%y)
ed.Color = Colors.White
ed.SelectionStart = 0
End Sub