56 lines
1.8 KiB
Python
56 lines
1.8 KiB
Python
"""A ScrolledText widget feels like a text widget but also has a
|
|
vertical scroll bar on its right. (Later, options may be added to
|
|
add a horizontal bar as well, to make the bars disappear
|
|
automatically when not needed, to move them to the other side of the
|
|
window, etc.)
|
|
|
|
Configuration options are passed to the Text widget.
|
|
A Frame widget is inserted between the master and the text, to hold
|
|
the Scrollbar widget.
|
|
Most methods calls are inherited from the Text widget; Pack, Grid and
|
|
Place methods are redirected to the Frame widget however.
|
|
"""
|
|
|
|
__all__ = ['ScrolledText']
|
|
|
|
from Tkinter import Frame, Text, Scrollbar, Pack, Grid, Place
|
|
from Tkconstants import RIGHT, LEFT, Y, BOTH
|
|
|
|
class ScrolledText(Text):
|
|
def __init__(self, master=None, **kw):
|
|
self.frame = Frame(master)
|
|
self.vbar = Scrollbar(self.frame)
|
|
self.vbar.pack(side=RIGHT, fill=Y)
|
|
|
|
kw.update({'yscrollcommand': self.vbar.set})
|
|
Text.__init__(self, self.frame, **kw)
|
|
self.pack(side=LEFT, fill=BOTH, expand=True)
|
|
self.vbar['command'] = self.yview
|
|
|
|
# Copy geometry methods of self.frame without overriding Text
|
|
# methods -- hack!
|
|
text_meths = vars(Text).keys()
|
|
methods = vars(Pack).keys() + vars(Grid).keys() + vars(Place).keys()
|
|
methods = set(methods).difference(text_meths)
|
|
|
|
for m in methods:
|
|
if m[0] != '_' and m != 'config' and m != 'configure':
|
|
setattr(self, m, getattr(self.frame, m))
|
|
|
|
def __str__(self):
|
|
return str(self.frame)
|
|
|
|
|
|
def example():
|
|
import __main__
|
|
from Tkconstants import END
|
|
|
|
stext = ScrolledText(bg='white', height=10)
|
|
stext.insert(END, __main__.__doc__)
|
|
stext.pack(fill=BOTH, side=LEFT, expand=True)
|
|
stext.focus_set()
|
|
stext.mainloop()
|
|
|
|
if __name__ == "__main__":
|
|
example()
|