]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/msw/radiobox.cpp
Avoid ICE with MinGW 2.95.3.
[wxWidgets.git] / src / msw / radiobox.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: msw/radiobox.cpp
3// Purpose: wxRadioBox implementation
4// Author: Julian Smart
5// Modified by:
6// Created: 04/01/98
7// RCS-ID: $Id$
8// Copyright: (c) Julian Smart
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
12// ===========================================================================
13// declarations
14// ===========================================================================
15
16// ---------------------------------------------------------------------------
17// headers
18// ---------------------------------------------------------------------------
19
20#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
21 #pragma implementation "radiobox.h"
22#endif
23
24// For compilers that support precompilation, includes "wx.h".
25#include "wx/wxprec.h"
26
27#ifdef __BORLANDC__
28 #pragma hdrstop
29#endif
30
31#if wxUSE_RADIOBOX
32
33#ifndef WX_PRECOMP
34 #include "wx/bitmap.h"
35 #include "wx/brush.h"
36 #include "wx/radiobox.h"
37 #include "wx/settings.h"
38 #include "wx/log.h"
39#endif
40
41#include "wx/msw/subwin.h"
42
43#if wxUSE_TOOLTIPS
44 #if !defined(__GNUWIN32_OLD__) || defined(__CYGWIN10__)
45 #include <commctrl.h>
46 #endif
47 #include "wx/tooltip.h"
48#endif // wxUSE_TOOLTIPS
49
50// TODO: wxCONSTRUCTOR
51#if 0 // wxUSE_EXTENDED_RTTI
52WX_DEFINE_FLAGS( wxRadioBoxStyle )
53
54wxBEGIN_FLAGS( wxRadioBoxStyle )
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)
63
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)
71
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)
81
82 wxFLAGS_MEMBER(wxRA_SPECIFY_COLS)
83 wxFLAGS_MEMBER(wxRA_HORIZONTAL)
84 wxFLAGS_MEMBER(wxRA_SPECIFY_ROWS)
85 wxFLAGS_MEMBER(wxRA_VERTICAL)
86
87wxEND_FLAGS( wxRadioBoxStyle )
88
89IMPLEMENT_DYNAMIC_CLASS_XTI(wxRadioBox, wxControl,"wx/radiobox.h")
90
91wxBEGIN_PROPERTIES_TABLE(wxRadioBox)
92 wxEVENT_PROPERTY( Select , wxEVT_COMMAND_RADIOBOX_SELECTED , wxCommandEvent )
93 wxPROPERTY_FLAGS( WindowStyle , wxRadioBoxStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
94wxEND_PROPERTIES_TABLE()
95
96#else
97IMPLEMENT_DYNAMIC_CLASS(wxRadioBox, wxControl)
98#endif
99
100/*
101 selection
102 content
103 label
104 dimension
105 item
106*/
107
108// ---------------------------------------------------------------------------
109// private functions
110// ---------------------------------------------------------------------------
111
112// wnd proc for radio buttons
113LRESULT APIENTRY _EXPORT wxRadioBtnWndProc(HWND hWnd,
114 UINT message,
115 WPARAM wParam,
116 LPARAM lParam);
117
118// ---------------------------------------------------------------------------
119// global vars
120// ---------------------------------------------------------------------------
121
122// the pointer to standard radio button wnd proc
123static WXFARPROC s_wndprocRadioBtn = (WXFARPROC)NULL;
124
125// ===========================================================================
126// implementation
127// ===========================================================================
128
129// ---------------------------------------------------------------------------
130// wxRadioBox creation
131// ---------------------------------------------------------------------------
132
133// Radio box item
134void wxRadioBox::Init()
135{
136 m_selectedButton = wxNOT_FOUND;
137 m_radioButtons = NULL;
138 m_majorDim = 0;
139 m_radioWidth = NULL;
140 m_radioHeight = NULL;
141}
142
143bool wxRadioBox::Create(wxWindow *parent,
144 wxWindowID id,
145 const wxString& title,
146 const wxPoint& pos,
147 const wxSize& size,
148 int n,
149 const wxString choices[],
150 int majorDim,
151 long style,
152 const wxValidator& val,
153 const wxString& name)
154{
155 // initialize members
156 m_majorDim = majorDim == 0 ? n : majorDim;
157
158 // common initialization
159 if ( !wxStaticBox::Create(parent, id, title, pos, size, style, name) )
160 return false;
161
162#if wxUSE_VALIDATORS
163 SetValidator(val);
164#else
165 wxUnusedVar(val);
166#endif // wxUSE_VALIDATORS/!wxUSE_VALIDATORS
167
168 m_radioButtons = new wxSubwindows(n);
169 m_radioWidth = new int[n];
170 m_radioHeight = new int[n];
171
172 for ( int i = 0; i < n; i++ )
173 {
174 m_radioWidth[i] =
175 m_radioHeight[i] = wxDefaultCoord;
176 long styleBtn = BS_AUTORADIOBUTTON | WS_TABSTOP | WS_CHILD | WS_VISIBLE;
177 if ( i == 0 )
178 styleBtn |= WS_GROUP;
179
180 long newId = NewControlId();
181
182 HWND hwndBtn = ::CreateWindow(_T("BUTTON"),
183 choices[i],
184 styleBtn,
185 0, 0, 0, 0, // will be set in SetSize()
186 GetHwnd(),
187 (HMENU)newId,
188 wxGetInstance(),
189 NULL);
190
191 if ( !hwndBtn )
192 {
193 wxLogLastError(wxT("CreateWindow(radio btn)"));
194
195 return false;
196 }
197
198 (*m_radioButtons)[i] = hwndBtn;
199
200 SubclassRadioButton((WXHWND)hwndBtn);
201
202 m_subControls.Add(newId);
203 }
204
205 // Create a dummy radio control to end the group.
206 (void)::CreateWindow(_T("BUTTON"),
207 wxEmptyString,
208 WS_GROUP | BS_AUTORADIOBUTTON | WS_CHILD,
209 0, 0, 0, 0, GetHwnd(),
210 (HMENU)NewControlId(), wxGetInstance(), NULL);
211
212 m_radioButtons->SetFont(GetFont());
213
214#ifdef __WXWINCE__
215 // Set the z-order correctly
216 SetWindowPos(GetHwnd(), HWND_BOTTOM, 0, 0, 0, 0, SWP_NOMOVE|SWP_NOSIZE);
217#endif
218
219 SetSelection(0);
220 SetSize(pos.x, pos.y, size.x, size.y);
221
222 // Now that we have items determine what is the best size and set it.
223 SetBestSize(size);
224
225 return true;
226}
227
228bool wxRadioBox::Create(wxWindow *parent,
229 wxWindowID id,
230 const wxString& title,
231 const wxPoint& pos,
232 const wxSize& size,
233 const wxArrayString& choices,
234 int majorDim,
235 long style,
236 const wxValidator& val,
237 const wxString& name)
238{
239 wxCArrayString chs(choices);
240 return Create(parent, id, title, pos, size, chs.GetCount(),
241 chs.GetStrings(), majorDim, style, val, name);
242}
243
244wxRadioBox::~wxRadioBox()
245{
246 m_isBeingDeleted = true;
247
248 delete m_radioButtons;
249 delete[] m_radioWidth;
250 delete[] m_radioHeight;
251}
252
253// NB: if this code is changed, wxGetWindowForHWND() which relies on having the
254// radiobox pointer in GWL_USERDATA for radio buttons must be updated too!
255void wxRadioBox::SubclassRadioButton(WXHWND hWndBtn)
256{
257 HWND hwndBtn = (HWND)hWndBtn;
258
259 if ( !s_wndprocRadioBtn )
260 s_wndprocRadioBtn = (WXFARPROC)wxGetWindowProc(hwndBtn);
261
262 wxSetWindowProc(hwndBtn, wxRadioBtnWndProc);
263 wxSetWindowUserData(hwndBtn, this);
264}
265
266// ----------------------------------------------------------------------------
267// events generation
268// ----------------------------------------------------------------------------
269
270bool wxRadioBox::MSWCommand(WXUINT cmd, WXWORD id)
271{
272 if ( cmd == BN_CLICKED )
273 {
274 if (id == GetId())
275 return true;
276
277 int selectedButton = wxNOT_FOUND;
278
279 int count = GetCount();
280 for ( int i = 0; i < count; i++ )
281 {
282 if ( id == wxGetWindowId((*m_radioButtons)[i]) )
283 {
284 selectedButton = i;
285
286 break;
287 }
288 }
289
290 if ( selectedButton == wxNOT_FOUND )
291 {
292 // just ignore it - due to a hack with WM_NCHITTEST handling in our
293 // wnd proc, we can receive dummy click messages when we click near
294 // the radiobox edge (this is ugly but Julian wouldn't let me get
295 // rid of this...)
296 return false;
297 }
298
299 if ( selectedButton != m_selectedButton )
300 {
301 m_selectedButton = selectedButton;
302
303 SendNotificationEvent();
304 }
305 //else: don't generate events when the selection doesn't change
306
307 return true;
308 }
309 else
310 return false;
311}
312
313void wxRadioBox::Command(wxCommandEvent & event)
314{
315 SetSelection (event.GetInt());
316 SetFocus();
317 ProcessCommand(event);
318}
319
320void wxRadioBox::SendNotificationEvent()
321{
322 wxCommandEvent event(wxEVT_COMMAND_RADIOBOX_SELECTED, m_windowId);
323 event.SetInt( m_selectedButton );
324 event.SetString( GetString(m_selectedButton) );
325 event.SetEventObject( this );
326 ProcessCommand(event);
327}
328
329// ----------------------------------------------------------------------------
330// simple accessors
331// ----------------------------------------------------------------------------
332
333int wxRadioBox::GetCount() const
334{
335 return m_radioButtons->GetCount();
336}
337
338// returns the number of rows
339int wxRadioBox::GetNumVer() const
340{
341 if ( m_windowStyle & wxRA_SPECIFY_ROWS )
342 {
343 return m_majorDim;
344 }
345 else
346 {
347 return (GetCount() + m_majorDim - 1)/m_majorDim;
348 }
349}
350
351// returns the number of columns
352int wxRadioBox::GetNumHor() const
353{
354 if ( m_windowStyle & wxRA_SPECIFY_ROWS )
355 {
356 return (GetCount() + m_majorDim - 1)/m_majorDim;
357 }
358 else
359 {
360 return m_majorDim;
361 }
362}
363
364void wxRadioBox::SetString(int item, const wxString& label)
365{
366 wxCHECK_RET( IsValid(item), wxT("invalid radiobox index") );
367
368 m_radioWidth[item] =
369 m_radioHeight[item] = wxDefaultCoord;
370
371 ::SetWindowText((*m_radioButtons)[item], label.c_str());
372}
373
374void wxRadioBox::SetSelection(int N)
375{
376 wxCHECK_RET( IsValid(N), wxT("invalid radiobox index") );
377
378 // unselect the old button
379 if ( m_selectedButton != wxNOT_FOUND )
380 ::SendMessage((*m_radioButtons)[m_selectedButton], BM_SETCHECK, 0, 0L);
381
382 // and select the new one
383 ::SendMessage((*m_radioButtons)[N], BM_SETCHECK, 1, 0L);
384
385 m_selectedButton = N;
386}
387
388// Find string for position
389wxString wxRadioBox::GetString(int item) const
390{
391 wxCHECK_MSG( IsValid(item), wxEmptyString,
392 wxT("invalid radiobox index") );
393
394 return wxGetWindowText((*m_radioButtons)[item]);
395}
396
397void wxRadioBox::SetFocus()
398{
399 if ( GetCount() > 0 )
400 {
401 ::SetFocus((*m_radioButtons)[m_selectedButton == wxNOT_FOUND
402 ? 0
403 : m_selectedButton]);
404 }
405}
406
407// Enable a specific button
408bool wxRadioBox::Enable(int item, bool enable)
409{
410 wxCHECK_MSG( IsValid(item), false,
411 wxT("invalid item in wxRadioBox::Enable()") );
412
413 BOOL ret = ::EnableWindow((*m_radioButtons)[item], enable);
414
415 return (ret == 0) == enable;
416}
417
418// Show a specific button
419bool wxRadioBox::Show(int item, bool show)
420{
421 wxCHECK_MSG( IsValid(item), false,
422 wxT("invalid item in wxRadioBox::Show()") );
423
424 BOOL ret = ::ShowWindow((*m_radioButtons)[item], show ? SW_SHOW : SW_HIDE);
425
426 return (ret != 0) == show;
427}
428
429WX_FORWARD_STD_METHODS_TO_SUBWINDOWS(wxRadioBox, wxStaticBox, m_radioButtons)
430
431// ----------------------------------------------------------------------------
432// size calculations
433// ----------------------------------------------------------------------------
434
435wxSize wxRadioBox::GetMaxButtonSize() const
436{
437 // calculate the max button size
438 int widthMax = 0,
439 heightMax = 0;
440 const int count = GetCount();
441 for ( int i = 0 ; i < count; i++ )
442 {
443 int width, height;
444 if ( m_radioWidth[i] < 0 )
445 {
446 GetTextExtent(wxGetWindowText((*m_radioButtons)[i]), &width, &height);
447
448 // adjust the size to take into account the radio box itself
449 // FIXME this is totally bogus!
450 width += RADIO_SIZE;
451 height *= 3;
452 height /= 2;
453 }
454 else
455 {
456 width = m_radioWidth[i];
457 height = m_radioHeight[i];
458 }
459
460 if ( widthMax < width )
461 widthMax = width;
462 if ( heightMax < height )
463 heightMax = height;
464 }
465
466 return wxSize(widthMax, heightMax);
467}
468
469wxSize wxRadioBox::GetTotalButtonSize(const wxSize& sizeBtn) const
470{
471 // the radiobox should be big enough for its buttons
472 int cx1, cy1;
473 wxGetCharSize(m_hWnd, &cx1, &cy1, GetFont());
474
475 int extraHeight = cy1;
476
477 int height = GetNumVer() * sizeBtn.y + cy1/2 + extraHeight;
478 int width = GetNumHor() * (sizeBtn.x + cx1) + cx1;
479
480 // Add extra space under the label, if it exists.
481 if (!wxControl::GetLabel().empty())
482 height += cy1/2;
483
484 // and also wide enough for its label
485 int widthLabel;
486 GetTextExtent(GetTitle(), &widthLabel, NULL);
487 widthLabel += RADIO_SIZE; // FIXME this is bogus too
488 if ( widthLabel > width )
489 width = widthLabel;
490
491 return wxSize(width, height);
492}
493
494wxSize wxRadioBox::DoGetBestSize() const
495{
496 return GetTotalButtonSize(GetMaxButtonSize());
497}
498
499// Restored old code.
500void wxRadioBox::DoSetSize(int x, int y, int width, int height, int sizeFlags)
501{
502 int currentX, currentY;
503 GetPosition(&currentX, &currentY);
504 int widthOld, heightOld;
505 GetSize(&widthOld, &heightOld);
506
507 int xx = x;
508 int yy = y;
509
510 if (x == wxDefaultCoord && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
511 xx = currentX;
512 if (y == wxDefaultCoord && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
513 yy = currentY;
514
515 int y_offset = 0;
516 int x_offset = 0;
517
518 int cx1, cy1;
519 wxGetCharSize(m_hWnd, &cx1, &cy1, GetFont());
520
521 // Attempt to have a look coherent with other platforms: We compute the
522 // biggest toggle dim, then we align all items according this value.
523 wxSize maxSize = GetMaxButtonSize();
524 int maxWidth = maxSize.x,
525 maxHeight = maxSize.y;
526
527 wxSize totSize = GetTotalButtonSize(maxSize);
528 int totWidth = totSize.x,
529 totHeight = totSize.y;
530
531 // only change our width/height if asked for
532 if ( width == wxDefaultCoord )
533 {
534 if ( sizeFlags & wxSIZE_AUTO_WIDTH )
535 width = totWidth;
536 else
537 width = widthOld;
538 }
539
540 if ( height == wxDefaultCoord )
541 {
542 if ( sizeFlags & wxSIZE_AUTO_HEIGHT )
543 height = totHeight;
544 else
545 height = heightOld;
546 }
547
548 ::MoveWindow(GetHwnd(), xx, yy, width, height, TRUE);
549
550 // Now position all the buttons: the current button will be put at
551 // wxPoint(x_offset, y_offset) and the new row/column will start at
552 // startX/startY. The size of all buttons will be the same wxSize(maxWidth,
553 // maxHeight) except for the buttons in the last column which should extend
554 // to the right border of radiobox and thus can be wider than this.
555
556 // Also, remember that wxRA_SPECIFY_COLS means that we arrange buttons in
557 // left to right order and m_majorDim is the number of columns while
558 // wxRA_SPECIFY_ROWS means that the buttons are arranged top to bottom and
559 // m_majorDim is the number of rows.
560
561 x_offset += cx1;
562 y_offset += cy1;
563
564 // Add extra space under the label, if it exists.
565 if (!wxControl::GetLabel().empty())
566 y_offset += cy1/2;
567
568 int startX = x_offset;
569 int startY = y_offset;
570
571 const int count = GetCount();
572 for ( int i = 0; i < count; i++ )
573 {
574 // the last button in the row may be wider than the other ones as the
575 // radiobox may be wider than the sum of the button widths (as it
576 // happens, for example, when the radiobox label is very long)
577 bool isLastInTheRow;
578 if ( m_windowStyle & wxRA_SPECIFY_COLS )
579 {
580 // item is the last in its row if it is a multiple of the number of
581 // columns or if it is just the last item
582 int n = i + 1;
583 isLastInTheRow = ((n % m_majorDim) == 0) || (n == count);
584 }
585 else // wxRA_SPECIFY_ROWS
586 {
587 // item is the last in the row if it is in the last columns
588 isLastInTheRow = i >= (count/m_majorDim)*m_majorDim;
589 }
590
591 // is this the start of new row/column?
592 if ( i && (i % m_majorDim == 0) )
593 {
594 if ( m_windowStyle & wxRA_SPECIFY_ROWS )
595 {
596 // start of new column
597 y_offset = startY;
598 x_offset += maxWidth + cx1;
599 }
600 else // start of new row
601 {
602 x_offset = startX;
603 y_offset += maxHeight;
604 if (m_radioWidth[0]>0)
605 y_offset += cy1/2;
606 }
607 }
608
609 int widthBtn;
610 if ( isLastInTheRow )
611 {
612 // make the button go to the end of radio box
613 widthBtn = startX + width - x_offset - 2*cx1;
614 if ( widthBtn < maxWidth )
615 widthBtn = maxWidth;
616 }
617 else
618 {
619 // normal button, always of the same size
620 widthBtn = maxWidth;
621 }
622
623 // make all buttons of the same, maximal size - like this they cover
624 // the radiobox entirely and the radiobox tooltips are always shown
625 // (otherwise they are not when the mouse pointer is in the radiobox
626 // part not belonging to any radiobutton)
627 ::MoveWindow((*m_radioButtons)[i],
628 x_offset, y_offset, widthBtn, maxHeight,
629 TRUE);
630
631 // where do we put the next button?
632 if ( m_windowStyle & wxRA_SPECIFY_ROWS )
633 {
634 // below this one
635 y_offset += maxHeight;
636 if (m_radioWidth[0]>0)
637 y_offset += cy1/2;
638 }
639 else
640 {
641 // to the right of this one
642 x_offset += widthBtn + cx1;
643 }
644 }
645}
646
647// ----------------------------------------------------------------------------
648// radio box drawing
649// ----------------------------------------------------------------------------
650
651#ifndef __WXWINCE__
652
653WXHRGN wxRadioBox::MSWGetRegionWithoutChildren()
654{
655 RECT rc;
656 ::GetWindowRect(GetHwnd(), &rc);
657 HRGN hrgn = ::CreateRectRgn(rc.left, rc.top, rc.right + 1, rc.bottom + 1);
658
659 const size_t count = GetCount();
660 for ( size_t i = 0; i < count; ++i )
661 {
662 ::GetWindowRect((*m_radioButtons)[i], &rc);
663 AutoHRGN hrgnchild(::CreateRectRgnIndirect(&rc));
664 ::CombineRgn(hrgn, hrgn, hrgnchild, RGN_DIFF);
665 }
666
667 return (WXHRGN)hrgn;
668}
669
670WXLRESULT
671wxRadioBox::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
672{
673 if ( nMsg == WM_PRINTCLIENT )
674 {
675 // we have to process WM_PRINTCLIENT ourselves as otherwise the radio
676 // buttons background would never be drawn unless we have a parent with
677 // non default background
678
679 // so check first if we have one
680 if ( !HandlePrintClient((WXHDC)wParam) )
681 {
682 // no, we don't, erase the background ourselves (don't use our own
683 // colour as with static box, see comments there)
684 wxBrush brush(GetParent()->GetBackgroundColour());
685 wxFillRect(GetHwnd(), (HDC)wParam, GetHbrushOf(brush));
686 }
687
688 return 0;
689 }
690
691 return wxStaticBox::MSWWindowProc(nMsg, wParam, lParam);
692}
693
694#endif // __WXWINCE__
695
696// ---------------------------------------------------------------------------
697// window proc for radio buttons
698// ---------------------------------------------------------------------------
699
700LRESULT APIENTRY _EXPORT wxRadioBtnWndProc(HWND hwnd,
701 UINT message,
702 WPARAM wParam,
703 LPARAM lParam)
704{
705 switch ( message )
706 {
707 case WM_GETDLGCODE:
708 // we must tell IsDialogMessage()/our kbd processing code that we
709 // want to process arrows ourselves because neither of them is
710 // smart enough to handle arrows properly for us
711 {
712 long lDlgCode = ::CallWindowProc(CASTWNDPROC s_wndprocRadioBtn, hwnd,
713 message, wParam, lParam);
714
715 return lDlgCode | DLGC_WANTARROWS;
716 }
717
718#if wxUSE_TOOLTIPS
719 case WM_NOTIFY:
720 {
721 NMHDR* hdr = (NMHDR *)lParam;
722 if ( hdr->code == TTN_NEEDTEXT )
723 {
724 wxRadioBox *
725 radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd);
726
727 wxCHECK_MSG( radiobox, 0,
728 wxT("radio button without radio box?") );
729
730 wxToolTip *tooltip = radiobox->GetToolTip();
731 if ( tooltip )
732 {
733 TOOLTIPTEXT *ttt = (TOOLTIPTEXT *)lParam;
734 ttt->lpszText = (wxChar *)tooltip->GetTip().c_str();
735 }
736
737 // processed
738 return 0;
739 }
740 }
741 break;
742#endif // wxUSE_TOOLTIPS
743
744 case WM_KEYDOWN:
745 {
746 wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd);
747
748 wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") );
749
750 bool processed = true;
751
752 wxDirection dir;
753 switch ( wParam )
754 {
755 case VK_UP:
756 dir = wxUP;
757 break;
758
759 case VK_LEFT:
760 dir = wxLEFT;
761 break;
762
763 case VK_DOWN:
764 dir = wxDOWN;
765 break;
766
767 case VK_RIGHT:
768 dir = wxRIGHT;
769 break;
770
771 default:
772 processed = false;
773
774 // just to suppress the compiler warning
775 dir = wxALL;
776 }
777
778 if ( processed )
779 {
780 int selOld = radiobox->GetSelection();
781 int selNew = radiobox->GetNextItem
782 (
783 selOld,
784 dir,
785 radiobox->GetWindowStyle()
786 );
787
788 if ( selNew != selOld )
789 {
790 radiobox->SetSelection(selNew);
791 radiobox->SetFocus();
792
793 // emulate the button click
794 radiobox->SendNotificationEvent();
795
796 return 0;
797 }
798 }
799 }
800 break;
801
802 case WM_SETFOCUS:
803 case WM_KILLFOCUS:
804 {
805 wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd);
806
807 wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") );
808
809 // if we don't do this, no focus events are generated for the
810 // radiobox and, besides, we need to notify the parent about
811 // the focus change, otherwise the focus handling logic in
812 // wxControlContainer doesn't work
813 if ( message == WM_SETFOCUS )
814 radiobox->HandleSetFocus((WXHWND)wParam);
815 else
816 radiobox->HandleKillFocus((WXHWND)wParam);
817 }
818 break;
819
820#ifndef __WXWINCE__
821 case WM_HELP:
822 {
823 wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd);
824
825 wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") );
826
827 bool processed = false;
828
829 wxEvtHandler * const handler = radiobox->GetEventHandler();
830
831 HELPINFO* info = (HELPINFO*) lParam;
832 if ( info->iContextType == HELPINFO_WINDOW )
833 {
834 for ( wxWindow* subjectOfHelp = radiobox;
835 subjectOfHelp;
836 subjectOfHelp = subjectOfHelp->GetParent() )
837 {
838 wxHelpEvent helpEvent(wxEVT_HELP,
839 subjectOfHelp->GetId(),
840 wxPoint(info->MousePos.x,
841 info->MousePos.y));
842 helpEvent.SetEventObject(radiobox);
843 if ( handler->ProcessEvent(helpEvent) )
844 {
845 processed = true;
846 break;
847 }
848 }
849 }
850 else if (info->iContextType == HELPINFO_MENUITEM)
851 {
852 wxHelpEvent helpEvent(wxEVT_HELP, info->iCtrlId);
853 helpEvent.SetEventObject(radiobox);
854 processed = handler->ProcessEvent(helpEvent);
855 }
856
857 if ( processed )
858 return 0;
859 }
860 break;
861#endif // !__WXWINCE__
862 }
863
864 return ::CallWindowProc(CASTWNDPROC s_wndprocRadioBtn, hwnd, message, wParam, lParam);
865}
866
867#endif // wxUSE_RADIOBOX
868