B4A Library Rope Progress Bar

It wraps this Github project. Posting the B4A project, the Java Code, and the library files.

Some sample code:

#Region  Project Attributes
    #ApplicationLabel: RopeProgressBar
    #VersionCode: 1
    #VersionName:
    'SupportedOrientations possible values: unspecified, landscape or portrait.
    #SupportedOrientations: landscape
    #CanInstallToExternalStorage: False
#End Region

#Region  Activity Attributes
    #FullScreen: False
    #IncludeTitle: True
#End Region

Sub Process_Globals
    'These global variables will be declared once when the application starts.
    'These variables can be accessed from all modules.
     Dim t As Timer
End Sub

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.

    Private rpb1 As RopeProgressBar
    Dim cnt As Int = 0
End Sub

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    Activity.LoadLayout("main")
    t.Initialize("t", 50)
    rpb1.Progress  = 0
    rpb1.PrimaryColor = Colors.red
    rpb1.SecondaryColor = Colors.Yellow
    rpb1.Slack = 30.0
    rpb1.StrokeWidth = 15.0
    rpb1.BubbleColor = Colors.Blue
    rpb1.BubbleTextColor = Colors.White
    rpb1.Max = 100
  
End Sub

Sub Activity_Resume
  
    t.Enabled = True

End Sub

Sub Activity_Pause (UserClosed As Boolean)
  
    t.Enabled = False

End Sub

Sub t_tick

If cnt < 101 Then  
    cnt = cnt + 1
    rpb1.Progress = cnt
    Log(rpb1.Progress)
Else
    cnt = 0  
End If
  
  
End Sub

RopeProgressBar
Author: Johan Schoeman
Version: 1

• RopeProgressBar
  Fields:
  • ba As BA
  Methods:
  • BringToFront
  • DesignerCreateView (base As PanelWrapper, lw As LabelWrapper, props As Map)
  • Initialize (EventName As String)
  • Invalidate
  • Invalidate2 (arg0 As Rect)
  • Invalidate3 (arg0 As Int, arg1 As Int, arg2 As Int, arg3 As Int)
  • IsInitialized As Boolean
  • RemoveView
  • RequestFocus As Boolean
  • SendToBack
  • SetBackgroundImage (arg0 As Bitmap)
  • SetColorAnimated (arg0 As Int, arg1 As Int, arg2 As Int)
  • SetLayout (arg0 As Int, arg1 As Int, arg2 As Int, arg3 As Int)
  • SetLayoutAnimated (arg0 As Int, arg1 As Int, arg2 As Int, arg3 As Int, arg4 As Int)
  • SetVisibleAnimated (arg0 As Int, arg1 As Boolean)
  Properties:
  • Background As Drawable
  • BubbleColor As Int [write only]
  • BubbleTextColor As Int [write only]
  • Color As Int [write only]
  • DynamicLayout As Boolean [write only]
  • Enabled As Boolean
  • Height As Int
  • Left As Int
  • Max As Int [write only]
  • PrimaryColor As Int
  • Progress As Int
  • SecondaryColor As Int
  • Slack As Float
  • StrokeWidth As Float
  • Tag As Object
  • Top As Int
  • Visible As Boolean
  • Width As Int