src/motif/stattext.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        stattext.cpp
   3 // Purpose:     wxStaticText
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
  13 #pragma implementation "stattext.h"
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __VMS
  20 #define XtDisplay XTDISPLAY
  21 #endif
  22
  23 #include "wx/defs.h"
  24 #include "wx/stattext.h"
  25
  26 #ifdef __VMS__
  27 #pragma message disable nosimpint
  28 #endif
  29 #include <Xm/Label.h>
  30 #ifdef __VMS__
  31 #pragma message enable nosimpint
  32 #endif
  33
  34 #include "wx/motif/private.h"
  35
  36 IMPLEMENT_DYNAMIC_CLASS(wxStaticText, wxControl);
  37
  38 bool wxStaticText::Create(wxWindow *parent, wxWindowID id,
  39            const wxString& label,
  40            const wxPoint& pos,
  41            const wxSize& size,
  42            long style,
  43            const wxString& name)
  44 {
  45     if( !CreateControl( parent, id, pos, size, style,
  46                         wxDefaultValidator, name ) )
  47         return false;
  48
  49     Widget parentWidget = (Widget) parent->GetClientWidget();
  50
  51     Widget borderWidget =
  52         (Widget) wxCreateBorderWidget( (WXWidget)parentWidget, style );
  53     wxXmString text( wxStripMenuCodes( label ) );
  54     WXFontType fontType = m_font.GetFontType(XtDisplay(parentWidget));
  55
  56     m_labelWidget = XtVaCreateManagedWidget (wxConstCast(name.c_str(), char),
  57                                          xmLabelWidgetClass,
  58                                          borderWidget ? borderWidget : parentWidget,
  59                                          wxFont::GetFontTag(), fontType,
  60                                          XmNlabelString, text(),
  61                                          XmNalignment,
  62                      ((style & wxALIGN_RIGHT) ? XmALIGNMENT_END :
  63                      ((style & wxALIGN_CENTRE) ? XmALIGNMENT_CENTER :
  64                      XmALIGNMENT_BEGINNING)),
  65                                          NULL);
  66
  67     m_mainWidget = borderWidget ? borderWidget : m_labelWidget;
  68
  69     AttachWidget (parent, m_mainWidget, (WXWidget) NULL,
  70                   pos.x, pos.y, size.x, size.y);
  71
  72     ChangeBackgroundColour ();
  73
  74     return TRUE;
  75 }
  76
  77 void wxStaticText::SetLabel(const wxString& label)
  78 {
  79     wxXmString label_str(wxStripMenuCodes(label));
  80
  81     // This variable means we don't need so many casts later.
  82     Widget widget = (Widget) m_labelWidget;
  83
  84     if (GetWindowStyle() & wxST_NO_AUTORESIZE)
  85     {
  86         XtUnmanageChild(widget);
  87         Dimension width, height;
  88         XtVaGetValues(widget, XmNwidth, &width, XmNheight, &height, NULL);
  89
  90         XtVaSetValues(widget,
  91             XmNlabelString, label_str(),
  92             XmNlabelType, XmSTRING,
  93             NULL);
  94         XtVaSetValues(widget,
  95             XmNwidth, width,
  96             XmNheight, height,
  97             NULL);
  98         XtManageChild(widget);
  99     }
 100     else
 101     {
 102         XtVaSetValues(widget,
 103             XmNlabelString, label_str(),
 104             XmNlabelType, XmSTRING,
 105             NULL);
 106     }
 107 }