Example

This pair of event procedures change Reflection's title bar to reflect the current keyboard state.

Private Sub Session_KeyboardEnabled()

 Session.Caption = "Keyboard is enabled"

End Sub

 

Private Sub Session_KeyboardLocked()

 Session.Caption = "Keyboard is locked"

End Sub