Dim bc As BitmapCreator
bc.Initialize(panel.Width,panel.Height)
bc.DrawRectRounded(bc.TargetRect,Colors.Black,False,2dip,5dip)
Dim r As B4XRect
r.Initialize(10dip,0,100dip,10dip)
bc.DrawRect(r,Colors.Transparent,True,0)
Dim bmp As B4XBitmap = bc.Bitmap
panel.SetBackgroundImage(bmp)
Dim bc As BitmapCreator
bc.Initialize(panel.Width,panel.Height)
Dim r As B4XRect=bc.TargetRect
bc.DrawRectRounded(r,Colors.Black,False,2dip,5dip)
r.Left = 10dip
r.Width = 100dip
r.Height = 10dip
bc.DrawRect(r,Colors.Transparent,True,0)
Dim bmp As B4XBitmap = bc.Bitmap
panel.SetBackgroundImage(bmp)