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 #if 0  // gcc 2.95 doesn't like this apparently
  62     char* label1 = (label.IsNull() ? "" : (char*) (const char*) label);
  63 #endif
  64
  65     Widget parentWidget = (Widget) parent->GetClientWidget();
  66
  67     Widget borderWidget = NULL;
  68
  69     // Decorate the label widget if a border style is specified.
  70     if (style & wxSIMPLE_BORDER)
  71     {
  72         borderWidget = XtVaCreateManagedWidget
  73                                    (
  74                                     "simpleBorder",
  75                                     xmFrameWidgetClass, parentWidget,
  76                                     XmNshadowType, XmSHADOW_ETCHED_IN,
  77                                     XmNshadowThickness, 1,
  78                                     NULL
  79                                    );
  80     } else if (style & wxSUNKEN_BORDER)
  81     {
  82         borderWidget = XtVaCreateManagedWidget
  83                                    (
  84                                     "sunkenBorder",
  85                                     xmFrameWidgetClass, parentWidget,
  86                                     XmNshadowType, XmSHADOW_IN,
  87                                     NULL
  88                                    );
  89     } else if (style & wxRAISED_BORDER)
  90     {
  91         borderWidget = XtVaCreateManagedWidget
  92                                    (
  93                                     "raisedBorder",
  94                                     xmFrameWidgetClass, parentWidget,
  95                                     XmNshadowType, XmSHADOW_OUT,
  96                                     NULL
  97                                    );
  98     }
  99
 100 #if 0 // gcc 2.95 doesn't like this apparently
 101     // Use XmStringCreateLtoR(), since XmStringCreateSimple
 102     // doesn't obey separators.
 103 //    XmString text = XmStringCreateSimple (label1);
 104     wxXmString text( label1 );
 105 #endif // 0
 106
 107     wxXmString text( label );
 108
 109     WXFontType fontType = m_font.GetFontType(XtDisplay(parentWidget));
 110
 111     m_labelWidget = XtVaCreateManagedWidget ((char*) (const char*) name,
 112                                          xmLabelWidgetClass,
 113                                          borderWidget ? borderWidget : parentWidget,
 114                                          wxFont::GetFontTag(), fontType,
 115                                          XmNlabelString, text(),
 116                                          XmNalignment,
 117                      ((style & wxALIGN_RIGHT) ? XmALIGNMENT_END :
 118                      ((style & wxALIGN_CENTRE) ? XmALIGNMENT_CENTER :
 119                      XmALIGNMENT_BEGINNING)),
 120                                          NULL);
 121
 122     m_mainWidget = borderWidget ? borderWidget : m_labelWidget;
 123
 124     SetCanAddEventHandler(TRUE);
 125     AttachWidget (parent, m_mainWidget, (WXWidget) NULL, pos.x, pos.y, size.x, size.y);
 126
 127     ChangeBackgroundColour ();
 128
 129     return TRUE;
 130 }
 131
 132 void wxStaticText::ChangeFont(bool keepOriginalSize)
 133 {
 134     wxWindow::ChangeFont(keepOriginalSize);
 135 }
 136
 137 void wxStaticText::ChangeBackgroundColour()
 138 {
 139     wxWindow::ChangeBackgroundColour();
 140 }
 141
 142 void wxStaticText::ChangeForegroundColour()
 143 {
 144     wxWindow::ChangeForegroundColour();
 145 }
 146
 147 void wxStaticText::SetLabel(const wxString& label)
 148 {
 149     wxString buf(wxStripMenuCodes(label));
 150     wxXmString label_str(buf);
 151
 152     // This variable means we don't need so many casts later.
 153     Widget widget = (Widget) m_labelWidget;
 154
 155     if (GetWindowStyle() & wxST_NO_AUTORESIZE)
 156     {
 157         XtUnmanageChild(widget);
 158         Dimension width, height;
 159         XtVaGetValues(widget, XmNwidth, &width, XmNheight, &height, NULL);
 160
 161         XtVaSetValues(widget,
 162             XmNlabelString, label_str(),
 163             XmNlabelType, XmSTRING,
 164             NULL);
 165         XtVaSetValues(widget,
 166             XmNwidth, width,
 167             XmNheight, height,
 168             NULL);
 169         XtManageChild(widget);
 170     }
 171     else
 172     {
 173         XtVaSetValues(widget,
 174             XmNlabelString, label_str(),
 175             XmNlabelType, XmSTRING,
 176             NULL);
 177     }
 178 }
 179