B4A Library [B4X] [XUI] [B4XLib] xBusy - customizable busy indicator that also blocks background interaction.

For use in B4A, B4J, B4i.
Copy b4xlib file to: \B4X Additional Libraries\B4X.

v1.01 update: xBusy.Base_Resize now handles bitmap resizing correctly on iOS devices.

Properties:
  • BackgroundAlpha - transparency of the overlay.
  • BackgroundImage - Assign a custom B4XBitmap for a background image.
  • TextColor - color of text displayed.
  • SpinnerImage - Assign a custom B4XBitmap to the spinner.
  • TapToClose - closes xBusy when tapped – to be used for development purposes only.
Usage:
Sub Class_Globals
    Private Busy As xBusy
End Sub

Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
    Busy.Initialize(Root)
End Sub

Private Sub B4XPage_Resize (Width As Int, Height As Int)
    Busy.Base_Resize(Width, Height)
End Sub

Private Sub ShowIndicatorOnly
    Busy.Show
        'Do stuff here (eg.Wait For/Sleep etc.)
    Busy.Hide
End Sub

Private Sub ShowIndicatorAndText
    Busy.ShowWithText("myText")
        'Do stuff here (eg.Wait For/Sleep etc.)
    Busy.Hide
End Sub

Private Sub ChangeProperties
    Busy.BackgroundAlpha=220 'Set transparency from 0 to 255 (void if BackGroundImage is loaded)
    Busy.BackgroundImage=xui.LoadBitmap(File.DirAssets,"filename.png") 'Load a custom background image
    Busy.BackgroundImage=Null 'Remove background image
    Busy.TextColor=xui.Color_White 'Set the color of the text to be displayed
    Busy.SpinnerImage=xui.LoadBitmap(File.DirAssets,"filename.png") 'Load a custom spinner image
End Sub

Private Sub UpdateStatus
    Busy.ShowWithText("loading data 0%")
    For i=0 To 100
        Busy.UpdateText($"loading data ${i}%"$)
        Sleep(20)
    Next
    Busy.Hide
End Sub
 

Attachments

  • xbusy-as-splash.png
    xbusy-as-splash.png
    57 KB · Views: 269
  • xbusy-progress.PNG
    xbusy-progress.PNG
    10.6 KB · Views: 271
  • xbusy-styled.PNG
    xbusy-styled.PNG
    10 KB · Views: 268
  • xBusy.b4xlib
    8.5 KB · Views: 216
  • xBusy Demo.zip
    388.1 KB · Views: 262
Last edited:
Top