diff options
author | cvs2svn | 2005-01-24 15:46:33 +0000 |
---|---|---|
committer | cvs2svn | 2005-01-24 15:46:33 +0000 |
commit | e6a05dbef707dc10e546ef8fef8fc2a8b7d805bf (patch) | |
tree | 7061a2d781348fa7d5965b7d7dd5d7ef6b27a7b0 /sandbox/testwind.tcl | |
parent | e1ed2c6d78bb616e24166c13126adba1b95ea4ea (diff) | |
download | tkzinc-e6a05dbef707dc10e546ef8fef8fc2a8b7d805bf.zip tkzinc-e6a05dbef707dc10e546ef8fef8fc2a8b7d805bf.tar.gz tkzinc-e6a05dbef707dc10e546ef8fef8fc2a8b7d805bf.tar.bz2 tkzinc-e6a05dbef707dc10e546ef8fef8fc2a8b7d805bf.tar.xz |
This commit was manufactured by cvs2svn to create branch 'POSTSCRIPT'.POSTSCRIPT
Diffstat (limited to 'sandbox/testwind.tcl')
-rw-r--r-- | sandbox/testwind.tcl | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/sandbox/testwind.tcl b/sandbox/testwind.tcl deleted file mode 100644 index 5ff7f76..0000000 --- a/sandbox/testwind.tcl +++ /dev/null @@ -1,19 +0,0 @@ -#!/usr/local/bin/wish -f - -load ../tkzinc3.2.so - -set top 1 - -set r [zinc .r -backcolor gray -relief sunken] -pack .r -expand t -fill both -.r configure -width 800 -height 500 - -.r addtag controls withtag $top - -set ent [entry .r.entry] -set wind [.r add window $top -window $ent -position "100 100"] - -set container [frame .r.cont -container t] -set id [winfo id $container] -puts "container id is $id\n" -set cont [.r add window $top -window $container -position "200 200"] |