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