B4J Question [B4X] B4XTable - Keyboard navigation with Arrow Up and Down?

[vfafou]

Hello!
Is it possible to have keyboard navigation for row selection of B4XTable object, and Enter key for selection confirmation?
Thank you in advance!

 

[Alexander Stolte]

Try this:

Dim r As Reflector
r.Target = B4XTable1.mBase
r.AddEventFilter("et", "javafx.scene.input.KeyEvent.KEY_PRESSED")
r.AddEventFilter("et", "javafx.scene.input.KeyEvent.KEY_RELEASED")

Private Sub et_Filter (EventData As Event)

        Dim jo As JavaObject = EventData
        Dim code As String = jo.RunMethod("getCode", Null)
        Dim EventType As String = jo.RunMethod("getEventType", Null)

        If EventType = "KEY_RELEASED" Then

                If code = "RIGHT" Then
            B4XTable1.CurrentPage = B4XTable1.CurrentPage +1
                Else If code = "LEFT" Then
            B4XTable1.CurrentPage = B4XTable1.CurrentPage -1
                End If
            
        End If
End Sub

 

[vfafou]

Try this:

Dim r As Reflector
r.Target = B4XTable1.mBase
r.AddEventFilter("et", "javafx.scene.input.KeyEvent.KEY_PRESSED")
r.AddEventFilter("et", "javafx.scene.input.KeyEvent.KEY_RELEASED")

Private Sub et_Filter (EventData As Event)

        Dim jo As JavaObject = EventData
        Dim code As String = jo.RunMethod("getCode", Null)
        Dim EventType As String = jo.RunMethod("getEventType", Null)

        If EventType = "KEY_RELEASED" Then

                If code = "RIGHT" Then
            B4XTable1.CurrentPage = B4XTable1.CurrentPage +1
                Else If code = "LEFT" Then
            B4XTable1.CurrentPage = B4XTable1.CurrentPage -1
                End If
           
        End If
End Sub

Thank you very much Alexander!
This is for page change and it's definitely useful too!
I can't find something for row change with up and down arrow keys of the keyboard!

 

[Alexander Stolte]

Oh, did I read wrong ?
Hmm, I don't working with B4XTable, in the property list there are no SelectedIndex or CurrentIndex property. Maybe the owner of this view know a solution for this.

 

[Erel]

B4XTable - keyboard navigation

Example of using a keyboard event filter to add keyboard navigation to B4XTable. It uses B4XTableSelections in permanent single cell mode.

www.b4x.com