B4i Library iCircularProgress- circular progress bar

Name: iCircularProgress

Version: 1.11

Description: iCircularProgress allows you to add circular progress bars to your app's layout

Picture:
XAl0TK4z

Documentation:
Events:
  • _AnimationProgressChanged (Progress As Float)
  • _AnimationFinish
Methods:
  • Initialize (EventName As String, Panel As Object, Left As Float, Top As Float, Radius As Float)
  • SetProgress: (Progress As Float, DurationMS As Int)
  • AddProgress: (Progress As Float, DurationMS As Int)
  • SubtractProgress: (Progress As Float, DurationMS As Int)
Properties:
  • MarginTop As Float
  • MarginLeft As Float
  • Radius As Float
  • LineWidth As Float
  • CountdownMode As Boolean
  • InAnimation As Boolean
  • FilledColor As Int
  • UnfilledColor As Int
  • Progress As Float [read only]
  • Panel As Object [read only]

Notes/Tips:
  • the method SetProgress sets the start progress automatically to 0 in the normal mode an 1 in the countdown mode
  • all views on the panel which is used by CircularProgress will be removed

Download "iCircularProgress 1.11.zip": http://bit.ly/2xAU4FV

Feel free to ask questions ;)
 

Attachments

  • Example.zip
    3.1 KB · Views: 189
Last edited:

narek adonts

Well-Known Member
Licensed User
Longtime User
Its ok ) i didnt new that I have to add an individual panel for it. solved.

Another question.

How can I stop the progress animation. For example when touch down progress start and on touch up progress stop.
 

JanPRO

Well-Known Member
Licensed User
Longtime User
Currently you can't stop an animation, but this method will be added.

Do you also need a ContinueAnimation method, so that you can continue an animation after you stop it?
 
Last edited:

tufanv

Expert
Licensed User
Longtime User
Currently you can't stop an animation, but this method will be added.

Do you also need a ContinueAnimation method, so that you can continue an animation after you stop it?

Dear Jan,

when i add this to an individual panel , i cant show any progress. When i set the progress to 25 it shown nothing but when i put it to 30 it shows full progress every time. Any ideaas ? also i add this to individiuıal panel but it messes up my another panel ( which is the mother of circular's panel )
 

Taha

Member
Licensed User
Longtime User
  • all views on the panel which is used by CircularProgress will be removed
Then, it is not possible to add a label inside the circle?​
 

JanPRO

Well-Known Member
Licensed User
Longtime User
Hi,

it is possible, but you can't use the Panel you get from the Panel property for it, for example:

B4X:
    Dim Pn As Panel
    Pn.Initialize("")
    Pn.Color = Colors.Black
   
    Dim CirProPn As Panel = CirPro.Panel
    CirProPn.AddView(Pn,0,0,20,20)
    CirPro.AddProgress(0.5,2000) 'After calling this method the "Pn" Panel will be removed

Jan
 

Taha

Member
Licensed User
Longtime User
Jan, frankly speaking, I couldn't get the iCircularProgress to work. During runtime the circle doesn't fill by either AddProgress or SetProgress. I update the progress in cycle and can see it is going from 0 to 1. Can you show a sample?
 

Taha

Member
Licensed User
Longtime User
Yes, but there is no updating the progress in cycle (for-next). I put iCircularProgress onto separate panel. Nothing moves, it shows full circle only after the cycle ends.
 
Top