diff -r ffa851df0825 -r 2fb8b9db1c86 symbian-qemu-0.9.1-12/python-2.6.1/Demo/tix/samples/SHList1.py --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/symbian-qemu-0.9.1-12/python-2.6.1/Demo/tix/samples/SHList1.py Fri Jul 31 15:01:17 2009 +0100 @@ -0,0 +1,131 @@ +# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- +# +# $Id: SHList1.py 36560 2004-07-18 06:16:08Z tim_one $ +# +# Tix Demostration Program +# +# This sample program is structured in such a way so that it can be +# executed from the Tix demo program "tixwidgets.py": it must have a +# procedure called "RunSample". It should also have the "if" statment +# at the end of this file so that it can be run as a standalone +# program using tixwish. + +# This file demonstrates the use of the tixScrolledHList widget. +# + +import Tix + +TCL_ALL_EVENTS = 0 + +def RunSample (root): + shlist = DemoSHList(root) + shlist.mainloop() + shlist.destroy() + +class DemoSHList: + def __init__(self, w): + self.root = w + self.exit = -1 + + z = w.winfo_toplevel() + z.wm_protocol("WM_DELETE_WINDOW", lambda self=self: self.quitcmd()) + + # We create the frame and the ScrolledHList widget + # at the top of the dialog box + # + top = Tix.Frame( w, relief=Tix.RAISED, bd=1) + + # Put a simple hierachy into the HList (two levels). Use colors and + # separator widgets (frames) to make the list look fancy + # + top.a = Tix.ScrolledHList(top) + top.a.pack( expand=1, fill=Tix.BOTH, padx=10, pady=10, side=Tix.TOP) + + # This is our little relational database + # + bosses = [ + ('jeff', 'Jeff Waxman'), + ('john', 'John Lee'), + ('peter', 'Peter Kenson') + ] + + employees = [ + ('alex', 'john', 'Alex Kellman'), + ('alan', 'john', 'Alan Adams'), + ('andy', 'peter', 'Andreas Crawford'), + ('doug', 'jeff', 'Douglas Bloom'), + ('jon', 'peter', 'Jon Baraki'), + ('chris', 'jeff', 'Chris Geoffrey'), + ('chuck', 'jeff', 'Chuck McLean') + ] + + hlist=top.a.hlist + + # Let configure the appearance of the HList subwidget + # + hlist.config( separator='.', width=25, drawbranch=0, indent=10) + + count=0 + for boss,name in bosses : + if count : + f=Tix.Frame(hlist, name='sep%d' % count, height=2, width=150, + bd=2, relief=Tix.SUNKEN ) + + hlist.add_child( itemtype=Tix.WINDOW, + window=f, state=Tix.DISABLED ) + + hlist.add(boss, itemtype=Tix.TEXT, text=name) + count = count+1 + + + for person,boss,name in employees : + # '.' is the separator character we chose above + # + key= boss + '.' + person + # ^^^^ ^^^^^^ + # parent entryPath / child's name + + hlist.add( key, text=name ) + + # [Hint] Make sure the keys (e.g. 'boss.person') you choose + # are unique names. If you cannot be sure of this (because of + # the structure of your database, e.g.) you can use the + # "add_child" command instead: + # + # hlist.addchild( boss, text=name) + # ^^^^ + # parent entryPath + + + # Use a ButtonBox to hold the buttons. + # + box= Tix.ButtonBox(top, orientation=Tix.HORIZONTAL ) + box.add( 'ok', text='Ok', underline=0, width=6, + command = self.okcmd) + + box.add( 'cancel', text='Cancel', underline=0, width=6, + command = self.quitcmd) + + box.pack( side=Tix.BOTTOM, fill=Tix.X) + top.pack( side=Tix.TOP, fill=Tix.BOTH, expand=1 ) + + def okcmd (self): + self.quitcmd() + + def quitcmd (self): + self.exit = 0 + + def mainloop(self): + while self.exit < 0: + self.root.tk.dooneevent(TCL_ALL_EVENTS) + + def destroy (self): + self.root.destroy() + + +# This "if" statement makes it possible to run this script file inside or +# outside of the main demo program "tixwidgets.py". +# +if __name__== '__main__' : + root=Tix.Tk() + RunSample(root)