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 #ifdef __GNUG__
  13 #pragma implementation "stattext.h"
  14 #endif
  15
  16 #ifdef __VMS
  17 #define XtDisplay XTDISPLAY
  18 #endif
  19
  20 #include "wx/app.h"
  21 #include "wx/stattext.h"
  22
  23 #include <stdio.h>
  24
  25 #ifdef __VMS__
  26 #pragma message disable nosimpint
  27 #endif
  28 #include <Xm/Frame.h>
  29 #include <Xm/Label.h>
  30 #include <Xm/LabelG.h>
  31 #include <Xm/PushBG.h>
  32 #ifdef __VMS__
  33 #pragma message enable nosimpint
  34 #endif
  35
  36 #include "wx/motif/private.h"
  37
  38 IMPLEMENT_DYNAMIC_CLASS(wxStaticText, wxControl)
  39
  40 bool wxStaticText::Create(wxWindow *parent, wxWindowID id,
  41            const wxString& label,
  42            const wxPoint& pos,
  43            const wxSize& size,
  44            long style,
  45            const wxString& name)
  46 {
  47     SetName(name);
  48     if (parent) parent->AddChild(this);
  49
  50     m_backgroundColour = parent->GetBackgroundColour();
  51     m_foregroundColour = parent->GetForegroundColour();
  52
  53     if ( id == -1 )
  54               m_windowId = (int)NewControlId();
  55     else
  56             m_windowId = id;
  57
  58     m_windowStyle = style;
  59     m_font = parent->GetFont();
  60
  61     Widget parentWidget = (Widget) parent->GetClientWidget();
  62
  63     Widget borderWidget = NULL;
  64
  65     // Decorate the label widget if a border style is specified.
  66     if (style & wxSIMPLE_BORDER)
  67     {
  68         borderWidget = XtVaCreateManagedWidget
  69                                    (
  70                                     "simpleBorder",
  71                                     xmFrameWidgetClass, parentWidget,
  72                                     XmNshadowType, XmSHADOW_ETCHED_IN,
  73                                     XmNshadowThickness, 1,
  74                                     NULL
  75                                    );
  76     } else if (style & wxSUNKEN_BORDER)
  77     {
  78         borderWidget = XtVaCreateManagedWidget
  79                                    (
  80                                     "sunkenBorder",
  81                                     xmFrameWidgetClass, parentWidget,
  82                                     XmNshadowType, XmSHADOW_IN,
  83                                     NULL
  84                                    );
  85     } else if (style & wxRAISED_BORDER)
  86     {
  87         borderWidget = XtVaCreateManagedWidget
  88                                    (
  89                                     "raisedBorder",
  90                                     xmFrameWidgetClass, parentWidget,
  91                                     XmNshadowType, XmSHADOW_OUT,
  92                                     NULL
  93                                    );
  94     }
  95
  96 #if 0 // gcc 2.95 doesn't like this apparently
  97     // Use XmStringCreateLtoR(), since XmStringCreateSimple
  98     // doesn't obey separators.
  99 //    XmString text = XmStringCreateSimple (label1);
 100     wxXmString text( label1 );
 101 #endif // 0
 102
 103     wxXmString text( label );
 104
 105     WXFontType fontType = m_font.GetFontType(XtDisplay(parentWidget));
 106
 107     m_labelWidget = XtVaCreateManagedWidget (wxConstCast(name.c_str(), char),
 108                                          xmLabelWidgetClass,
 109                                          borderWidget ? borderWidget : parentWidget,
 110                                          wxFont::GetFontTag(), fontType,
 111                                          XmNlabelString, text(),
 112                                          XmNalignment,
 113                      ((style & wxALIGN_RIGHT) ? XmALIGNMENT_END :
 114                      ((style & wxALIGN_CENTRE) ? XmALIGNMENT_CENTER :
 115                      XmALIGNMENT_BEGINNING)),
 116                                          NULL);
 117
 118     m_mainWidget = borderWidget ? borderWidget : m_labelWidget;
 119
 120     SetCanAddEventHandler(TRUE);
 121     AttachWidget (parent, m_mainWidget, (WXWidget) NULL, pos.x, pos.y, size.x, size.y);
 122
 123     ChangeBackgroundColour ();
 124
 125     return TRUE;
 126 }
 127
 128 void wxStaticText::ChangeFont(bool keepOriginalSize)
 129 {
 130     wxWindow::ChangeFont(keepOriginalSize);
 131 }
 132
 133 void wxStaticText::ChangeBackgroundColour()
 134 {
 135     wxWindow::ChangeBackgroundColour();
 136 }
 137
 138 void wxStaticText::ChangeForegroundColour()
 139 {
 140     wxWindow::ChangeForegroundColour();
 141 }
 142
 143 void wxStaticText::SetLabel(const wxString& label)
 144 {
 145     wxString buf(wxStripMenuCodes(label));
 146     wxXmString label_str(buf);
 147
 148     // This variable means we don't need so many casts later.
 149     Widget widget = (Widget) m_labelWidget;
 150
 151     if (GetWindowStyle() & wxST_NO_AUTORESIZE)
 152     {
 153         XtUnmanageChild(widget);
 154         Dimension width, height;
 155         XtVaGetValues(widget, XmNwidth, &width, XmNheight, &height, NULL);
 156
 157         XtVaSetValues(widget,
 158             XmNlabelString, label_str(),
 159             XmNlabelType, XmSTRING,
 160             NULL);
 161         XtVaSetValues(widget,
 162             XmNwidth, width,
 163             XmNheight, height,
 164             NULL);
 165         XtManageChild(widget);
 166     }
 167     else
 168     {
 169         XtVaSetValues(widget,
 170             XmNlabelString, label_str(),
 171             XmNlabelType, XmSTRING,
 172             NULL);
 173     }
 174 }
 175