Wish xCustomListView - SetVerticalScrollBarEnabled

Public Sub SetVerticalScrollBarEnabled(Enabled As Boolean)
    Dim r As Reflector
    r.Target = sv
    r.RunMethod2("setVerticalScrollBarEnabled", Enabled, "java.lang.boolean")
End Sub

LucaMs said:

I named the routine as the method used but it would be better: SetVerticalScrollBarVisibility.

Click to expand...

LucaMs said:

B4X:

Public Sub SetVerticalScrollBarEnabled(Enabled As Boolean)
    Dim r As Reflector
    r.Target = sv
    r.RunMethod2("setVerticalScrollBarEnabled", Enabled, "java.lang.boolean")
End Sub

Click to expand...

Harris said:

Is this the way it works - or you wish to make it work this way?

Click to expand...

LucaMs said:

I'm suggesting to add the method I posted.

Its name confuses; it does not lock the scrollbar but set it to visible/invisible.
I named the routine as the method used but it would be better: SetVerticalScrollBarVisibility.

Click to expand...

LucaMs said:

Its name confuses; it does not lock the scrollbar but set it to visible/invisible.

Click to expand...

Harris said:

But why? Is the handle bar so intrusive? One only sees it when one scrolls...

I am missing something here obviously - yet curious.

Click to expand...

Erel said:

Why are you using Reflector?

Click to expand...

LucaMs said:

I just searched and the first piece of code I found

Click to expand...