如何使用`alt + letter`键绑定触发按钮的处理程序？

Question

在各种程序中，您通常可以使用 alt + c 键绑定来激活按钮，例如，如果有问题的按钮是Close。如何在gWidgets2中完成此操作？举个例子：

w <- gwindow("Buttons")
g <- ggroup(cont=w, horizontal=FALSE)

## various buttons

## without icon
b2 <- gbutton("ouvrir", cont=g)

## with a handler
b4 <- gbutton("click me", cont=g, handler=function(h,...) {
    if(svalue(b2) == "open")
        svalue(b2) <- "ouvrir"
    else
        svalue(b2) <- "open"
})

如何在c中加下click me下划线，并在用户激活 alt + c 时激活b4按钮的处理程序？