[ABU] 3-aug-2007 - A new kind of toplevel window. ---- The '''Pod''' command creates a new toplevel widget (given by the pathName argument). Additional options, described below, may be specified on the command line or in the option database to configure aspects of the Pod such as its background color. Other than creating new Pods, the Pod command can also transform existing toplevel widgets. Here is a sample; note the rounded shaded corners and the 3rd semi-transparent window .. [http://web.tiscali.it/irrational/tcl/pod-1.0/doc/images/demo01.png] Another picture showing how to adapt an existing application : [Kandinsky dance] [http://web.tiscali.it/irrational/tcl/pod-1.0/doc/images/Kandinsky.png] '''DOWNLOAD''' * Start page: [http://web.tiscali.it/irrational/tcl/pod-1.0/doc/index.html] * Download [http://web.tiscali.it/irrational/tcl/archive/pod-1.0.zip] '''HOW TO USE IT''' Basically, in order to create a Pod-window you only need to add 2 lines: package require Pod Pod .myPod or, you can transform an existing toplevel in a Pod-window Pod adapt .topWin There are few other command you can use for customizing the Pod (read below). # change the look .myPod configure -background blue # disable the interactive resizability .myPod configure -resizable false For full details, read the "Pod Reference" [http://web.tiscali.it/irrational/tcl/pod-1.0/doc/pod.html] within the doc directory. '''PLATFFORM COMPATIBILITY''' '''Pod''' is pure-tcl code but it is based on some [wm] sub-commands ''unfortunately'' supported only on Windows. In particular, the following command are not ''well'' supported on Mac/Unix: * '''wm ovverrideredirect''' $win * '''wm attributes''' $win '''-transparent''' $color (*New in TclTk 8.4.14*) * '''wm attributes''' $win '''-alpha''' $val ---- [AMG]: What are the speckles visible in the lower-right corner of the screenshots? Are they resizing grab handles? ---- [[ [Category Widget] ]]