Android Question Screenshot of Camera preview

    Dim jo As JavaObject
    jo.InitializeContext
    Dim decor As JavaObject = jo.RunMethodJO("getWindow", Null).RunMethod("getDecorView", Null)
    Dim decorChild As JavaObject = decor.RunMethod("getChildAt", Array(0))
    decorChild.RunMethod("setDrawingCacheEnabled", Array(True))
    decorChild.RunMethod("buildDrawingCache", Null)
    Dim bmp As Bitmap = decorChild.RunMethod("getDrawingCache", Array(True))
    bmp.Initialize3(bmp)
    decorChild.RunMethod("setDrawingCacheEnabled", Array(False))
    'Return bmp
 
    Private RTP As RuntimePermissions
    Log(RTP.GetSafeDirDefaultExternal(""))
    Dim Out As OutputStream
    Out = File.OpenOutput(RTP.GetSafeDirDefaultExternal(""), "Test.png", False)
    bmp.WriteToStream(Out, 100, "PNG")
    Out.Close

        Dim r As B4XRect
        r.Initialize(0, 0, GetDeviceLayoutValues.Width, GetDeviceLayoutValues.Height)
        iv.Width = GetDeviceLayoutValues.Width
        iv.Height = GetDeviceLayoutValues.Height
        Dim can As B4XCanvas
        iv.Bitmap = Null
        can.Initialize(iv)
        can.ClearRect(can.TargetRect)
      
        can.DrawBitmap(LastCadr, r)
        Dim TitleHeight As Float = (GetDeviceLayoutValues.Height - Activity.Height)
      
        Dim b As B4XBitmap = others.Take_Screenshot
        r.Initialize(0, -TitleHeight, GetDeviceLayoutValues.Width, GetDeviceLayoutValues.Height-TitleHeight)
        can.DrawBitmap(b, r)
      
        can.Invalidate