ExamineKeyboard() & ScintillaGadget
Posted: Thu Nov 27, 2014 7:39 pm
On Windows this code works fine but on OSX I am not able to input text in the Scintilla gadget - unless I remove the call to ExamineKeyboard().
Code: Select all
Procedure ScintillaCallBack(Gadget, *n.SCNotification)
EndProcedure
OpenWindow(0, 0, 0, 600, 500, "OSX Bug?")
InitSprite()
InitKeyboard()
OpenWindowedScreen(WindowID(0), 0, 0, 1, 1)
InitScintilla()
ScintillaGadget(0, 0, 0, WindowWidth(0), WindowHeight(0), @ScintillaCallBack())
Repeat
Repeat
event = WindowEvent()
If event = #PB_Event_CloseWindow
End
EndIf
Until event = 0
FlipBuffers()
ExamineKeyboard()
ForEver