For Unix/X, I've changed `frame%' get keyboard events when no subwindow accepts keyboard focus.
At Thu, 9 May 2013 18:23:21 -0600, Jay McCarthy wrote: > I noticed that when I printed out the result of (send mw has-focus?) > on every printf, it is always #f despite having been called with (send > mw focus) > > On Thu, May 9, 2013 at 6:05 PM, Jay McCarthy <jay.mccar...@gmail.com> wrote: > > In the program below, I never receive on-subwindow-char calls (or any > > of the other calls). (Except when they correspond to mouse events like > > the wheel up events.) Is there some other way that I'm supposed to get > > key events from a top level window? I know I can create a canvas, but > > I'd like to get all the key events. > > > > Jay > > > > #lang racket/gui > > (define key-frame% > > (class* frame% () > > (define/override (on-traverse-char e) > > (printf "on-traverse-char Got ~v\n" e) > > #t) > > (define/override (on-menu-char e) > > (printf "on-menu-char Got ~v\n" e) > > #t) > > (define/override (on-subwindow-char r e) > > (printf "on-subwindow-char Got ~v\n" (send e get-key-code)) > > #t) > > (define/override (on-subwindow-event r e) > > (printf "on-subwindow-event Got ~v\n" e) > > #t) > > (define/override (on-subwindow-focus r e) > > (printf "on-subwindow-focus Got ~v\n" e) > > #t) > > (define/override (on-superwindow-enable on?) > > (printf "on-superwindow-enable Got ~v\n" on?) > > #t) > > (define/override (on-superwindow-show on?) > > (printf "on-superwindow-show Got ~v\n" on?) > > #t) > > (define/override (on-focus on?) > > (printf "on-focus Got ~v\n" on?) > > #t) > > (define/override (on-activate on?) > > (printf "on-activate Got ~v\n" on?) > > #t) > > > > (super-new))) > > > > (define mw (new key-frame% [label "key-frame"])) > > (send mw focus) > > (send mw create-status-line) > > (define label-m > > (new message% [parent mw] > > [label "Message"])) > > (send mw show #t) > > > > -- > > Jay McCarthy <j...@cs.byu.edu> > > Assistant Professor / Brigham Young University > > http://faculty.cs.byu.edu/~jay > > > > "The glory of God is Intelligence" - D&C 93 > > > > -- > Jay McCarthy <j...@cs.byu.edu> > Assistant Professor / Brigham Young University > http://faculty.cs.byu.edu/~jay > > "The glory of God is Intelligence" - D&C 93 > ____________________ > Racket Users list: > http://lists.racket-lang.org/users ____________________ Racket Users list: http://lists.racket-lang.org/users
