iOS Question Caos trying to find an alternative to ASViewPager that is CrossPlatform

[EduardoElias]

I am very frustrated on how difficult is to have an app that can work with simple things on both platforms...

The problem, already reported, is that ASViewPager cannot support MapFragment correctly

I am trying to use TabStrip as an alternative. On android it is fine, I can hide the top tabs (I need only the pages with no tab labels)

However on iOS I cant do that apparently. Is there a solution for that ? is there an alternative?

Eventually I could use something else on iOS that works, Is there an option?

Please help ! I am already having a big delay because many of the compatibility issues...

 

[Erel]

iTabStrip and TabStripViewPager are quite similar to each other.

Have you tried to put the TabStrip with its top outside of the page bounds?

Another option is to use SnapCLV (see the code in post #6 for horizontal scrolling) + xCLV.

[B4X] SnapCLV - Move to the nearest item

SnapCLV is a very simple class that adds a "snap" feature to xCLV in vertical mode. When the user stops scrolling the list the list scrolls to the nearest item so the top item will not be partially hidden. It is compatible with B4A, B4i and B4J Note that you need to call snap.ScrollChanged...

www.b4x.com

 

[EduardoElias]

iTabStrip and TabStripViewPager are quite similar to each other.

Have you tried to put the TabStrip with its top outside of the page bounds?

Another option is to use SnapCLV (see the code in post #6 for horizontal scrolling) + xCLV.

[B4X] SnapCLV - Move to the nearest item

SnapCLV is a very simple class that adds a "snap" feature to xCLV in vertical mode. When the user stops scrolling the list the list scrolls to the nearest item so the top item will not be partially hidden. It is compatible with B4A, B4i and B4J Note that you need to call snap.ScrollChanged...

www.b4x.com

My intention is to have a page changer like ASViewPager (MapFragment does not work in it)

TabStrip on android has the Tab Height property that setting to zero totally remove the tabs, so I can use it with wooblemenu.

However on iOs TabStrip there is no such option.

I dont see how SnapCLV would help. I really need a page changer. I have tried to do something by myself on iOS but seems like things behave differently on iOS.

 

[Erel]

I dont see how SnapCLV would help

I was thinking of a horizontal xCLV where each item is set with the same size as the Root panel. SnapCLV is needed to make the pages slide to their place.

 

[Alexander Stolte]

Please take a look and tell me if this works for you. I've tried as best as I can to make it consistent across platforms. With the tabstrip you could unfortunately only add page with "LoadLayout", so I had to switch to the AHViewPager.

B4A:
AHViewPager
B4I:
iTabstrip

 

[Erel]

With the tabstrip you could unfortunately only add page with "LoadLayout"

You can create a layout with a single panel, anchored to all sides, load it for each page, and add other views.

 

[EduardoElias]

Please take a look and tell me if this works for you. I've tried as best as I can to make it consistent across platforms. With the tabstrip you could unfortunately only add page with "LoadLayout", so I had to switch to the AHViewPager.

B4A:
AHViewPager
B4I:
iTabstrip

thank you for your help!

Public Sub AddPages(ListOfPanels As List,Text As String)
    
    #If B4A
    imgLayout.Initialize
    
    For i = 0 To ListOfPanels.Size -1
        
        imgLayout.AddPage(ListOfPanels.Get(i).As(Panel),"")
        
    Next
    
    AHViewPager1.PageContainer = imgLayout
    #Else If B4I
    TabStrip1.SetPages(ListOfPanels)
    TabStrip1.CurrentPage = 0
    #End If
End Sub

on Android it says ViewPager does not have this property:

AHViewPager1.PageContainer = imgLayout

 

[Alexander Stolte]

on Android it says ViewPager does not have this property:

did you have AHViewPager 3.00?

 

[EduardoElias]

did you have AHViewPager 3.00?

I didnt know there is a new version, for some reason is not showing up on the library page, I have downloaded and installed and compiled ok!

question:

Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
    Root.LoadLayout("MainPage")
    
    B4XPages.SetTitle(Me,"ASViewPagerNative Example")
    
    Wait For B4XPage_Resize (Width As Int, Height As Int)
    
    Dim lst As List
    lst.Initialize
    
        
        #If B4A
        Dim xpnl As B4XView = xui.CreatePanel("")
        xpnl.Color = Rnd(xui.Color_Black,xui.Color_White)
        xpnl.SetLayoutAnimated(0,0,0,Root.Width,Root.Height)
        xpnl.LoadLayout("map")
        lst.Add(xpnl)
        #Else If B4I
        Dim page As Page
        page.Initialize("page")
        page.RootPanel.Color = Rnd(xui.Color_Black,xui.Color_White)
        page.RootPanel.As(B4XView).SetLayoutAnimated(0,0,0,Root.Width,Root.Height)
        lst.Add(page)
        #End If
        
    
    ASViewPagerNative1.AddPages(lst,"")

I have changed you example to create one page for now and load a Layout, that is a mapfragment only
The layout is not showing up.

and how can I change the page by code using your ASViewPagerNative?

 

[EduardoElias]

did you have AHViewPager 3.00?

actualy the app gets stuck on this:

Wait For B4XPage_Resize (Width As Int, Height As Int)

I have removed and it created the page (on android)

 

[Alexander Stolte]

and how can I change the page by code using your ASViewPagerNative?

ASViewPagerNative1.CurrentPage = 0

Wait For B4XPage_Resize (Width As Int, Height As Int)

#If B4i
    Wait For B4XPage_Resize (Width As Int, Height As Int)
    #End If

I have to be in the office at 1pm, I have B4A there, but no emulator, so I can't help until 9pm.

 

[EduardoElias]

ASViewPagerNative1.CurrentPage = 0

#If B4i
    Wait For B4XPage_Resize (Width As Int, Height As Int)
    #End If

I have to be in the office at 1pm, I have B4A there, but no emulator, so I can't help until 9pm.

fantastic! it is working just fine on android now ! wow, many thanks for your help, really appreciate it.

Going to test on iOS now

 

[EduardoElias]

ASViewPagerNative1.CurrentPage = 0

#If B4i
    Wait For B4XPage_Resize (Width As Int, Height As Int)
    #End If

I have to be in the office at 1pm, I have B4A there, but no emulator, so I can't help until 9pm.

Hey! we have a winner! Your Native vesion is working fine in both platforms and manage to work with google Maps with no problem!

I greatelly appreciate your help!

 

[Alexander Stolte]

Very good, then I can finish a B4XLib version, I added some features that the native views don't have.

 

[Alexander Stolte]

[B4X] [XUI] AS ViewPagerNative based on AHViewPager and iTabstrip

The goal was to create a cross-platform viewpager based on existing viewpagers. Since AHViewPager and iTabstrip are very different, the view helps to create a unified interface. 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...

www.b4x.com