]> git.saurik.com Git - wxWidgets.git/blob - src/motif/statbox.cpp
Added GSocket motif (it compiles but I didn't tested it)
[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_font = 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_font.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 DetachWidget(m_mainWidget);
131 XtDestroyWidget((Widget) m_mainWidget);
132 if (m_labelWidget)
133 XtDestroyWidget((Widget) m_labelWidget);
134 XtDestroyWidget((Widget) m_formWidget);
135
136 m_mainWidget = (WXWidget) 0;
137 m_labelWidget = (WXWidget) 0;
138 m_formWidget = (WXWidget) 0;
139 }
140
141 void wxStaticBox::SetLabel(const wxString& label)
142 {
143 if (!m_labelWidget)
144 return;
145
146 if (!label.IsNull())
147 {
148 wxString label1(wxStripMenuCodes(label));
149
150 XmString text = XmStringCreateSimple ((char*) (const char*) label1);
151 XtVaSetValues ((Widget) m_labelWidget,
152 XmNlabelString, text,
153 XmNlabelType, XmSTRING,
154 NULL);
155 XmStringFree (text);
156 }
157 }
158
159 wxString wxStaticBox::GetLabel() const
160 {
161 if (!m_labelWidget)
162 return wxEmptyString;
163
164 XmString text = 0;
165 char *s;
166 XtVaGetValues ((Widget) m_labelWidget,
167 XmNlabelString, &text,
168 NULL);
169
170 if (!text)
171 return wxEmptyString;
172
173 if (XmStringGetLtoR (text, XmSTRING_DEFAULT_CHARSET, &s))
174 {
175 wxString str(s);
176 XtFree (s);
177 return str;
178 }
179 else
180 {
181 return wxEmptyString;
182 }
183 }
184
185 void wxStaticBox::DoSetSize(int x, int y, int width, int height, int sizeFlags)
186 {
187 wxControl::DoSetSize (x, y, width, height, sizeFlags);
188
189 if (m_labelWidget)
190 {
191 Dimension xx, yy;
192 XtVaGetValues ((Widget) m_labelWidget, XmNwidth, &xx, XmNheight, &yy, NULL);
193
194 if (width > -1)
195 XtVaSetValues ((Widget) m_mainWidget, XmNwidth, width,
196 NULL);
197 if (height > -1)
198 XtVaSetValues ((Widget) m_mainWidget, XmNheight, height - yy,
199 NULL);
200 }
201 }
202
203 void wxStaticBox::ChangeFont(bool keepOriginalSize)
204 {
205 wxWindow::ChangeFont(keepOriginalSize);
206 }
207
208 void wxStaticBox::ChangeBackgroundColour()
209 {
210 wxWindow::ChangeBackgroundColour();
211 if (m_labelWidget)
212 DoChangeBackgroundColour(m_labelWidget, m_backgroundColour);
213 }
214
215 void wxStaticBox::ChangeForegroundColour()
216 {
217 wxWindow::ChangeForegroundColour();
218 if (m_labelWidget)
219 DoChangeForegroundColour(m_labelWidget, m_foregroundColour);
220 }
221