Wish Android-ObservableScrollView

[rscheel]

If this could be implemented in b4a would be spectacular, it would give another look to our apps, If someone could create a library would be great, thanks.

https://github.com/ksoichiro/Android-ObservableScrollView

 

[wimpie3]

+1 ABSOLUTELY!

 

[Douglas Farias]

+1

 

[Star-Dust]

This ?

Only 4 rows of code. Is simple, non library required

 

[Alexander Stolte]

This ?

yes

 

[Star-Dust]

Se e this https://www.b4x.com/android/forum/threads/how-make-this-effects.82292/#post-522043

 

[Star-Dust]

private Sub MyScroll_ScrollChanged(Position As Int)
    Dim Pos As Int = Max(MyTitleFull.Height-Position,MyTitleReduce.Height)
    MyScroll.Top=Pos
    MyTitleFull.Top=Pos-MyTitleFull.Height
   ' MyTitleReduced si under MyTitleFull
    If Pos=MyTitleReduce.Height Then
        MyTitleFull.SetVisibleAnimated(1000,False)
    Else
        MyTitleFull.SetVisibleAnimated(400,True)
    End If

End Sub