gbasicdialog: Stub for a basic dialog

Description Usage Arguments Examples

View source: R/gdialogs.R

Description

There is no gbasicdialog in gWidgetsWWW2. There is a workaround though. In a subwindow pass in the argument ext.args=list(modal=TRUE). This will make the floating subwindow modal. There is not need to call visible – in fact it wont work – but you need to define the window and its child components within a single call back.

Usage

1

Arguments

...

ignored

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
## Not run: 
w <- gwindow("Parent")
b <- gbutton("click", cont=w, handler=function(h,...) {
  w1 <- gwindow("modal subwindow", parent=w, ext.args=list(modal=TRUE))
  g <- ggroup(cont=w1, horizontal=FALSE)
  glabel("Some label", cont=g, expand=TRUE)
  bg <- ggroup(cont=g)
  addSpring(bg)
  gbutton("ok", cont=bg) ## add your own handler
  gbutton("dismiss", cont=bg, handler=function(...) dispose(w1))
})

## End(Not run)

jverzani/gWidgetsWWW2 documentation built on Feb. 9, 2020, 5:18 p.m.