]>
git.saurik.com Git - wxWidgets.git/blob - src/msw/statbox.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: msw/statbox.cpp
3 // Purpose: wxStaticBox
4 // Author: Julian Smart
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 // ============================================================================
14 // ============================================================================
16 // ----------------------------------------------------------------------------
18 // ----------------------------------------------------------------------------
20 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
21 #pragma implementation "statbox.h"
24 // For compilers that support precompilation, includes "wx.h".
25 #include "wx/wxprec.h"
35 #include "wx/dcclient.h"
38 #include "wx/statbox.h"
39 #include "wx/notebook.h"
40 #include "wx/sysopt.h"
42 #include "wx/dcmemory.h"
44 #include "wx/msw/private.h"
45 #include "wx/msw/missing.h"
47 // ----------------------------------------------------------------------------
49 // ----------------------------------------------------------------------------
51 #if wxUSE_EXTENDED_RTTI
52 WX_DEFINE_FLAGS( wxStaticBoxStyle
)
54 wxBEGIN_FLAGS( wxStaticBoxStyle
)
55 // new style border flags, we put them first to
56 // use them for streaming out
57 wxFLAGS_MEMBER(wxBORDER_SIMPLE
)
58 wxFLAGS_MEMBER(wxBORDER_SUNKEN
)
59 wxFLAGS_MEMBER(wxBORDER_DOUBLE
)
60 wxFLAGS_MEMBER(wxBORDER_RAISED
)
61 wxFLAGS_MEMBER(wxBORDER_STATIC
)
62 wxFLAGS_MEMBER(wxBORDER_NONE
)
64 // old style border flags
65 wxFLAGS_MEMBER(wxSIMPLE_BORDER
)
66 wxFLAGS_MEMBER(wxSUNKEN_BORDER
)
67 wxFLAGS_MEMBER(wxDOUBLE_BORDER
)
68 wxFLAGS_MEMBER(wxRAISED_BORDER
)
69 wxFLAGS_MEMBER(wxSTATIC_BORDER
)
70 wxFLAGS_MEMBER(wxBORDER
)
72 // standard window styles
73 wxFLAGS_MEMBER(wxTAB_TRAVERSAL
)
74 wxFLAGS_MEMBER(wxCLIP_CHILDREN
)
75 wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW
)
76 wxFLAGS_MEMBER(wxWANTS_CHARS
)
77 wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE
)
78 wxFLAGS_MEMBER(wxALWAYS_SHOW_SB
)
79 wxFLAGS_MEMBER(wxVSCROLL
)
80 wxFLAGS_MEMBER(wxHSCROLL
)
82 wxEND_FLAGS( wxStaticBoxStyle
)
84 IMPLEMENT_DYNAMIC_CLASS_XTI(wxStaticBox
, wxControl
,"wx/statbox.h")
86 wxBEGIN_PROPERTIES_TABLE(wxStaticBox
)
87 wxPROPERTY( Label
,wxString
, SetLabel
, GetLabel
, wxString() , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
88 wxPROPERTY_FLAGS( WindowStyle
, wxStaticBoxStyle
, long , SetWindowStyleFlag
, GetWindowStyleFlag
, EMPTY_MACROVALUE
, 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
93 wxEND_PROPERTIES_TABLE()
95 wxBEGIN_HANDLERS_TABLE(wxStaticBox
)
96 wxEND_HANDLERS_TABLE()
98 wxCONSTRUCTOR_6( wxStaticBox
, wxWindow
* , Parent
, wxWindowID
, Id
, wxString
, Label
, wxPoint
, Position
, wxSize
, Size
, long , WindowStyle
)
100 IMPLEMENT_DYNAMIC_CLASS(wxStaticBox
, wxControl
)
103 // ============================================================================
105 // ============================================================================
107 // ----------------------------------------------------------------------------
109 // ----------------------------------------------------------------------------
111 bool wxStaticBox::Create(wxWindow
*parent
,
113 const wxString
& label
,
117 const wxString
& name
)
119 if ( !CreateControl(parent
, id
, pos
, size
, style
, wxDefaultValidator
, name
) )
122 if ( !MSWCreateControl(wxT("BUTTON"), label
, pos
, size
) )
126 Connect(wxEVT_PAINT
, wxPaintEventHandler(wxStaticBox::OnPaint
));
127 #endif // !__WXWINCE__
132 wxBorder
wxStaticBox::GetDefaultBorder() const
134 return wxBORDER_NONE
;
137 WXDWORD
wxStaticBox::MSWGetStyle(long style
, WXDWORD
*exstyle
) const
139 long styleWin
= wxStaticBoxBase::MSWGetStyle(style
, exstyle
);
141 // no need for it anymore, must be removed for wxRadioBox child
142 // buttons to be able to repaint themselves
143 styleWin
&= ~WS_CLIPCHILDREN
;
149 // If any of the ancestors are scrolling windows, style has to be
150 // WS_EX_TRANSPARENT or the static box won't be painted when the window
151 // is scrolled. We try not to do this normally, because we get a lot of
153 for ( wxWindow
*win
= GetParent(); win
; win
= win
->GetParent() )
155 if ( win
->HasFlag(wxVSCROLL
) || win
->HasFlag(wxHSCROLL
) )
157 *exstyle
= WS_EX_TRANSPARENT
;
161 if ( win
->IsTopLevel() )
166 return styleWin
| BS_GROUPBOX
;
169 wxSize
wxStaticBox::DoGetBestSize() const
172 wxGetCharSize(GetHWND(), &cx
, &cy
, GetFont());
175 GetTextExtent(wxGetWindowText(m_hWnd
), &wBox
, &cy
);
178 int hBox
= EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy
);
180 return wxSize(wBox
, hBox
);
183 void wxStaticBox::GetBordersForSizer(int *borderTop
, int *borderOther
) const
185 wxStaticBoxBase::GetBordersForSizer(borderTop
, borderOther
);
187 // need extra space, don't know how much but this seems to be enough
188 *borderTop
+= GetCharHeight()/3;
191 // all the hacks below are not necessary for WinCE
194 WXLRESULT
wxStaticBox::MSWWindowProc(WXUINT nMsg
, WXWPARAM wParam
, WXLPARAM lParam
)
196 if ( nMsg
== WM_NCHITTEST
)
198 // This code breaks some other processing such as enter/leave tracking
199 // so it's off by default.
201 static int s_useHTClient
= -1;
202 if (s_useHTClient
== -1)
203 s_useHTClient
= wxSystemOptions::GetOptionInt(wxT("msw.staticbox.htclient"));
204 if (s_useHTClient
== 1)
206 int xPos
= GET_X_LPARAM(lParam
);
207 int yPos
= GET_Y_LPARAM(lParam
);
209 ScreenToClient(&xPos
, &yPos
);
211 // Make sure you can drag by the top of the groupbox, but let
212 // other (enclosed) controls get mouse events also
214 return (long)HTCLIENT
;
218 return wxControl::MSWWindowProc(nMsg
, wParam
, lParam
);
221 // ----------------------------------------------------------------------------
222 // static box drawing
223 // ----------------------------------------------------------------------------
226 We draw the static box ourselves because it's the only way to prevent it
227 from flickering horribly on resize (because everything inside the box is
228 erased twice: once when the box itself is repainted and second time when
229 the control inside it is repainted) without using WS_EX_TRANSPARENT style as
230 we used to do and which resulted in other problems.
233 // MSWGetRegionWithoutSelf helper: removes the given rectangle from region
235 SubtractRectFromRgn(HRGN hrgn
, int left
, int top
, int right
, int bottom
)
237 AutoHRGN
hrgnRect(::CreateRectRgn(left
, top
, right
, bottom
));
240 wxLogLastError(_T("CreateRectRgn()"));
244 ::CombineRgn(hrgn
, hrgn
, hrgnRect
, RGN_DIFF
);
247 void wxStaticBox::MSWGetRegionWithoutSelf(WXHRGN hRgn
, int w
, int h
)
249 HRGN hrgn
= (HRGN
)hRgn
;
251 // remove the area occupied by the static box borders from the region
252 int borderTop
, border
;
253 GetBordersForSizer(&borderTop
, &border
);
256 SubtractRectFromRgn(hrgn
, 0, 0, w
, borderTop
);
259 SubtractRectFromRgn(hrgn
, 0, h
- border
, w
, h
);
262 SubtractRectFromRgn(hrgn
, 0, 0, border
, h
);
265 SubtractRectFromRgn(hrgn
, w
- border
, 0, w
, h
);
268 WXHRGN
wxStaticBox::MSWGetRegionWithoutChildren()
271 ::GetWindowRect(GetHwnd(), &rc
);
272 HRGN hrgn
= ::CreateRectRgn(rc
.left
, rc
.top
, rc
.right
+ 1, rc
.bottom
+ 1);
274 // iterate over all child windows (not just wxWindows but all windows)
275 for ( HWND child
= ::GetWindow(GetHwndOf(GetParent()), GW_CHILD
);
277 child
= ::GetWindow(child
, GW_HWNDNEXT
) )
279 wxWindow
*childWindow
= wxGetWindowFromHWND((WXHWND
) child
);
281 // can't just test for (this != child) here since if a wxStaticBox
282 // overlaps another wxStaticBox then neither are drawn. The overlapping
283 // region will flicker but we shouldn't have overlapping windows anyway.
284 if ( !childWindow
|| !wxDynamicCast(childWindow
, wxStaticBox
) )
286 ::GetWindowRect(child
, &rc
);
287 if ( ::RectInRegion(hrgn
, &rc
) )
289 // need to remove WS_CLIPSIBLINGS from all sibling windows
290 // that are within this staticbox if set
291 LONG style
= ::GetWindowLong(child
, GWL_STYLE
);
292 if ( style
& WS_CLIPSIBLINGS
)
294 style
&= ~WS_CLIPSIBLINGS
;
295 ::SetWindowLong(child
, GWL_STYLE
, style
);
297 // MSDN: "If you have changed certain window data using
298 // SetWindowLong, you must call SetWindowPos to have the
299 // changes take effect."
300 ::SetWindowPos(child
, NULL
, 0, 0, 0, 0,
301 SWP_NOMOVE
| SWP_NOSIZE
| SWP_NOZORDER
|
305 AutoHRGN
hrgnChild(::CreateRectRgnIndirect(&rc
));
306 ::CombineRgn(hrgn
, hrgn
, hrgnChild
, RGN_DIFF
);
314 // helper for OnPaint(): really erase the background, i.e. do it even if we
315 // don't have any non default brush for doing it (DoEraseBackground() doesn't
316 // do anything in such case)
317 void wxStaticBox::PaintBackground(wxDC
& dc
, const RECT
& rc
)
319 // note that we do not use the box background colour here, it shouldn't
320 // apply to its interior for several reasons:
321 // 1. wxGTK doesn't do it
322 // 2. controls inside the box don't get correct bg colour because they
323 // are not our children so we'd have some really ugly colour mix if
325 // 3. this is backwards compatible behaviour and some people rely on it,
326 // see http://groups.google.com/groups?selm=4252E932.3080801%40able.es
327 wxWindow
*parent
= GetParent();
328 HBRUSH hbr
= (HBRUSH
)parent
->MSWGetBgBrush(dc
.GetHDC(), GetHWND());
330 // if there is no special brush for painting this control, just use the
331 // solid background colour
335 brush
= wxBrush(parent
->GetBackgroundColour());
336 hbr
= GetHbrushOf(brush
);
339 ::FillRect(GetHdcOf(dc
), &rc
, hbr
);
342 void wxStaticBox::OnPaint(wxPaintEvent
& WXUNUSED(event
))
345 ::GetClientRect(GetHwnd(), &rc
);
347 // draw the entire box in a memory DC
349 wxBitmap
bitmap(rc
.right
, rc
.bottom
);
350 memdc
.SelectObject(bitmap
);
352 PaintBackground(memdc
, rc
);
354 // NB: neither setting the text colour nor transparent background mode
355 // doesn't change anything: the static box def window proc still
356 // draws the label in its own colours, so if we want to have control
357 // over this we really have to draw everything ourselves
358 MSWDefWindowProc(WM_PAINT
, (WPARAM
)GetHdcOf(memdc
), 0);
361 // now only blit the static box border itself, not the interior, to avoid
362 // flicker when background is drawn below
364 // note that it seems to be faster to do 4 small blits here and then paint
365 // directly into wxPaintDC than painting background in wxMemoryDC and then
366 // blitting everything at once to wxPaintDC, this is why we do it like this
368 int borderTop
, border
;
369 GetBordersForSizer(&borderTop
, &border
);
372 dc
.Blit(border
, 0, rc
.right
- border
, borderTop
,
375 dc
.Blit(border
, rc
.bottom
- border
, rc
.right
- border
, rc
.bottom
,
376 &memdc
, border
, rc
.bottom
- border
);
378 dc
.Blit(0, 0, border
, rc
.bottom
,
381 dc
.Blit(rc
.right
- border
, 0, rc
.right
, rc
.bottom
,
382 &memdc
, rc
.right
- border
, 0);
385 // create the region excluding box children
386 AutoHRGN
hrgn((HRGN
)MSWGetRegionWithoutChildren());
388 ::GetWindowRect(GetHwnd(), &rcWin
);
389 ::OffsetRgn(hrgn
, -rcWin
.left
, -rcWin
.top
);
391 // and also the box itself
392 MSWGetRegionWithoutSelf((WXHRGN
) hrgn
, rc
.right
, rc
.bottom
);
393 HDCClipper
clipToBg(GetHdcOf(dc
), hrgn
);
395 // paint the inside of the box (excluding box itself and child controls)
396 PaintBackground(dc
, rc
);
399 #endif // !__WXWINCE__
401 #endif // wxUSE_STATBOX