I use the ScrollView.Panel
in tje Globals
In the Activity_Create
only scroll in vertical,I can touch it up and down.
but I want the Gird scroll in horizontal, how to do it.
thanks
in tje Globals
B4X:
Sub Globals
Private Pan1 As Panel
Dim DLine As Canvas
Private SV As ScrollView
Dim Stroke As Float : Stroke = 1dip
Dim Dx,Dy As Float
End Sub
B4X:
Sub Activity_Create(FirstTime As Boolean)
Dy=Activity.Height:Dx=Activity.Width
SV.Initialize(Dy)
Activity.AddView(SV,10dip,10dip,0.5*Dx,0.5*Dy)
Pan1.Initialize("")
SV.Panel.AddView(Pan1,0,0,0.5*Dx,0.5*Dy)
DLine.Initialize(Pan1)
DrawGird
End Sub
but I want the Gird scroll in horizontal, how to do it.
thanks
Last edited: