dlg_message.tcltkGUI {svDialogstcltk} | R Documentation |
A Tcl/Tk version of the svDialogs message box
## S3 method for class 'tcltkGUI'
dlg_message(
message,
type = c("ok", "okcancel", "yesno", "yesnocancel"),
...,
gui = .GUI
)
message |
The message to display in the dialog box. |
type |
The type of dialog box: |
... |
Not used yet. |
gui |
The 'gui' object concerned by this dialog box. |
The button pressed by the user.
library(svDialogstcltk) # Tcl/Tk dialog boxes are now used by default
## Not run:
# A simple information box
dlg_message("Hello world!")$res
# Ask to continue
dlg_message(c("This is a long task!", "Continue?"), "okcancel")$res
# Ask a question
dlg_message("Do you like apples?", "yesno")$res
# Idem, but one can interrupt too
res <- dlg_message("Do you like oranges?", "yesnocancel")$res
if (res == "cancel")
cat("Ah, ah! You refuse to answer!\n")
## End(Not run)