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
- Specifies the image position relative to the message text: n,
s, e, or w. The default is w.
Name: textPadX
Class: Pad
Command-Line Switch: -textpadx
- Specifies a non-negative value indicating how much extra space to request
for the message text in the X direction. The value may have any of the
forms acceptable to Tk_GetPixels.
Name: textPadY
Class: Pad
Command-Line Switch: -textpady
- Specifies a non-negative value indicating how much extra space to request
for the message text in the X direction. The value may have any of the
forms acceptable to Tk_GetPixels.
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.
- pathName
cget option
- Returns the current value of the configuration option given by
option. Option may have any of the values accepted by the
iwidgets::messagedialog command.
- pathName
configure ?option? ?value option value ...?
- Query or modify the configuration options of the widget. If no
option is specified, returns a list describing all of the available
options for pathName (see Tk_ConfigureInfo for information
on the format of this list). If option is specified with no
value, then the command returns a list describing the one named
option (this list will be identical to the corresponding sublist of the
value returned if no option is specified). If one or more
option-value pairs are specified, then the command modifies the
given widget option(s) to have the given value(s); in this case the
command returns an empty string. Option may have any of the values
accepted by the iwidgets::messagedialog command.
Name: image
Class: Label
- The image component is the bitmap or image of the message dialog. See the
"label" widget manual entry for details on the image component
item.
Name: message
Class: Label
- The message component provides the textual portion of the message dialog.
See the "label" widget manual entry for details on the message
component item.
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"
messagedialog, dialog, dialogshell, shell, widget