B4A Library [B4X] [XUI] AS ViewPager based on xCustomListView

Alexander Stolte · Apr 22, 2020

Hey,
thanks to @KZero for his good zPager class, i was able to extract a few things from it to make this cross platform 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.

This library is compatible and tested with B4A,B4I and B4J!
If you have bugs or a wish then tell me it in the comments.

On B4J use the LEFT and RIGHT keys on your keyboard to change the page.
~~On B4I you need the GestureRecognizer class. Download it down below.~~

B4j: jXUI,JavaObject,jPager,jReflection
B4a: XUi,Reflection,xCustomListView
B4i: iXUI,xCustomListView

Features

cross-platform compatible
based on a cross-platform ListView
add and remove pages
scroll to pages
a good swipe feeling
NEW - Vertical
NEW - Carousel
NEW - Lazy Loading

Horizontal and Vertical

B4A Carousel and B4I Carousel

ASViewPager
Author: Alexander Stolte
Version: 2.00

ASViewPager
- Events:
  - LazyLoadingAddContent (Parent As B4XView, Value As Object)
  - PageChange (Index As Int)
  - PageChanged (Index As Int)
  - PageClick (Index As Int, Value As Object)
  - ReachEnd
  - ScrollChanged (Offset As Int)
  - TouchBegin
  - TouchEnd
- Fields:
  - Tag As Object
- Functions:
  - AddPage (xpnl_layout As B4XView, value As Object) As String
  - AddPageAt (index As Int, xpnl_layout As B4XView, value As Object) As String
    Adds an page at a special position
  - Base_Resize (Width As Double, Height As Double) As String
  - Class_Globals As String
  - Clear As String
  - DesignerCreateView (Base As Object, Lbl As Label, Props As Map) As String
    Base type must be Object
  - getBase As B4XView
  - getCurrentIndex As Int
  - getCustomListView As b4a.example3.customlistview
  - getisScrollEnabled As Boolean
    Checks if the swipe/scroll is enabled or disabled
  - getSize As Int
  - Initialize (Callback As Object, EventName As String) As String
  - IsInitialized As Boolean
    Tests whether the object has been initialized.
  - NextPage As String
  - NextPage2 As String
    Jump to next page
  - PreviousPage As String
  - PreviousPage2 As String
    jump to previous page
  - RemovePage (index As Int) As String
  - Scroll2Value (Value As String) As String
    sets the current index by the value - smooth scrolls to the item
  - Scroll2Value2 (Value As String) As String
    sets the current index by the value - jumps to the item
  - setCurrentIndex (index As Int) As String
  - setCurrentIndex2 (index As Int) As String
    sets the current index - jumps to the item
  - setIgnorePageChangedEvent (ignore As Boolean) As String
  - setIgnorePageChangeEvent (ignore As Boolean) As String
  - setScroll (enabled As Boolean) As String
    B4I and B4A only
    enabled - False the scroll is deactivated
- Properties:
  - Base As B4XView [read only]
  - CurrentIndex As Int
  - CurrentIndex2
    sets the current index - jumps to the item
  - CustomListView As b4a.example3.customlistview [read only]
  - IgnorePageChangedEvent
  - IgnorePageChangeEvent
  - isScrollEnabled As Boolean [read only]
    Checks if the swipe/scroll is enabled or disabled
  - Scroll
    B4I and B4A only
    enabled - False the scroll is deactivated
  - Size As Int [read only]

Changelog

1.00
- Release
1.01
- Base_Resize is now public
- NextPage and PreviousPage Bug Fix
- setCurrentIndex Bug Fix
- PageChangeEvent Bug Fix
1.02
- B4I Bug Fixes
- NextPage and PreviousPage Bug Fix
1.03
- Resize BugFix
1.04
- B4I Page-Height BugFix
- B4I Page-Swipe BugFix
1.05
- BugFix
1.06
- Add Designer Property "Orientation" - Vertical is now supported
1.07
- BugFix getCurrentIndex
- BugFix PageChanged event is now only firing if the index is changed
- Add setIgnorePageChangedEvent Property
- Add TouchBegin Event
- Add TouchEnd Event
- BugFix PageChanged is now firing if you press on a emulator, for example the arrow up or down keys on yor keyboard
1.08
- Add Tag Property
  - https://www.b4x.com/android/forum/t...om-clv-or-any-other-container.117992/#content
