B4A Library [B4X] [XUI] AS RangeSeekBar

I took the original B4XSeekBar code from @Erel and modified it to create a new view.

I spend a lot of time in creating views, some views i need by my self, but some views not and to create a high quality view cost a lot of time. If you want to support me, then you can do it here by Paypal or with a coffee. :)


Author: Alexander Stolte
Version: 1.01

  • ASRangeSeekBar
    • Events:
      • TouchStateChanged (Pressed As Boolean)
      • ValueChanged (Value1 As Int, Value2 As Int)
    • Fields:
      • Interval As Int
      • MaxValue As Int
      • mBase As B4XView
      • MinValue As Int
      • Radius1 As Int
      • Radius2 As Int
      • ReachedLineColor As Int
      • ReachedLineSize As Int
      • Tag As Object
      • ThumbColor As Int
      • UnreachedLineColor As Int
      • UnreachedLineSize As Int
    • Functions:
      • Class_Globals As String
      • DesignerCreateView (Base As Object, Lbl As Label, Props As Map) As String
        Base type must be Object
      • getValue1 As Int
      • getValue2 As Int
      • Initialize (Callback As Object, EventName As String) As String
      • IsInitialized As Boolean
        Tests whether the object has been initialized.
      • setValue1 (v As Int) As String
      • setValue2 (v As Int) As String
      • Update As String
        Redraws the control
    • Properties:
      • Value1 As Int
      • Value2 As Int
  • 1.00
    • Release
  • 1.01
    • BugFix - set Value2 was linked to the wrong variable
Have Fun :)


  • AS RangeSeekBar.zip
    11 KB · Views: 199
  • ASRangeSeekBar.b4xlib
    2.2 KB · Views: 178
Last edited:


Licensed User
Longtime User
There is a bug when I specify the values of value 1 and 2.

    ASRangeSeekBar1.Value1 = 20
    ASRangeSeekBar1.Value2 = 40
    Log(ASRangeSeekBar1.Value1) '40
    Log(ASRangeSeekBar1.Value2) '100

and No function found. setValue~ getValue


  • AS RangeSeekBarTest.zip
    10.6 KB · Views: 121

Alexander Stolte

Licensed User