--- /dev/null
+
+from wxPython.wx import *
+from wxPython.lib.rightalign import wxRightTextCtrl
+import wxPython.lib.rightalign
+
+
+#----------------------------------------------------------------------
+
+class TestPanel(wxPanel):
+ def __init__(self, parent):
+ wxPanel.__init__(self, parent, -1)
+
+ fgs = wxFlexGridSizer(cols=2, vgap=5, hgap=5)
+ txt = wxStaticText(self, -1,
+ "These text controls will align their contents\n"
+ "to the right when they don't have focus.", style=wxALIGN_RIGHT )
+ fgs.Add(txt)
+ fgs.Add(wxRightTextCtrl(self, -1, "", size=(75, -1)))
+
+ fgs.Add(10,10)
+ fgs.Add(wxRightTextCtrl(self, -1, "123.45", size=(75, -1)))
+
+ fgs.Add(10,10)
+ fgs.Add(wxRightTextCtrl(self, -1, "234.56", size=(75, -1)))
+
+ fgs.Add(10,10)
+ fgs.Add(wxRightTextCtrl(self, -1, "345.67", size=(75, -1)))
+
+ fgs.Add(10,10)
+ fgs.Add(wxRightTextCtrl(self, -1, "456.78", size=(75, -1)))
+
+ sizer = wxBoxSizer(wxVERTICAL)
+ sizer.Add(fgs, 0, wxALL, 25)
+
+ self.SetSizer(sizer)
+ self.SetAutoLayout(true)
+
+
+
+#----------------------------------------------------------------------
+
+def runTest(frame, nb, log):
+ win = TestPanel(nb)
+ return win
+
+#----------------------------------------------------------------------
+
+overview = wxPython.lib.rightalign.__doc__
--- /dev/null
+#----------------------------------------------------------------------
+# Name: wxPython.lib.rightalign
+# Purpose: A class derived from wxTextCtrl that aligns the text
+# on the right side of the control, (except when editing.)
+#
+# Author: Josu Oyanguren
+#
+# Created: 19-October-2001
+# RCS-ID: $Id$
+# Copyright: (c) 2001 by Total Control Software
+# Licence: wxWindows license
+#----------------------------------------------------------------------
+
+"""
+Some time ago, I asked about how to right-align
+wxTextCtrls. Answer was that it is not supported. I forgot it.
+
+Just a week ago, one of my clients asked me to have numbers right
+aligned. (Indeed it was that numbers MUST be right aligned).
+
+So the game begun. Hacking, hacking, ...
+
+At last, i succeed. Here is some code that someone may find
+useful. ubRightTextCtrl is right-aligned when you are not editing, but
+left-aligned if it has focus.
+
+Hope this can help someone, as much as this list helps me.
+
+Josu Oyanguren
+Ubera Servicios Informáticos.
+"""
+
+from wxPython.wx import *
+
+#----------------------------------------------------------------------
+
+class wxRightTextCtrl(wxTextCtrl):
+ def __init__(self, parent, id, *args, **kwargs):
+ wxTextCtrl.__init__(self, parent, id, *args, **kwargs)
+ EVT_KILL_FOCUS(self, self.OnKillFocus)
+ EVT_PAINT(self, self.OnPaint)
+
+ def OnPaint(self, event):
+ dc = wxPaintDC(self)
+ dc.SetFont(self.GetFont())
+ dc.Clear()
+ text = self.GetValue()
+ textwidth, textheight = dc.GetTextExtent(text)
+ dcwidth, dcheight = self.GetClientSizeTuple()
+
+ y = (dcheight - textheight) / 2
+ x = dcwidth - textwidth - 2
+
+ dc.SetClippingRegion(0, 0, dcwidth, dcheight)
+ dc.DrawText(text, x, y)
+
+ if x < 0:
+ toofat = '...'
+ markwidth = dc.GetTextExtent(toofat)[0]
+ dc.SetPen(wxPen(dc.GetBackground().GetColour(), 1, wxSOLID ))
+ dc.DrawRectangle(0,0, markwidth, dcheight)
+ dc.SetPen(wxPen(wxRED, 1, wxSOLID ))
+ dc.SetBrush(wxTRANSPARENT_BRUSH)
+ dc.DrawRectangle(1, 1, dcwidth-2, dcheight-2)
+ dc.DrawText(toofat, 1, y)
+
+
+ def OnKillFocus(self, event):
+ if not self.GetParent(): return
+ self.Refresh()
+ event.Skip()
+