- Add Clear - clears the list and sets the index to 0
- BugFix xCustomListview Top was always 0
1.09
- B4I BugFixes for Release Mode - swiping is now better
1.10
- Add AddPageAt (experimental it works for my need, if you have issuses, then tell me) - Adds an page at a special position
- Add set CurrentIndex2 - sets the current index - jumps to the item
- Better resize handling
1.11
- RemovePage Bugfixes
- B4J ScrollPane under the hood is now Transparent
- Add NextPage2 -Jump to next page
- Add PrevoiusPage2 - Jump to previous page
1.12
- [BETA] Add DesignerProperty Carousel - infinite swipe
  - On B4I Bounce Effect is disabled
- B4I ScrollView Paging is now activated, this can improve the handling
1.13
- Add PageClick Event
1.14 - read more about this update here
- [B4I only] Add Scroll - enable or disable scroll with finger
  - ASViewPager1.Scroll(False)'disable scroll with finger
1.15
- Intern Function IIF renamed to iif2
1.16
- set Scroll is now B4X - disable the swipe/scroll
  - In B4J the arrow keys (Left/Right/Up/Down) are disabled if you deactivate the swipe/scroll
- New property isScrollEnabled - checks if the swipe/scroll is enabled or disabled
- Intern Function iif2 removed and the core iif is now used
  - B4A V11+ - B4J V9.10+ - B4I V7.50+
1.18
- PageChanged Event is now firing in some cases with a delay, because of a scroll animation
- BugFix B4A setScroll - Events from other views are now no longer blocked
1.19
- BugFix on NextPage and PreviousPage
1.20 (read more about this update)
- Add Event PageChange - This event is triggered immediately after the page is changed, no delay because of animations
- Add setIgnorePageChangeEvent - prevents the PageChange event from being triggered
1.21
- BugFixes
1.22
- B4I Scroll = False BugFix
1.24
- BugFix AddPageAt is now working better on B4A
1.25
- Add Scroll2Value - sets the current index by the value - smooth scrolls to the item
  - from the AddPage and AddPageAt function the "Value" property
  - must be a string to be found
- Add Scroll2Value2 - sets the current index by the value - jump to the item
1.26 (read more about this update)
- Add Designer Property LazyLoading - activates lazy loading
  - Default: False
- Add Designer Property LazyLoadingExtraSize - How many pages to load in advance
  - Default: 5
- Add Event LazyLoadingAddContent - Add here your layout or views
1.27
- Add get and set LazyLoadingExtraSize
1.28
- Important LazyLoading improvments
1.29
- Add Commit - Triggers the LazyLoadingAddContent event
  - Call this after you have filled the list
- LazyLoading BugFixes
1.30
- Add ResetLazyloadingIndex - when you call "commit" afterwards, it is guaranteed to check if there are empty panels in the lazy loading range, if so, the LazyLoading event is triggered
1.31
- important resize improvments
- Add Loading Panel if Base_Resize is calling
- Add Designer Property LoadingPanelColor
- Add set IgnoreLazyLoading - If True, the Lazy Loading event is not triggered
- Add ResetLazyLoadingPanels - Removes all child views from all visible pages
- LazyLoading Improvments
1.32
- Carousel works now in Vertical mode
1.33
- B4I Native paging is now used
  - The paging feels smoother now
  - In debug mode, the swiping should now also run better
1.34
- B4I The GestureRecognizer is no longer needed
1.35 (read more)
- Add Designer Property BackGestureGap - Only for B4I. If you use the ViewPager on a 2nd page and still want to close the page with the swipe gesture then set the checkbox to true
  - Default: False
2.00 (read more)
- New dependency in B4J: jPager
- Removed dependency in B4J: xCustomListView
- Add GetPanel
- Add GetValue
- In B4J, the jPager is now used instead of the xCustomListView
  - Better performance
  - No more unwanted scrolling with the mouse
