Sub Process_Globals
Private xui As XUI
End Sub
Sub Globals
Private canvas As B4XCanvas
Private sv As XUIScrollView
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("XUIScrollView")
'Activity.LoadLayout("ScrollView2D")
sv.Panel.Width = sv.Width * 2
sv.Panel.Height = sv.Height * 2
canvas.Initialize(sv.Panel)
canvas.DrawCircle(sv.Width / 2, sv.Height / 2, sv.Width / 2, xui.Color_Blue, True, 0)
sv.Panel.AddView(xui.CreatePanel("test"), 0, 0, sv.Panel.Width, sv..Panel.Height)
End Sub