B4J Question B4J keyboard shortcuts: how to combine KeyPressedListener and Menu ?

peacemaker · Friday at 8:53 AM

Hi, All

Happy NY 2025 !

When i use CTRL and SHIFT with KeyPressedListener - shortcuts of the Menu (Ctrl+O, Ctrl+N - "javafx.scene.input.KeyCombination") stopped to work (initially were OK).
KeyPressedListener is used on several B4XPages, i have to syncronize the states from other pages to Main:

B4X:

Private Sub KeyPressed_Event(e As Event)
    Dim KE As Reflector
    KE.Target = e 'e is a KeyEvent instance
    Dim KeyCode As String = KE.RunMethod("getCode")
    Dim EventType As String = KE.RunMethod("getEventType")
 
 
    Select EventType
   ...
    End Select
    Main.KEY_CTRL_PRESSED = KEY_CTRL_PRESSED
    Main.KEY_SHIFT_PRESSED = KEY_SHIFT_PRESSED
    e.Consume
End Sub

Possible to combine working Menu and pages?

peacemaker · Friday at 9:35 AM

peacemaker said:
e.Consume

Solved: if not to consume - all is combined OK

aeric · Friday at 9:14 AM

I have seen some similar posts before.
Here are some results.
https://www.b4x.com/android/forum/threads/b4xpages-key-event-key_pressed-and-key_released.137237/
https://www.b4x.com/android/forum/threads/keyboard-event-detect-ctrl-x-or-etc.132742/
https://www.b4x.com/android/forum/threads/about-menuitem-shortcut.79679/

peacemaker · Friday at 9:23 AM

aeric said:
About MenuItem Shortcut

Assign just "F1" key, without any Modifier, to a MenuItem, it will not fire any event. Unless handle by code the KeyEvent. Even setting all the modifiers to "Ignore"(ref. KeyCombination: getName) that will set all the modifier state as "ANY". At least on my pc, win7 - jdk1.8.0_131 - B4J v5.51...

www.b4x.com

Thanks, Aeric, but only this one of 2018 is similar, where Erel offered just workaround (Menu's calls are processed in KeyPressedListener).
Maybe any other way in 2025 and Java 19 ?

So, it needs to combine working of this code and KeyPressedListener:

B4X:

    'Set a shortcut key for this menu item
    'Returns the menu item
Public Sub SetShortCutKey(MI As JavaObject,Combination() As String) As MenuItem
    Dim KC As JavaObject
    KC.InitializeStatic("javafx.scene.input.KeyCombination")
    Dim KCS As String
    For i = 0 To Combination.Length - 1
        If i > 0 Then KCS = KCS & "+"
        KCS = KCS & Combination(i)
    Next
    MI.RunMethod("setAccelerator",Array(KC.RunMethod("keyCombination",Array(KCS))))
    Return MI
End Sub

Or is it impossible ?

aeric · Friday at 9:27 AM

peacemaker said:
Thanks, Aeric, but only this one of 2018 is similar, where Erel offered just workaround (Menu's calls are processed in KeyPressedListener).
Maybe any other way in 2025 and Java 19 ?

So, it needs to combine working of this code and KeyPressedListener:

B4X:

'Set a shortcut key for this menu item 'Returns the menu item Public Sub SetShortCutKey(MI As JavaObject,Combination() As String) As MenuItem Dim KC As JavaObject KC.InitializeStatic("javafx.scene.input.KeyCombination") Dim KCS As String For i = 0 To Combination.Length - 1 If i > 0 Then KCS = KCS & "+" KCS = KCS & Combination(i) Next MI.RunMethod("setAccelerator",Array(KC.RunMethod("keyCombination",Array(KCS)))) Return MI End Sub

Or is it impossible ?

You mean the code works in Java below 19 and not in Java 19?

peacemaker · Friday at 9:29 AM

aeric said:
You mean the code works in Java below 19 and not in Java 19?

No, your found post was about old Java version and workaround.
Now all is more modern, but how to combine Menu and KeyboardListener ?

peacemaker · Friday at 9:32 AM

Or "keyCombination" does not work together with _Filter ?

peacemaker · Friday at 9:35 AM

peacemaker said:
e.Consume

Solved: if not to consume - all is combined OK

B4J Question B4J keyboard shortcuts: how to combine KeyPressedListener and Menu ?

peacemaker

Expert

peacemaker

aeric

Expert

peacemaker

Expert

About MenuItem Shortcut

aeric

Expert

peacemaker

Expert

peacemaker

Expert

peacemaker

Expert

Similar Threads

B4J Question B4J keyboard shortcuts: how to combine KeyPressedListener and Menu ?

Expert

Expert

Expert

Expert

Expert

Expert

Expert

Similar Threads

Privacy & Transparency

Privacy & Transparency