2.01
- BugFixes and Improvements
- Add Event PageChanged2
2.02
- Add set LoadingPanelHideDuration - The duration of how quickly the loading panel is hidden
  - Default: 500
2.03
- B4I BugFix - Prevents vertical scrolling when in horizontal mode and vice versa
2.04
- B4I BugFix - The safe area is no longer observed
  - Fixes unwanted behavior when the viewpager is in the safe area
2.05
- BugFix - by setting the set CurrentIndex or set CurrentIndex2, the PageChange and PageChanged event have been triggered multiple times
2.06
- B4A BugFix
2.07
- B4I BugFix

Have Fun

Alexander Stolte · Mar 26, 2022

Blueforcer said:
but between Last and First Page and vice versa its a instant screenjump instead of scrolling, is this correct?

Thats correct, because its not possible to get to the first page from the last page, without scroll back to the other pages. And if I used smooth scroll, you would always see that you are thrown back.

Blueforcer said:
it does not work in vertical mode.

i'll check

Alexander Stolte · Mar 26, 2022

Update

1.32
- Carousel works now in Vertical mode

Alexander Stolte · Mar 30, 2022

Update

1.33
- B4I Native paging is now used
  - The paging feels smoother now
  - In debug mode, the swiping should now also run better

Swiping feels much better now in B4I

I have tested the changes in ASScheduler and ASCalendarAdvanced and have not seen any bugs related to the new paging.

Alessandro71 · Mar 30, 2022

Alexander Stolte said:
Update

1.33

B4I Native paging is now used

The paging feels smoother now

In debug mode, the swiping should now also run better

Swiping feels much better now in B4I

does this mean that GestureRecognizer is not needed anymore?

Alexander Stolte · Mar 30, 2022

Alessandro71 said:
does this mean that GestureRecognizer is not needed anymore?

Haha, no

I was looking forward to it, but then I saw that I have 2 events (TouchDown and TouchUp) and 1 function (Carousel) that only work with gestures...
But maybe I'll manage to put the functions I need into the class of GestureRecognizer. I had tried that before, but it never worked.

Alexander Stolte · Mar 30, 2022

Update

1.34
- B4I The GestureRecognizer is no longer needed

Alessandro71 said:
does this mean that GestureRecognizer is not needed anymore?

Now you don't need the GestureRecognizer anymore

asales · Mar 30, 2022

Alexander Stolte said:
but it never worked.

and some minutes after... you figure out.
Good job!

Alexander Stolte · Mar 31, 2022

asales said:
and some minutes after... you figure out

In fact, it only took 30 minutes. It had itched in the fingers

asales said:
Good job!

Thanks

Alessandro71 · Mar 31, 2022

Alexander Stolte said:
Update

1.31

Add Designer Property LoadingPanelColor

how do I revert to the old behavior?
while on B4A, I get a nice fade-in effect, from black to the actual layout, on B4i the effect is not so pleasant: the full layout appears immediately and the goes black and fades in again
as a workaround I set LoadingPanelColor to Transparent

Alexander Stolte · Mar 31, 2022

Alessandro71 said:
as a workaround I set LoadingPanelColor to Transparent

This is the solution for that.

I will still look at what it could be, I use that in ASScheduler and ASCalendarAdvanced and in B4I I have there also the beautiful effect.

Alexander Stolte · Mar 31, 2022

The loading panel is shown when the Base_Resize event is triggered, when the ViewPager is loaded the panel is shown until the Base_Resize event is triggered the 1st time.

In B4A this will happen only 1 time automatically, because there is no B4XPage_Resize event where the page is resized, unless you resize the view in the code.

Since I don't know how you integrated the ASViewPager into your project it's hard to say, I would guess that the Base_Resize event is triggered several times.

Alessandro71 · Mar 31, 2022

Same code in B4A and B4i: no explicit calls to Base_Resize
I think it’s called by the system after LoadLayout

Alexander Stolte · Mar 31, 2022

Sorry, I can't reproduce it.

angel_ · Apr 4, 2022

I have updated to the latest version (was v1.24 before) and loading the views shows a black screen for a short time, it happens in B4A and B4i.

Alexander Stolte · Apr 4, 2022

