1 files changed, 154 insertions, 0 deletions
diff --git a/uitools/LabelEntry.py b/uitools/LabelEntry.py
new file mode 100644
index 0000000..203427a
--- /dev/null
+++ b/uitools/LabelEntry.py
@@ -0,0 +1,154 @@
+######################################################################
+# This class provides an Entry with a label on its left side.
+# The text of the label can be set by means of the 'text'
+# configuration key.
+#
+# Mitch Chapman
+#---------------------------------------------------------------------
+# $Log: LabelEntry.py,v $
+# Revision 1.1  1996/12/01 22:58:54  mchapman
+# Initial revision
+#
+######################################################################
+
+__version__ = "$Revision: 1.1 $"
+
+import Tkinter; Tk=Tkinter
+
+######################################################################
+# A MultiColEntry is a label together with one or more entries.
+# Clients have direct access to the constituent widgets:
+#   frame   -- the frame containing the other widgets.
+#   label   -- the label appearing on the left side
+#   entries -- The entries arrayed across from left to right
+######################################################################
+class MultiColEntry:
+    ##################################################################
+    # Initialize a new instance.
+    ##################################################################
+    def __init__(self, master=None, columns=2, entryClass=Tk.Entry):
+	f = self.frame = Tk.Frame(master)
+	l = self.label = Tk.Label(f, anchor='ne')
+	l.pack(side='left')
+	self.entries = []
+	for i in range(columns):
+	    e = entryClass(f)
+	    self.entries.append(e)
+	    e.pack(side='left', fill='x', expand='yes')
+	    
+    ##################################################################
+    # Set the values of one or more entry fields.
+    # It's the caller's responsibility not to exceed the number of
+    # entries in self.
+    ##################################################################
+    def setValues(self, startIndex=0, *newValues):
+        i = startIndex
+        for v in newValues:
+            e = self.entries[i]
+            e.delete('0', 'end')
+	    e.insert('end', v)
+
+
+######################################################################
+# A labelled entry is a MultiColEntry with only one entry column.
+# The instance variable "entry" provides a more-convenient way to
+# refer to the sole entry widget.
+######################################################################
+class LabelEntry(MultiColEntry):
+    ##################################################################
+    # Initialize a new instance.
+    ##################################################################
+    def __init__(self, master=None, entryClass=Tk.Entry):
+	MultiColEntry.__init__(self, master, 1, entryClass)
+	self.entry = self.entries[0]
+
+    ##################################################################
+    # Set the whole value of an Entry.
+    ##################################################################
+    def setValue(self, newValue):
+	self.entry.delete(0, 'end')
+	self.entry.insert('end', newValue)
+
+    ##################################################################
+    # Delete LabelEntry text.
+    ##################################################################
+    def delete(self, first, last=None):
+	self.entry.delete(first, last)
+
+    ##################################################################
+    # Insert LabelEntry text.
+    ##################################################################
+    def insert(self, index, string):
+	self.entry.insert(index, string)
+
+######################################################################
+# A ROLabelEntry is read-only, so far as the user is concerned.
+######################################################################
+class ROLabelEntry(LabelEntry):
+    def __init__(self, master=None):
+	LabelEntry.__init__(self, master, Tk.Entry)
+	self.entry['state'] = 'disabled'
+
+    ##################################################################
+    # Delete text from the entry.
+    ##################################################################
+    def delete(self, first, last=None):
+	self.entry['state'] = 'normal'
+	self.entry.delete(first, last)
+	self.entry['state'] = 'disabled'
+
+    ##################################################################
+    # Insert text into the entry.
+    ##################################################################
+    def insert(self, index, string):
+	self.entry['state'] = 'normal'
+	self.entry.insert(index, string)
+	self.entry['state'] = 'disabled'
+    
+
+######################################################################
+# Main function for unit testing.
+######################################################################
+def main():
+    f = Tk.Frame()
+
+    le = LabelEntry(f)
+    le.label['text'] = "New Value:"
+    newValue = "This is the new value."
+    le.entry['width'] = len(newValue)
+    le.insert('end', newValue)
+
+    readOnly = ROLabelEntry(f)
+    readOnly.label['text'] = 'Label:'
+    readOnly.entry['relief'] = 'groove'
+    for w in [readOnly.label, readOnly.entry]:
+	w['width'] = 40
+	
+    readOnly.insert('0', 'This is the value')
+
+    mc = MultiColEntry(f, 8)
+    mc.label['text'] = "Multi:"
+    map(lambda e: e.config(width=8), mc.entries)
+
+    for w in [le, readOnly, mc]:
+        w.label['width'] = 12
+	w.frame.pack(fill='x')
+
+    f.update()
+    f.pack()
+    f.wait_visibility()
+    f.after(2000, readOnly.insert, 'end', ' after 2 seconds')
+
+    ##################################################################
+    # Insert text in a multi-column widget.
+    ##################################################################
+    def insertMulti(mc):
+	map(lambda e: e.insert('end', 'This is ' + `e`), mc.entries)
+
+    mc.setValues(2, "This is entry 2.", "This is entry 3.", "This is entry 4.")
+
+    f.after(4000, insertMulti, mc)
+    f.mainloop()
+
+if __name__ == "__main__":
+    main()