Android SlidingPanels - Simple way to create sliding layouts

[Erel]

Sliding layouts are cool.

Using the Animation library it is not difficult to animate single views and panels that hold other views.
The following code module and example project makes it even simpler to create a layout that is made of a number of panels. Whenever the current visible panel is changed, the current panel slides out and the new panel slides in.
As Panels can load layout files, you can create complex layouts by loading a layout file to each panel.



The project is made of two components. The Main activity and the SlidingPanels code module.
You should add the SlidingPanels code module to your project and add a reference to the Animation library.

The main activity code is commented and explains the several integration points required.

Animations look much better on real devices than on the slow emulator.
Even if you are not interested in sliding layouts it is recommended to go over the code. It demonstrates the power of custom types which enable you to easily group many objects.
As code modules cannot hold references to Activity objects (like views), the calling activity passes the type with all the required data each time it calls a method (passing the data is done by passing a single pointer, there is no overhead here).

Questions and comments are always welcomed.

[susu]

It will be great if we can slide by touching screen directly

[Erel]

That's not hard at all.
Just add the following code to the Main activity (replace the existing Sub Globals):

Sub Globals
    Dim sd As SlidingData 'The object that holds the for SlidingPanels
    Dim btnLeft, btnRight As Button
    Dim startX, startY As Float '<-new global variables
End Sub

Sub Panels_Touch (Action As Int, X As Float, Y As Float)
    Select Action
        Case Activity.ACTION_DOWN
            startX = X
            startY = Y
        Case Activity.ACTION_UP
            If Abs(y - startY) > 20%y Then Return
            If X - startX > 30%x AND btnRight.Enabled = True Then 
                ChangePanel(False)
            Else If startX - x > 30%x AND btnLeft.Enabled = True Then
                ChangePanel(True)
            End If
    End Select
End Sub

[susu]

It's really smooth! Thanks Erel

[metrick]

Thanks Erel..Nice.
Can the panel contains very long text and scrollable?

[Erel]

Can the panel contains very long text and scrollable?

Not sure how it is related to the sliding panels framework. However you can put an EditText on the panel. Set it to be a multiline EditText and set WordWrap to true.

[metrick]

Erel:
I have created a menu of all panels in ListView, how can I link from ListView directly to panels number based on position of the ListView. eg. If I click on ListView position seven I want panel number seven to show. Thanks in advance.

[Erel]

I've updated the first post with a new version of SlidingPanels. It includes a JumpToPanel method that allows you to navigate to any panel. Press on the menu button to see an example.

[gobblegob]

This is awesome! Fantastic work Erel!

cheers Waz

[metrick]

Thanks, Erel. Its work great!