Re: Problem with Mouse and F10 key ...
Posted: Thu Mar 28, 2024 10:59 am
Try
Code: Select all
If OpenWindow (1, 10, 10, 800, 600, "Keyboard Functionkey test ...", #PB_Window_SystemMenu)
If OpenWindowedScreen (WindowID (1), 0, 0, 800, 600, 0, 0, 0)
ClearScreen ($FF202020)
KeyboardMode (#PB_Keyboard_Qwerty)
AddKeyboardShortcut(1, #PB_Shortcut_F10, 100)
....
....
....
....
If KeyboardPushed (#PB_Key_F10)
Debug "F10 key - pushed"
SendMessage_(WindowID(1), #WM_COMMAND, 1<<16|100, 0)
EndIf
