B4J Code Snippet Simple Progress Bar

Long time ago, I created a very simple progress bar using 2 panels for B4A but it seems not working inside CustomListView under B4J.
I took the code from AnotherProgressBar (XUI Views) and tried to remove the animation.
Note: I am not sure whether my code is correct or has any performance issue. Use on your own risk.

' Create a static rounded bar
Sub DrawBar (Pane As B4XView, BackgroundColor As Int, Width As Double, Height As Double, CornerRadius As Int)
    Try
        If Width < 1 Or Height < 1 Then Return
        Dim mIV As B4XView
        Dim iv As ImageView
        Dim bc As BitmapCreator
        iv.Initialize("")
        mIV = iv
        Pane.AddView(mIV, 0, 0, Width, Height)
        bc.Initialize(Width, Height)
        bc.DrawRectRounded(bc.TargetRect, BackgroundColor, True, 0, CornerRadius)
        bc.SetBitmapToImageView(bc.Bitmap, mIV)
    Catch
        Log(LastException)
    End Try
End Sub