iwidgets::messagedialog(1) | [incr Widgets] | iwidgets::messagedialog(1) |
iwidgets::messagedialog - Create and manipulate a message dialog widget
iwidgets::messagedialog pathName ?options?
itk::Toplevel <- iwidgets::Shell <- iwidgets::Dialogshell <- iwidgets::Dialog <- iwidgets::Messagedialog
background bitmap cursor font foreground image text
See the "options" manual entry for details on the standard options.
buttonBoxPadX buttonBoxPadY buttonBoxPos padX padY separator thickness
See the "dialogshell" widget manual entry for details on the above inherited options.
master modality
See the "shell" widget manual entry for details on the above inherited options.
title
See the "Toplevel" widget manual entry for details on the above inherited options.
Name: imagePos Class: Position Command-Line Switch: -imagepos
Name: textPadX Class: Pad Command-Line Switch: -textpadx
Name: textPadY Class: Pad Command-Line Switch: -textpady
The iwidgets::messagedialog command creates a message dialog composite widget. The messagedialog is derived from the Dialog class and is composed of an image and associated message text with commands to manipulate the dialog buttons.
The iwidgets::messagedialog command creates a new Tcl command whose name is pathName. This command may be used to invoke various operations on the widget. It has the following general form:
pathName option ?arg arg ...?
Option and the args determine the exact behavior of the command. The following commands are possible for messagedialog widgets:
add buttonconfigure default hide insert invoke show
See the "buttonbox" widget manual entry for details on the above inherited methods.
childsite
See the "dialogshell" widget manual entry for details on the above inherited methods.
activate center deactivate
See the "dialogshell" widget manual entry for details on the above inherited methods.
Name: image Class: Label
Name: message Class: Label
package require Iwidgets 4.0 # # Standard question message dialog used for confirmation. # iwidgets::messagedialog .md -title "Message Dialog" -text "Are you sure ?" \ -bitmap questhead -modality global .md buttonconfigure OK -text Yes .md buttonconfigure Cancel -text No if {[.md activate]} { .md configure -text "Are you really sure ?" if {[.md activate]} { puts stdout "Yes" } else { puts stdout "No" } } else { puts stdout "No" } destroy .md # # Copyright notice with automatic deactivation. # iwidgets::messagedialog .cr -title "Copyright" -bitmap @dsc.xbm -imagepos n \ -text "Copyright 1995 DSC Communications Corporation\n \ All rights reserved" .cr hide Cancel .cr activate after 10000 ".cr deactivate"
Mark L. Ulferts
messagedialog, dialog, dialogshell, shell, widget
Tk |