angel_ said:
I have updated to the latest version (was v1.24 before) and loading the views shows a black screen for a short time, it happens in B4A and B4i.

10 versions. Thats hard
Yes this is a deliberate behavior, the black should be smooth when disappearing. If you want it to hide completely, just set the "LoadingPanelColor" property in the designer to transparent.

pliroforikos · Oct 25, 2022

Hello
I'm trying to use viewpager with one view in more than 1 pager.
I only get items in last page.
I need a help please to show a clv to more than 1 pages.

B4X:

'This event will be called once, before the page becomes visible.
Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
    Root.LoadLayout("frm_main")
    For i = 0 To 3
        xpnl = xui.CreatePanel("")
        xpnl.SetLayoutAnimated(0,0,0,ASViewPager1.Base.Width,ASViewPager1.Base.Height)
        xpnl.LoadLayout("list")
        ASViewPager1.AddPage(xpnl,i +1)
'        Label1.Text = "View " & i
    Next
    B4XPages.SetTitle(Me,"ASViewPager Example | Page " & 1 & "/" & ASViewPager1.Size)
End Sub


Sub ASViewPager1_PageChanged (index As Int)
    Log("PageChanged: " & index)
    B4XPages.SetTitle(Me,"ASViewPager Example | Page " & (index +1) & "/" & ASViewPager1.Size)
    CustomListView1.clear

    If index = 0 Then
        For i = 1 To 20
            CustomListView1.AddTextItem($"Item #${i}"$, $"Item #${i}"$)
        Next
    else if index = 1 Then
        For i = 21 To 40
            CustomListView1.AddTextItem($"Item #${i}"$, $"Item #${i}"$)
        Next
    else if index = 2 Then
        For i = 41 To 60
            CustomListView1.AddTextItem($"Item #${i}"$, $"Item #${i}"$)
        Next
    else if index = 3 Then
        For i = 61 To 80
            CustomListView1.AddTextItem($"Item #${i}"$, $"Item #${i}"$)
        Next
    End If
End Sub

Alexander Stolte · Oct 25, 2022

I don't understand, please make a new thread for such questions...

Alessandro71 · Dec 6, 2022

Is there any option to dynamically hide/unhide pages?
Example: I have 4 pages
page1
page2
page3
page4

page 3 should be displayed based on an external condition
using Remove/Add on pages will also change the index of page4, so i'm looking for something that would not change the underlaying structure

Alexander Stolte · Dec 22, 2022

Update

1.35
- Add Designer Property BackGestureGap - Only for B4I. If you use the ViewPager on a 2nd page and still want to close the page with the swipe gesture then set the checkbox to true
  - Default: False

If the property is set to true, then you can use the native back gesture of ios again to switch to the previous page. I just place an invisible panel 30dip on the left side, so the swipe gesture from the gesture recognizer is no longer used on this area and the native back gesture can be used again.

Alexander Stolte · Feb 18, 2023

Update

2.00
- New dependency in B4J: jPager
- Removed dependency in B4J: xCustomListView
- Add GetPanel
- Add GetValue
- In B4J, the jPager is now used instead of the xCustomListView
  - Better performance
  - No more unwanted scrolling with the mouse

jPager

jPager - ViewPager

This is a high performance pager, optimized for large lists. No flickering or other unwanted behavior when changing index in large lists. Page change via arrow keys on the keyboard, or with the NextPage/PreviousPage function. I spend a lot of time in creating views, some views i need by my...

www.b4x.com

The xCustomListview was not good enough for desktop use, it often gave me a stomach ache. So I decided to develop a custom pager for the AS_ViewPager for B4J.
Switching between pages is done with the Arrow keys, or with the functions: NextPage/PreviousPage

B4A Library [B4X] [XUI] AS ViewPager based on xCustomListView

Attachments

Expert

Expert

Expert

Well-Known Member

Expert

Expert

Expert

Expert

Well-Known Member

Expert

Expert

Well-Known Member

Expert

Well-Known Member

Expert

Active Member

Attachments

Expert

Well-Known Member

Expert

Expert

Similar Threads

Privacy & Transparency

Privacy & Transparency