Dim Obj1, Obj2 As Reflector
Dim bmp As Bitmap
Dim c As Canvas
Obj1.target = Obj1.GetActivityBA
Obj1.target = scrollview.Panel
bmp.InitializeMutable(Activity.Width,scrollview.Panel.Height)
c.Initialize2(bmp)
DoEvents
Dim args(1) As Object
Dim types(1) As String
Obj2.target = c
Obj2.target = Obj2.GetField("canvas")
args(0) = Obj2.target
types(0) = "android.graphics.Canvas"
Obj1.RunMethod4("draw", args, types)
DoEvents
Dim out As OutputStream
out = File.OpenOutput(File.DirRootExternal&"/folder" , Filename, False)
bmp.WriteToStream(out, 100, "JPEG")
out.Close