]> git.saurik.com Git - wxWidgets.git/blob - src/motif/statbox.cpp
Applied bug fix [ 684949 ] Dialup Sample With Borland C++ 5.5.1 Free Compiler
[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 #ifdef __VMS
17 #define XtDisplay XTDISPLAY
18 #endif
19
20 #include "wx/defs.h"
21
22 #include "wx/statbox.h"
23 #include "wx/utils.h"
24
25 #ifdef __VMS__
26 #pragma message disable nosimpint
27 #endif
28 #include <Xm/Frame.h>
29 #include <Xm/Label.h>
30 #ifdef __VMS__
31 #pragma message enable nosimpint
32 #endif
33
34 #include "wx/motif/private.h"
35
36 IMPLEMENT_DYNAMIC_CLASS(wxStaticBox, wxControl)
37
38 BEGIN_EVENT_TABLE(wxStaticBox, wxControl)
39 //EVT_ERASE_BACKGROUND(wxStaticBox::OnEraseBackground)
40 END_EVENT_TABLE()
41
42 // ----------------------------------------------------------------------------
43 // wxXmSizeKeeper
44 // ----------------------------------------------------------------------------
45
46 // helper class to reduce code duplication
47 class wxXmSizeKeeper
48 {
49 Dimension m_x, m_y;
50 Widget m_widget;
51 public:
52 wxXmSizeKeeper( Widget w )
53 : m_widget( w )
54 {
55 XtVaGetValues( m_widget,
56 XmNwidth, &m_x,
57 XmNheight, &m_y,
58 NULL );
59 }
60
61 void Restore()
62 {
63 int x, y;
64
65 XtVaGetValues( m_widget,
66 XmNwidth, &x,
67 XmNheight, &y,
68 NULL );
69 if( x != m_x || y != m_y )
70 XtVaSetValues( m_widget,
71 XmNwidth, m_x,
72 XmNheight, m_y,
73 NULL );
74 }
75 };
76
77 /*
78 * Static box
79 */
80
81 wxStaticBox::wxStaticBox()
82 {
83 m_labelWidget = (WXWidget) 0;
84 }
85
86 bool wxStaticBox::Create(wxWindow *parent, wxWindowID id,
87 const wxString& label,
88 const wxPoint& pos,
89 const wxSize& size,
90 long style,
91 const wxString& name)
92 {
93 if( !CreateControl( parent, id, pos, size, style,
94 wxDefaultValidator, name ) )
95 return false;
96
97 Widget parentWidget = (Widget) parent->GetClientWidget();
98
99 m_mainWidget = XtVaCreateManagedWidget ("staticboxframe",
100 xmFrameWidgetClass, parentWidget,
101 // MBN: why override default?
102 // XmNshadowType, XmSHADOW_IN,
103 NULL);
104
105 bool hasLabel = (!label.IsNull() && !label.IsEmpty()) ;
106 if (hasLabel)
107 {
108 WXFontType fontType = m_font.GetFontType( XtDisplay( parentWidget ) );
109 wxString label1(wxStripMenuCodes(label));
110 wxXmString text(label1);
111
112 m_labelWidget = (WXWidget) XtVaCreateManagedWidget ("staticboxlabel",
113 xmLabelWidgetClass, (Widget)m_mainWidget,
114 wxFont::GetFontTag(), fontType,
115 XmNlabelString, text(),
116 #if wxCHECK_MOTIF_VERSION( 2, 0 )
117 XmNframeChildType, XmFRAME_TITLE_CHILD,
118 #else
119 XmNchildType, XmFRAME_TITLE_CHILD,
120 #endif
121 NULL);
122 }
123
124 AttachWidget (parent, m_mainWidget, NULL, pos.x, pos.y, size.x, size.y);
125 ChangeBackgroundColour();
126
127 return TRUE;
128 }
129
130 wxStaticBox::~wxStaticBox()
131 {
132 DetachWidget(m_mainWidget);
133 XtDestroyWidget((Widget) m_mainWidget);
134
135 m_mainWidget = (WXWidget) 0;
136 m_labelWidget = (WXWidget) 0;
137 }
138
139 void wxStaticBox::SetLabel( const wxString& label )
140 {
141 wxXmSizeKeeper sk( (Widget)GetMainWidget() );
142
143 wxStaticBoxBase::SetLabel( label );
144
145 sk.Restore();
146 }