clearrect

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...