| 1 | # A ScrolledList widget feels like a list widget but also has a
|
|---|
| 2 | # vertical scroll bar on its right. (Later, options may be added to
|
|---|
| 3 | # add a horizontal bar as well, to make the bars disappear
|
|---|
| 4 | # automatically when not needed, to move them to the other side of the
|
|---|
| 5 | # window, etc.)
|
|---|
| 6 | #
|
|---|
| 7 | # Configuration options are passed to the List widget.
|
|---|
| 8 | # A Frame widget is inserted between the master and the list, to hold
|
|---|
| 9 | # the Scrollbar widget.
|
|---|
| 10 | # Most methods calls are inherited from the List widget; Pack methods
|
|---|
| 11 | # are redirected to the Frame widget however.
|
|---|
| 12 |
|
|---|
| 13 | from Tkinter import *
|
|---|
| 14 | from Tkinter import _cnfmerge
|
|---|
| 15 |
|
|---|
| 16 | class ScrolledListbox(Listbox):
|
|---|
| 17 | def __init__(self, master=None, cnf={}):
|
|---|
| 18 | cnf = _cnfmerge(cnf)
|
|---|
| 19 | fcnf = {}
|
|---|
| 20 | vcnf = {'name': 'vbar',
|
|---|
| 21 | Pack: {'side': 'right', 'fill': 'y'},}
|
|---|
| 22 | for k in cnf.keys():
|
|---|
| 23 | if type(k) == ClassType or k == 'name':
|
|---|
| 24 | fcnf[k] = cnf[k]
|
|---|
| 25 | del cnf[k]
|
|---|
| 26 | self.frame = Frame(master, fcnf)
|
|---|
| 27 | self.vbar = Scrollbar(self.frame, vcnf)
|
|---|
| 28 | cnf[Pack] = {'side': 'left', 'fill': 'both', 'expand': 'yes'}
|
|---|
| 29 | cnf['name'] = 'list'
|
|---|
| 30 | Listbox.__init__(self, self.frame, cnf)
|
|---|
| 31 | self['yscrollcommand'] = (self.vbar, 'set')
|
|---|
| 32 | self.vbar['command'] = (self, 'yview')
|
|---|
| 33 |
|
|---|
| 34 | # Copy Pack methods of self.frame -- hack!
|
|---|
| 35 | for m in Pack.__dict__.keys():
|
|---|
| 36 | if m[0] != '_' and m != 'config':
|
|---|
| 37 | setattr(self, m, getattr(self.frame, m))
|
|---|
