Hello, I do not use the B4X technology. So I can not find an example of how to make a screen copy of the panel and all the elements on this panel. I can not use this code because I do not have B4XView objects
B4X view snapshot:
Sub Button1_Click
Dim bmp As B4XBitmap = Crop_Image(Panel1, Panel1.left, Panel1.top, Panel1.width, Panel1.height )
Dim out As OutputStream
out = File.OpenOutput(File.DirInternal, "1.png", False)
bmp.WriteToStream(out, 100, "PNG")
out.Close
End Sub
Sub Crop_Image(V As B4XView, left As Int, top As Int, width As Int, height As Int) As Bitmap
Return V.Snapshot.Crop(left, top, width, height)
End Sub