background cursor foreground
See the "options" manual entry for details on the standard options.
buttonBoxPadX buttonBoxPadY buttonBoxPos padX
padY separator thickness
See the "dialogshell" manual entry for details on the above inherited options.
master modality title
See the "shell" manual entry for details on the above inherited options.
The dialog command creates a dialog box providing standard buttons and a child site for use in derived classes. The buttons include ok, apply, cancel, and help. Methods and Options exist to configure the buttons and their containing box.
The dialog 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 dialog widgets:
add buttonconfigure default hide
index insert invoke show
See the "buttonbox" manual entry for details on the above inherited methods.
childsite
See the "dialogshell" manual entry for details on the above inherited methods.
activate center deactivate
See the "shell" manual entry for details on the above inherited methods.
dialog .d -modality global
.d buttonconfigure OK -command {puts OK; .d deactivate 1}
.d buttonconfigure Apply -command {puts Apply}
.d buttonconfigure Cancel -command {puts Cancel; .d deactivate 0}
.d buttonconfigure Help -command {puts Help}
listbox [.d childsite].lb -relief sunken
pack [.d childsite].lb -expand yes -fill both
if {[.d activate]} {
puts "Exit via OK button"
} else {
puts "Exit via Cancel button"
}
Bret A. Schuhmacher