Sub Globals
Dim SV As ScrollView
Dim canvas1 As Canvas
End Sub
Sub Activity_Create(FirstTime As Boolean)
SV.Initialize(1000dip)
Activity.AddView(SV,0,0,100%x,100%y)
canvas1.Initialize(Activity)
canvas1.DrawTextRotated("Text",50dip,50dip,Typeface.MONOSPACE,30,Colors.Yellow,"CENTER",135)
End Sub