]> git.saurik.com Git - wxWidgets.git/blob - src/motif/statbox.cpp
listbox kbd handling buglet corrected (event.Skip() called even when no
[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 = (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