src/motif/statbox.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        statbox.cpp
   3 // Purpose:     wxStaticBox
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     17/09/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation "statbox.h"
  14 #endif
  15
  16 #include "wx/statbox.h"
  17 #include "wx/utils.h"
  18
  19 #include <Xm/Frame.h>
  20 #include <Xm/Form.h>
  21 #include <Xm/Label.h>
  22 #include <Xm/LabelG.h>
  23
  24 #include <wx/motif/private.h>
  25
  26 #if !USE_SHARED_LIBRARY
  27 IMPLEMENT_DYNAMIC_CLASS(wxStaticBox, wxControl)
  28
  29 BEGIN_EVENT_TABLE(wxStaticBox, wxControl)
  30         EVT_ERASE_BACKGROUND(wxStaticBox::OnEraseBackground)
  31 END_EVENT_TABLE()
  32
  33 #endif
  34
  35 /*
  36  * Static box
  37  */
  38
  39 wxStaticBox::wxStaticBox()
  40 {
  41     m_formWidget = (WXWidget) 0;
  42     m_labelWidget = (WXWidget) 0;
  43 }
  44
  45 bool wxStaticBox::Create(wxWindow *parent, wxWindowID id,
  46            const wxString& label,
  47            const wxPoint& pos,
  48            const wxSize& size,
  49            long style,
  50            const wxString& name)
  51 {
  52     m_formWidget = (WXWidget) 0;
  53     m_labelWidget = (WXWidget) 0;
  54     m_backgroundColour = parent->GetBackgroundColour();
  55     m_foregroundColour = parent->GetForegroundColour();
  56     m_windowFont = parent->GetFont();
  57
  58     SetName(name);
  59
  60     if (parent) parent->AddChild(this);
  61
  62     if ( id == -1 )
  63             m_windowId = (int)NewControlId();
  64     else
  65             m_windowId = id;
  66
  67     m_windowStyle = style;
  68
  69     bool hasLabel = (!label.IsNull() && !label.IsEmpty()) ;
  70
  71     Widget parentWidget = (Widget) parent->GetClientWidget();
  72
  73     Widget formWidget = XtVaCreateManagedWidget ((char*) (const char*) name,
  74                                         xmFormWidgetClass, parentWidget,
  75                                         XmNmarginHeight, 0,
  76                                         XmNmarginWidth, 0,
  77                                         NULL);
  78
  79
  80     if (hasLabel)
  81     {
  82         XmFontList fontList = (XmFontList) m_windowFont.GetFontList(1.0, XtDisplay(parentWidget));
  83
  84         wxString label1(wxStripMenuCodes(label));
  85         XmString text = XmStringCreateSimple ((char*) (const char*) label1);
  86         m_labelWidget = (WXWidget) XtVaCreateManagedWidget ((char*) (const char*) label1,
  87                                              xmLabelWidgetClass, formWidget,
  88                                              XmNfontList, fontList,
  89                                              XmNlabelString, text,
  90                                              NULL);
  91         XmStringFree (text);
  92     }
  93
  94     Widget frameWidget = XtVaCreateManagedWidget ("frame",
  95                                         xmFrameWidgetClass, formWidget,
  96                                         XmNshadowType, XmSHADOW_IN,
  97 //                                      XmNmarginHeight, 0,
  98 //                                      XmNmarginWidth, 0,
  99                                         NULL);
 100
 101     if (hasLabel)
 102         XtVaSetValues ((Widget) m_labelWidget,
 103                        XmNtopAttachment, XmATTACH_FORM,
 104                        XmNleftAttachment, XmATTACH_FORM,
 105                        XmNrightAttachment, XmATTACH_FORM,
 106                        XmNalignment, XmALIGNMENT_BEGINNING,
 107                        NULL);
 108
 109     XtVaSetValues (frameWidget,
 110             XmNtopAttachment, hasLabel ? XmATTACH_WIDGET : XmATTACH_FORM,
 111                      XmNtopWidget, hasLabel ? (Widget) m_labelWidget : formWidget,
 112                      XmNbottomAttachment, XmATTACH_FORM,
 113                      XmNleftAttachment, XmATTACH_FORM,
 114                      XmNrightAttachment, XmATTACH_FORM,
 115                      NULL);
 116
 117     m_mainWidget = (Widget) formWidget;
 118
 119     SetCanAddEventHandler(TRUE);
 120     AttachWidget (parent, m_mainWidget, (WXWidget) frameWidget, pos.x, pos.y, size.x, size.y);
 121     ChangeBackgroundColour();
 122
 123     return TRUE;
 124 }
 125
 126 void wxStaticBox::SetLabel(const wxString& label)
 127 {
 128     if (!m_labelWidget)
 129         return;
 130
 131     if (!label.IsNull())
 132     {
 133         wxString label1(wxStripMenuCodes(label));
 134
 135         XmString text = XmStringCreateSimple ((char*) (const char*) label1);
 136         XtVaSetValues ((Widget) m_labelWidget,
 137                      XmNlabelString, text,
 138                      XmNlabelType, XmSTRING,
 139                      NULL);
 140         XmStringFree (text);
 141     }
 142 }
 143
 144 wxString wxStaticBox::GetLabel() const
 145 {
 146     if (!m_labelWidget)
 147         return wxEmptyString;
 148
 149     XmString text = 0;
 150     char *s;
 151     XtVaGetValues ((Widget) m_labelWidget,
 152                  XmNlabelString, &text,
 153                  NULL);
 154
 155     if (!text)
 156         return wxEmptyString;
 157
 158     if (XmStringGetLtoR (text, XmSTRING_DEFAULT_CHARSET, &s))
 159     {
 160         wxString str(s);
 161         XtFree (s);
 162         return str;
 163     }
 164     else
 165     {
 166         return wxEmptyString;
 167     }
 168 }
 169
 170 void wxStaticBox::SetSize(int x, int y, int width, int height, int sizeFlags)
 171 {
 172     wxControl::SetSize (x, y, width, height, sizeFlags);
 173
 174     if (m_labelWidget)
 175     {
 176         Dimension xx, yy;
 177         XtVaGetValues ((Widget) m_labelWidget, XmNwidth, &xx, XmNheight, &yy, NULL);
 178
 179         if (width > -1)
 180             XtVaSetValues ((Widget) m_mainWidget, XmNwidth, width,
 181                     NULL);
 182         if (height > -1)
 183             XtVaSetValues ((Widget) m_mainWidget, XmNheight, height - yy,
 184                     NULL);
 185     }
 186 }
 187
 188 void wxStaticBox::ChangeFont(bool keepOriginalSize)
 189 {
 190     wxWindow::ChangeFont(keepOriginalSize);
 191 }
 192
 193 void wxStaticBox::ChangeBackgroundColour()
 194 {
 195     wxWindow::ChangeBackgroundColour();
 196 }
 197
 198 void wxStaticBox::ChangeForegroundColour()
 199 {
 200     wxWindow::ChangeForegroundColour();
 201 }
 202