Lots of wxMotif fixes
[wxWidgets.git] / 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 = (WXWidget) frameWidget;
118 m_formWidget = (WXWidget) formWidget;
119
120 SetCanAddEventHandler(TRUE);
121 AttachWidget (parent, (WXWidget) frameWidget, (WXWidget) formWidget, pos.x, pos.y, size.x, size.y);
122 ChangeBackgroundColour();
123
124 return TRUE;
125 }
126
127 wxStaticBox::~wxStaticBox()
128 {
129 DetachWidget(m_formWidget);
130 }
131
132 void wxStaticBox::SetLabel(const wxString& label)
133 {
134 if (!m_labelWidget)
135 return;
136
137 if (!label.IsNull())
138 {
139 wxString label1(wxStripMenuCodes(label));
140
141 XmString text = XmStringCreateSimple ((char*) (const char*) label1);
142 XtVaSetValues ((Widget) m_labelWidget,
143 XmNlabelString, text,
144 XmNlabelType, XmSTRING,
145 NULL);
146 XmStringFree (text);
147 }
148 }
149
150 wxString wxStaticBox::GetLabel() const
151 {
152 if (!m_labelWidget)
153 return wxEmptyString;
154
155 XmString text = 0;
156 char *s;
157 XtVaGetValues ((Widget) m_labelWidget,
158 XmNlabelString, &text,
159 NULL);
160
161 if (!text)
162 return wxEmptyString;
163
164 if (XmStringGetLtoR (text, XmSTRING_DEFAULT_CHARSET, &s))
165 {
166 wxString str(s);
167 XtFree (s);
168 return str;
169 }
170 else
171 {
172 return wxEmptyString;
173 }
174 }
175
176 void wxStaticBox::SetSize(int x, int y, int width, int height, int sizeFlags)
177 {
178 wxControl::SetSize (x, y, width, height, sizeFlags);
179
180 if (m_labelWidget)
181 {
182 Dimension xx, yy;
183 XtVaGetValues ((Widget) m_labelWidget, XmNwidth, &xx, XmNheight, &yy, NULL);
184
185 if (width > -1)
186 XtVaSetValues ((Widget) m_mainWidget, XmNwidth, width,
187 NULL);
188 if (height > -1)
189 XtVaSetValues ((Widget) m_mainWidget, XmNheight, height - yy,
190 NULL);
191 }
192 }
193
194 void wxStaticBox::ChangeFont(bool keepOriginalSize)
195 {
196 wxWindow::ChangeFont(keepOriginalSize);
197 }
198
199 void wxStaticBox::ChangeBackgroundColour()
200 {
201 wxWindow::ChangeBackgroundColour();
202 if (m_labelWidget)
203 DoChangeBackgroundColour(m_labelWidget, m_backgroundColour);
204 }
205
206 void wxStaticBox::ChangeForegroundColour()
207 {
208 wxWindow::ChangeForegroundColour();
209 if (m_labelWidget)
210 DoChangeForegroundColour(m_labelWidget, m_foregroundColour);
211 }
212