ABU 3-aug-2007 - A new kind of toplevel window.
ABU 9-jab-2007 - Pod 1.2 released - updated links
Pod is a new kind of toplevel widget. The Pod command can create new windows or it can also transform existing toplevel-windows.
Pod anatomy
Here is a sample from a real application:
Another picture showing how to adapt an existing application : Kandinsky dance
DOWNLOAD
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" [L5 ] within the doc directory.
PLATFORM COMPATIBILITY
Pod is pure-tcl code but it is based on some wm sub-commands unfortunately supported only on Windows and Mac. In particular, the following command are not well supported on Unix:
WJP I just tried it on my Linux 2.6.3 system with Tcl/Tk 8.4.14 and it seems to work.
AMG: What are the speckles visible in the lower-right corner of the screenshots? Are they resizing grab handles?
ABU: Correct ! You can enable/disable these grab handles
$w configure -resizable false
Anyway, even if interactive-resizing is disabled, you can always resize the Pod by program:
wm geometry $w 250x200
More about Platform Compatibility
Windows
Mac
Unix
[ Category Widget ]