Drawing progressbar at the bottom of a label. After that I need to clear this progressbar:
Dim i As Int
Dim cvs1 As B4XCanvas
For i = 1 to 100
cvs1.DrawLine(0, lbl.Height - 1, lbl.Width * i/100, lbl.Height - 1, Colors.Red, 1dip)
cvs1.Invalidate
Next
'then after a while (user will press a...