B4A Library StoriesProgressView

A wrapper for this https://github.com/shts/StoriesProgressView





StoriesProgressView
Author: SMM
Version: 0.01

• StoriesProgressViewWrapper
  Events:
  • _onComplete
  • _onNext
  Fields:
  • ba As BA
  Methods:
  • BringToFront
  • Destroy
    Very important ! in activity destroy
  • 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)
  • skip
  • startStories
  Properties:
  • Background As Drawable
  • Color As Int [write only]
  • Enabled As Boolean
  • Height As Int
  • Left As Int
  • Padding()() As Int
  • Parent As Object [read only]
  • StoriesCount As Int [write only]
  • StoryDuration As Long [write only]
  • Tag As Object
  • Top As Int
  • Visible As Boolean
  • Width As Int

Sample:

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.
  
    Dim cv As StoriesProgressViewWrapper
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("Layout1")
  
    cv.Initialize("cv")
  
    cv.StoriesCount=8
    cv.StoryDuration=1200
    cv.startStories
    Activity.AddView(cv,0,0,100%x,1dip)
  
End Sub
Sub Activity_Pause (UserClosed As Boolean)
cv.Destroy
End Sub

Events:

Sub cv_onComplete
    Log("cv_onComplete")
End Sub
Sub cv_onNext
  
    Log("cv_onNext")
End Sub