background |
cursor |
foreground |
See the "options" manual entry for details on the standard options.
buttonBoxPadX padY |
buttonBoxPadY separator |
buttonBoxPos thickness |
padX |
See the "dialogshell" manual entry for details on the above inherited options.
height |
master |
modality |
width |
See the "shell" manual entry for details on the above inherited options.
title |
See the "Toplevel" 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 index |
buttonconfigure insert |
default invoke |
hide 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