user-interface - 在 Racket/GUI 中禁用其父级菜单栏的模式对话框？

Question

1. 使用 racket gui 库，我发现我无法显示一个真正的模式对话框，当它显示时，不可能激活它的父窗口。
2. 虽然对话框会阻塞其父窗口的事件空间，但可以单击父窗口中的菜单栏，从而可以一次又一次地显示同一个对话框。以下是代码:

#lang racket/gui

(define frame (new frame%
                   [label "test"]
                   [width 200]
                   [height 200]))

(define mb (new menu-bar% [parent frame]))

(let ([m (new menu% 
              [parent mb]
              [label "&About"])])
  (new menu-item%
       [parent m]
       [label "&About"]
       [callback (lambda (b e) (message-box "About" "This is a test." frame))])
  )


(send frame show #t)

(p.s 消息框可以弹出对话框 - 与(new dialog% [parent frame])相同)

那么如果我们忽略第一个问题，我们可以显示一个禁用父级菜单栏的模态对话框吗？

另外，在racket/gui中真的不可能做出真正的模态对话框吗？

(我正在使用 Win7)

Answer 1

跟进:是bug，会修复

引用资料:

1. http://lists.racket-lang.org/users/archive/2012-April/051275.html
2. http://git.racket-lang.org/plt/commit/9d563c786a71b621fcd2909c917b49939e0d11b0