For example, in this program you cannot tab through the fields unless you comment out 'RemoveKeyboardShortcut(0, #PB_Shortcut_All)':
Code: Select all
If OpenWindow(0, 0, 0, 305, 240, "Shortcut Tab Test", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
StringGadget(1,100,30,80,20,"1")
StringGadget(2,100,60,80,20,"2")
StringGadget(3,100,90,80,20,"3")
SetActiveGadget(1)
RemoveKeyboardShortcut(0, #PB_Shortcut_All)
Repeat
giWindowEvent = WaitWindowEvent()
Until giWindowEvent = #PB_Event_CloseWindow
EndIf