summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2004-06-21 14:19:38 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2004-06-21 14:19:38 (GMT)
commitf3e2946fd89fe5577b128af95756bd815b830a4d (patch)
tree720b2670714e31cfc8ad6bcbcce8ad71a3b281b2
parent803c90ca3f790775351db3072ae5e57fe8d1beb7 (diff)
downloadtk-f3e2946fd89fe5577b128af95756bd815b830a4d.zip
tk-f3e2946fd89fe5577b128af95756bd815b830a4d.tar.gz
tk-f3e2946fd89fe5577b128af95756bd815b830a4d.tar.bz2
Added example
-rw-r--r--doc/chooseDirectory.n18
-rw-r--r--doc/destroy.n15
-rw-r--r--doc/dialog.n10
3 files changed, 34 insertions, 9 deletions
diff --git a/doc/chooseDirectory.n b/doc/chooseDirectory.n
index 42bf636..ad9cf75 100644
--- a/doc/chooseDirectory.n
+++ b/doc/chooseDirectory.n
@@ -2,7 +2,7 @@
'\" Copyright (c) 1998-2000 by Scriptics Corporation.
'\" All rights reserved.
'\"
-'\" RCS: @(#) $Id: chooseDirectory.n,v 1.1 2000/01/27 00:23:10 ericm Exp $
+'\" RCS: @(#) $Id: chooseDirectory.n,v 1.2 2004/06/21 14:19:38 dkf Exp $
'\"
.so man.macros
.TH tk_chooseDirectory n 8.3 Tk "Tk Built-In Commands"
@@ -43,10 +43,18 @@ option is not specified, then a default title will be displayed.
Specifies whether the user may specify non-existant directories. If
this parameter is true, then the user may only select directories that
already exist. The default value is \fIfalse\fR.
-.LP
+.SH EXAMPLE
+.CS
+set dir [tk_chooseDirectory \\
+ \-initialdir ~ \-title "Choose a directory"]
+if {$dir eq ""} {
+ label .l -text "No directory selected"
+} else {
+ label .l -text "Selected $dir"
+}
+.CE
.SH "SEE ALSO"
-tk_getOpenFile, tk_getSaveFile
-
+tk_getOpenFile(n), tk_getSaveFile(n)
.SH KEYWORDS
-directory selection dialog
+directory, selection, dialog, platform-specific
diff --git a/doc/destroy.n b/doc/destroy.n
index e2cde3d..ce01326 100644
--- a/doc/destroy.n
+++ b/doc/destroy.n
@@ -5,7 +5,7 @@
'\" See the file "license.terms" for information on usage and redistribution
'\" of this file, and for a DISCLAIMER OF ALL WARRANTIES.
'\"
-'\" RCS: @(#) $Id: destroy.n,v 1.2 1998/09/14 18:22:55 stanton Exp $
+'\" RCS: @(#) $Id: destroy.n,v 1.3 2004/06/21 14:24:04 dkf Exp $
'\"
.so man.macros
.TH destroy n "" Tk "Tk Built-In Commands"
@@ -18,7 +18,6 @@ destroy \- Destroy one or more windows
.BE
.SH DESCRIPTION
-.VS
.PP
This command deletes the windows given by the
\fIwindow\fR arguments, plus all of their descendants.
@@ -28,7 +27,17 @@ The \fIwindow\fRs are destroyed in order, and if an error occurs
in destroying a window the command aborts without destroying the
remaining windows.
No error is returned if \fIwindow\fR does not exist.
-.VE
+.SH EXAMPLE
+Destroy all checkbuttons that are direct children of the given widget:
+.CS
+proc killCheckbuttonChildren {parent} {
+ foreach w [winfo children $parent] {
+ if {[winfo class $w] eq "Checkbutton"} {
+ \fBdestroy\fR $w
+ }
+ }
+}
+.CE
.SH KEYWORDS
application, destroy, window
diff --git a/doc/dialog.n b/doc/dialog.n
index 0e93888..269726a 100644
--- a/doc/dialog.n
+++ b/doc/dialog.n
@@ -5,7 +5,7 @@
'\" See the file "license.terms" for information on usage and redistribution
'\" of this file, and for a DISCLAIMER OF ALL WARRANTIES.
'\"
-'\" RCS: @(#) $Id: dialog.n,v 1.2 1998/09/14 18:22:55 stanton Exp $
+'\" RCS: @(#) $Id: dialog.n,v 1.3 2004/06/21 14:28:56 dkf Exp $
'\"
.so man.macros
.TH tk_dialog n 4.1 Tk "Tk Built-In Commands"
@@ -60,6 +60,14 @@ of the buttons, then -1 is returned.
While waiting for the user to respond, \fBtk_dialog\fR sets a local
grab. This prevents the user from interacting with the application
in any way except to invoke the dialog box.
+.SH EXAMPLE
+.CS
+set reply [\fBtk_dialog\fR .foo "The Title" "Do you want to say yes?" \\
+ questhead 0 Yes No "I'm not sure"]
+.CE
+
+.SH "SEE ALSO"
+tk_messageBox(n)
.SH KEYWORDS
bitmap, dialog, modal