]> git.saurik.com Git - wxWidgets.git/blob - src/msw/radiobox.cpp
fixed ambiguous call to wxMacCarbonEvent::SetParameter
[wxWidgets.git] / src / msw / radiobox.cpp
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/private.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
52 WX_DEFINE_FLAGS( wxRadioBoxStyle )
53
54 wxBEGIN_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
87 wxEND_FLAGS( wxRadioBoxStyle )
88
89 IMPLEMENT_DYNAMIC_CLASS_XTI(wxRadioBox, wxControl,"wx/radiobox.h")
90
91 wxBEGIN_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
94 wxEND_PROPERTIES_TABLE()
95
96 #else
97 IMPLEMENT_DYNAMIC_CLASS(wxRadioBox, wxControl)
98 #endif
99
100 /*
101 selection
102 content
103 label
104 dimension
105 item
106 */
107
108 // there are two possible ways to create the radio buttons: either as children
109 // of the radiobox or as siblings of it - allow playing with both variants for
110 // now, eventually we will choose the best one for our purposes
111 //
112 // two main problems are the keyboard navigation inside the radiobox (arrows
113 // should switch between buttons, not pass focus to the next control) and the
114 // tooltips - a tooltip is associated with the radiobox itself, not the
115 // children...
116 //
117 // the problems with setting this to 1:
118 // a) Alt-<mnemonic of radiobox> isn't handled properly by IsDialogMessage()
119 // because it sets focus to the next control accepting it which is not a
120 // radio button but a radiobox sibling in this case - the only solution to
121 // this would be to handle Alt-<mnemonic> ourselves
122 // b) the problems with setting radiobox colours under Win98/2K were reported
123 // but I couldn't reproduce it so I have no idea about what causes it
124 //
125 // the problems with setting this to 0:
126 // a) the tooltips are not shown for the radiobox - possible solution: make
127 // TTM_WINDOWFROMPOS handling code in msw/tooltip.cpp work (easier said than
128 // done because I don't know why it doesn't work)
129 #define RADIOBTN_PARENT_IS_RADIOBOX 0
130
131 // ---------------------------------------------------------------------------
132 // private functions
133 // ---------------------------------------------------------------------------
134
135 // wnd proc for radio buttons
136 #ifdef __WIN32__
137 LRESULT APIENTRY _EXPORT wxRadioBtnWndProc(HWND hWnd,
138 UINT message,
139 WPARAM wParam,
140 LPARAM lParam);
141
142 // ---------------------------------------------------------------------------
143 // global vars
144 // ---------------------------------------------------------------------------
145
146 // the pointer to standard radio button wnd proc
147 static WXFARPROC s_wndprocRadioBtn = (WXFARPROC)NULL;
148
149 #endif // __WIN32__
150
151 // ===========================================================================
152 // implementation
153 // ===========================================================================
154
155 // ---------------------------------------------------------------------------
156 // wxRadioBox
157 // ---------------------------------------------------------------------------
158
159 int wxRadioBox::GetCount() const
160 {
161 return m_noItems;
162 }
163
164 int wxRadioBox::GetColumnCount() const
165 {
166 return GetNumHor();
167 }
168
169 int wxRadioBox::GetRowCount() const
170 {
171 return GetNumVer();
172 }
173
174 // returns the number of rows
175 int wxRadioBox::GetNumVer() const
176 {
177 if ( m_windowStyle & wxRA_SPECIFY_ROWS )
178 {
179 return m_majorDim;
180 }
181 else
182 {
183 return (m_noItems + m_majorDim - 1)/m_majorDim;
184 }
185 }
186
187 // returns the number of columns
188 int wxRadioBox::GetNumHor() const
189 {
190 if ( m_windowStyle & wxRA_SPECIFY_ROWS )
191 {
192 return (m_noItems + m_majorDim - 1)/m_majorDim;
193 }
194 else
195 {
196 return m_majorDim;
197 }
198 }
199
200 bool wxRadioBox::MSWCommand(WXUINT cmd, WXWORD id)
201 {
202 if ( cmd == BN_CLICKED )
203 {
204 if (id == GetId())
205 return TRUE;
206
207 int selectedButton = -1;
208
209 for ( int i = 0; i < m_noItems; i++ )
210 {
211 if ( id == wxGetWindowId(m_radioButtons[i]) )
212 {
213 selectedButton = i;
214
215 break;
216 }
217 }
218
219 if ( selectedButton == -1 )
220 {
221 // just ignore it - due to a hack with WM_NCHITTEST handling in our
222 // wnd proc, we can receive dummy click messages when we click near
223 // the radiobox edge (this is ugly but Julian wouldn't let me get
224 // rid of this...)
225 return FALSE;
226 }
227
228 if ( selectedButton != m_selectedButton )
229 {
230 m_selectedButton = selectedButton;
231
232 SendNotificationEvent();
233 }
234 //else: don't generate events when the selection doesn't change
235
236 return TRUE;
237 }
238 else
239 return FALSE;
240 }
241
242 // Radio box item
243 wxRadioBox::wxRadioBox()
244 {
245 m_selectedButton = -1;
246 m_noItems = 0;
247 m_noRowsOrCols = 0;
248 m_radioButtons = NULL;
249 m_majorDim = 0;
250 m_radioWidth = NULL;
251 m_radioHeight = NULL;
252 }
253
254 bool wxRadioBox::Create(wxWindow *parent,
255 wxWindowID id,
256 const wxString& title,
257 const wxPoint& pos,
258 const wxSize& size,
259 int n,
260 const wxString choices[],
261 int majorDim,
262 long style,
263 const wxValidator& val,
264 const wxString& name)
265 {
266 // initialize members
267 m_selectedButton = -1;
268 m_noItems = 0;
269
270 m_majorDim = majorDim == 0 ? n : majorDim;
271 m_noRowsOrCols = majorDim;
272
273 // common initialization
274 if ( !CreateControl(parent, id, pos, size, style, val, name) )
275 return FALSE;
276
277 // create the static box
278 if ( !MSWCreateControl(wxT("BUTTON"), BS_GROUPBOX | WS_GROUP,
279 pos, size, title, 0) )
280 return FALSE;
281
282 // and now create the buttons
283 m_noItems = n;
284 #if RADIOBTN_PARENT_IS_RADIOBOX
285 HWND hwndParent = GetHwnd();
286 #else
287 HWND hwndParent = GetHwndOf(parent);
288 #endif
289
290 // Some radio boxes test consecutive id.
291 (void)NewControlId();
292 m_radioButtons = new WXHWND[n];
293 m_radioWidth = new int[n];
294 m_radioHeight = new int[n];
295
296 WXHFONT hfont = 0;
297 wxFont& font = GetFont();
298 if ( font.Ok() )
299 {
300 hfont = font.GetResourceHandle();
301 }
302
303 for ( int i = 0; i < n; i++ )
304 {
305 m_radioWidth[i] =
306 m_radioHeight[i] = -1;
307 long styleBtn = BS_AUTORADIOBUTTON | WS_TABSTOP | WS_CHILD | WS_VISIBLE;
308 if ( i == 0 && style == 0 )
309 styleBtn |= WS_GROUP;
310
311 long newId = NewControlId();
312
313 HWND hwndBtn = ::CreateWindow(_T("BUTTON"),
314 choices[i],
315 styleBtn,
316 0, 0, 0, 0, // will be set in SetSize()
317 hwndParent,
318 (HMENU)newId,
319 wxGetInstance(),
320 NULL);
321
322 if ( !hwndBtn )
323 {
324 wxLogLastError(wxT("CreateWindow(radio btn)"));
325
326 return FALSE;
327 }
328
329 m_radioButtons[i] = (WXHWND)hwndBtn;
330
331 SubclassRadioButton((WXHWND)hwndBtn);
332
333 if ( hfont )
334 {
335 ::SendMessage(hwndBtn, WM_SETFONT, (WPARAM)hfont, 0L);
336 }
337
338 m_subControls.Add(newId);
339 }
340
341 // Create a dummy radio control to end the group.
342 (void)::CreateWindow(_T("BUTTON"),
343 wxEmptyString,
344 WS_GROUP | BS_AUTORADIOBUTTON | WS_CHILD,
345 0, 0, 0, 0, hwndParent,
346 (HMENU)NewControlId(), wxGetInstance(), NULL);
347
348 SetSelection(0);
349 SetSize(pos.x, pos.y, size.x, size.y);
350
351 // Now that we have items determine what is the best size and set it.
352 SetBestSize(size);
353
354 return TRUE;
355 }
356
357 bool wxRadioBox::Create(wxWindow *parent,
358 wxWindowID id,
359 const wxString& title,
360 const wxPoint& pos,
361 const wxSize& size,
362 const wxArrayString& choices,
363 int majorDim,
364 long style,
365 const wxValidator& val,
366 const wxString& name)
367 {
368 wxCArrayString chs(choices);
369 return Create(parent, id, title, pos, size, chs.GetCount(),
370 chs.GetStrings(), majorDim, style, val, name);
371 }
372
373 wxRadioBox::~wxRadioBox()
374 {
375 m_isBeingDeleted = TRUE;
376
377 if (m_radioButtons)
378 {
379 int i;
380 for (i = 0; i < m_noItems; i++)
381 ::DestroyWindow((HWND)m_radioButtons[i]);
382 delete[] m_radioButtons;
383 }
384
385 if (m_radioWidth)
386 delete[] m_radioWidth;
387 if (m_radioHeight)
388 delete[] m_radioHeight;
389
390 }
391
392 void wxRadioBox::SetString(int item, const wxString& label)
393 {
394 wxCHECK_RET( item >= 0 && item < m_noItems, wxT("invalid radiobox index") );
395
396 m_radioWidth[item] = m_radioHeight[item] = -1;
397 SetWindowText((HWND)m_radioButtons[item], label.c_str());
398 }
399
400 void wxRadioBox::SetSelection(int N)
401 {
402 wxCHECK_RET( (N >= 0) && (N < m_noItems), wxT("invalid radiobox index") );
403
404 // Following necessary for Win32s, because Win32s translate BM_SETCHECK
405 if (m_selectedButton >= 0 && m_selectedButton < m_noItems)
406 ::SendMessage((HWND) m_radioButtons[m_selectedButton], BM_SETCHECK, 0, 0L);
407
408 ::SendMessage((HWND)m_radioButtons[N], BM_SETCHECK, 1, 0L);
409
410 m_selectedButton = N;
411 }
412
413 // Get single selection, for single choice list items
414 int wxRadioBox::GetSelection() const
415 {
416 return m_selectedButton;
417 }
418
419 // Find string for position
420 wxString wxRadioBox::GetString(int item) const
421 {
422 wxCHECK_MSG( item >= 0 && item < m_noItems, wxEmptyString,
423 wxT("invalid radiobox index") );
424
425 return wxGetWindowText(m_radioButtons[item]);
426 }
427
428 // ----------------------------------------------------------------------------
429 // size calculations
430 // ----------------------------------------------------------------------------
431
432 wxSize wxRadioBox::GetMaxButtonSize() const
433 {
434 // calculate the max button size
435 int widthMax = 0,
436 heightMax = 0;
437 for ( int i = 0 ; i < m_noItems; i++ )
438 {
439 int width, height;
440 if ( m_radioWidth[i] < 0 )
441 {
442 GetTextExtent(wxGetWindowText(m_radioButtons[i]), &width, &height);
443
444 // adjust the size to take into account the radio box itself
445 // FIXME this is totally bogus!
446 width += RADIO_SIZE;
447 height *= 3;
448 height /= 2;
449 }
450 else
451 {
452 width = m_radioWidth[i];
453 height = m_radioHeight[i];
454 }
455
456 if ( widthMax < width )
457 widthMax = width;
458 if ( heightMax < height )
459 heightMax = height;
460 }
461
462 return wxSize(widthMax, heightMax);
463 }
464
465 wxSize wxRadioBox::GetTotalButtonSize(const wxSize& sizeBtn) const
466 {
467 // the radiobox should be big enough for its buttons
468 int cx1, cy1;
469 wxGetCharSize(m_hWnd, &cx1, &cy1, &GetFont());
470
471 int extraHeight = cy1;
472
473 /* We'll assume the adjustments below are OK for Win 3.1 too
474 #if defined(CTL3D) && !CTL3D
475 // Requires a bigger group box in plain Windows
476 extraHeight *= 3;
477 extraHeight /= 2;
478 #endif
479 */
480
481 int height = GetNumVer() * sizeBtn.y + cy1/2 + extraHeight;
482 int width = GetNumHor() * (sizeBtn.x + cx1) + cx1;
483
484 // Add extra space under the label, if it exists.
485 if (!wxControl::GetLabel().IsEmpty())
486 height += cy1/2;
487
488 // and also wide enough for its label
489 int widthLabel;
490 GetTextExtent(GetTitle(), &widthLabel, NULL);
491 widthLabel += RADIO_SIZE; // FIXME this is bogus too
492 if ( widthLabel > width )
493 width = widthLabel;
494
495 return wxSize(width, height);
496 }
497
498 wxSize wxRadioBox::DoGetBestSize() const
499 {
500 return GetTotalButtonSize(GetMaxButtonSize());
501 }
502
503 // Restored old code.
504 void wxRadioBox::DoSetSize(int x, int y, int width, int height, int sizeFlags)
505 {
506 int currentX, currentY;
507 GetPosition(&currentX, &currentY);
508 int widthOld, heightOld;
509 GetSize(&widthOld, &heightOld);
510
511 int xx = x;
512 int yy = y;
513
514 if (x == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
515 xx = currentX;
516 if (y == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
517 yy = currentY;
518
519 #if RADIOBTN_PARENT_IS_RADIOBOX
520 int y_offset = 0;
521 int x_offset = 0;
522 #else
523 int y_offset = yy;
524 int x_offset = xx;
525 #endif
526
527 int cx1, cy1;
528 wxGetCharSize(m_hWnd, &cx1, &cy1, & GetFont());
529
530 // Attempt to have a look coherent with other platforms: We compute the
531 // biggest toggle dim, then we align all items according this value.
532 wxSize maxSize = GetMaxButtonSize();
533 int maxWidth = maxSize.x,
534 maxHeight = maxSize.y;
535
536 wxSize totSize = GetTotalButtonSize(maxSize);
537 int totWidth = totSize.x,
538 totHeight = totSize.y;
539
540 // only change our width/height if asked for
541 if ( width == -1 )
542 {
543 if ( sizeFlags & wxSIZE_AUTO_WIDTH )
544 width = totWidth;
545 else
546 width = widthOld;
547 }
548
549 if ( height == -1 )
550 {
551 if ( sizeFlags & wxSIZE_AUTO_HEIGHT )
552 height = totHeight;
553 else
554 height = heightOld;
555 }
556
557 ::MoveWindow(GetHwnd(), xx, yy, width, height, TRUE);
558
559 // Now position all the buttons: the current button will be put at
560 // wxPoint(x_offset, y_offset) and the new row/column will start at
561 // startX/startY. The size of all buttons will be the same wxSize(maxWidth,
562 // maxHeight) except for the buttons in the last column which should extend
563 // to the right border of radiobox and thus can be wider than this.
564
565 // Also, remember that wxRA_SPECIFY_COLS means that we arrange buttons in
566 // left to right order and m_majorDim is the number of columns while
567 // wxRA_SPECIFY_ROWS means that the buttons are arranged top to bottom and
568 // m_majorDim is the number of rows.
569
570 x_offset += cx1;
571 y_offset += cy1;
572
573 // Add extra space under the label, if it exists.
574 if (!wxControl::GetLabel().IsEmpty())
575 y_offset += cy1/2;
576
577 int startX = x_offset;
578 int startY = y_offset;
579
580 for ( int i = 0; i < m_noItems; i++ )
581 {
582 // the last button in the row may be wider than the other ones as the
583 // radiobox may be wider than the sum of the button widths (as it
584 // happens, for example, when the radiobox label is very long)
585 bool isLastInTheRow;
586 if ( m_windowStyle & wxRA_SPECIFY_COLS )
587 {
588 // item is the last in its row if it is a multiple of the number of
589 // columns or if it is just the last item
590 int n = i + 1;
591 isLastInTheRow = ((n % m_majorDim) == 0) || (n == m_noItems);
592 }
593 else // wxRA_SPECIFY_ROWS
594 {
595 // item is the last in the row if it is in the last columns
596 isLastInTheRow = i >= (m_noItems/m_majorDim)*m_majorDim;
597 }
598
599 // is this the start of new row/column?
600 if ( i && (i % m_majorDim == 0) )
601 {
602 if ( m_windowStyle & wxRA_SPECIFY_ROWS )
603 {
604 // start of new column
605 y_offset = startY;
606 x_offset += maxWidth + cx1;
607 }
608 else // start of new row
609 {
610 x_offset = startX;
611 y_offset += maxHeight;
612 if (m_radioWidth[0]>0)
613 y_offset += cy1/2;
614 }
615 }
616
617 int widthBtn;
618 if ( isLastInTheRow )
619 {
620 // make the button go to the end of radio box
621 widthBtn = startX + width - x_offset - 2*cx1;
622 if ( widthBtn < maxWidth )
623 widthBtn = maxWidth;
624 }
625 else
626 {
627 // normal button, always of the same size
628 widthBtn = maxWidth;
629 }
630
631 // VZ: make all buttons of the same, maximal size - like this they
632 // cover the radiobox entirely and the radiobox tooltips are always
633 // shown (otherwise they are not when the mouse pointer is in the
634 // radiobox part not belonging to any radiobutton)
635 ::MoveWindow((HWND)m_radioButtons[i],
636 x_offset, y_offset, widthBtn, maxHeight,
637 TRUE);
638
639 // where do we put the next button?
640 if ( m_windowStyle & wxRA_SPECIFY_ROWS )
641 {
642 // below this one
643 y_offset += maxHeight;
644 if (m_radioWidth[0]>0)
645 y_offset += cy1/2;
646 }
647 else
648 {
649 // to the right of this one
650 x_offset += widthBtn + cx1;
651 }
652 }
653 }
654
655 void wxRadioBox::GetSize(int *width, int *height) const
656 {
657 RECT rect;
658 rect.left = -1; rect.right = -1; rect.top = -1; rect.bottom = -1;
659
660 if (m_hWnd)
661 wxFindMaxSize(m_hWnd, &rect);
662
663 int i;
664 for (i = 0; i < m_noItems; i++)
665 wxFindMaxSize(m_radioButtons[i], &rect);
666
667 *width = rect.right - rect.left;
668 *height = rect.bottom - rect.top;
669 }
670
671 void wxRadioBox::GetPosition(int *x, int *y) const
672 {
673 wxWindow *parent = GetParent();
674 RECT rect = { -1, -1, -1, -1 };
675
676 int i;
677 for (i = 0; i < m_noItems; i++)
678 wxFindMaxSize(m_radioButtons[i], &rect);
679
680 if (m_hWnd)
681 wxFindMaxSize(m_hWnd, &rect);
682
683 // Since we now have the absolute screen coords, if there's a parent we
684 // must subtract its top left corner
685 POINT point;
686 point.x = rect.left;
687 point.y = rect.top;
688 if (parent)
689 {
690 ::ScreenToClient((HWND) parent->GetHWND(), &point);
691 }
692
693 // We may be faking the client origin. So a window that's really at (0, 30)
694 // may appear (to wxWin apps) to be at (0, 0).
695 if (GetParent())
696 {
697 wxPoint pt(GetParent()->GetClientAreaOrigin());
698 point.x -= pt.x;
699 point.y -= pt.y;
700 }
701
702 *x = point.x;
703 *y = point.y;
704 }
705
706 void wxRadioBox::SetFocus()
707 {
708 if (m_noItems > 0)
709 {
710 ::SetFocus((HWND)m_radioButtons[m_selectedButton == -1
711 ? 0
712 : m_selectedButton]);
713 }
714
715 }
716
717 bool wxRadioBox::Show(bool show)
718 {
719 if ( !wxControl::Show(show) )
720 return FALSE;
721
722 int nCmdShow = show ? SW_SHOW : SW_HIDE;
723 for ( int i = 0; i < m_noItems; i++ )
724 {
725 ::ShowWindow((HWND)m_radioButtons[i], nCmdShow);
726 }
727
728 return TRUE;
729 }
730
731 // Enable a specific button
732 void wxRadioBox::Enable(int item, bool enable)
733 {
734 wxCHECK_RET( item >= 0 && item < m_noItems,
735 wxT("invalid item in wxRadioBox::Enable()") );
736
737 ::EnableWindow((HWND) m_radioButtons[item], enable);
738 }
739
740 // Enable all controls
741 bool wxRadioBox::Enable(bool enable)
742 {
743 if ( !wxControl::Enable(enable) )
744 return FALSE;
745
746 for (int i = 0; i < m_noItems; i++)
747 ::EnableWindow((HWND) m_radioButtons[i], enable);
748
749 return TRUE;
750 }
751
752 // Show a specific button
753 void wxRadioBox::Show(int item, bool show)
754 {
755 wxCHECK_RET( item >= 0 && item < m_noItems,
756 wxT("invalid item in wxRadioBox::Show()") );
757
758 ::ShowWindow((HWND)m_radioButtons[item], show ? SW_SHOW : SW_HIDE);
759 }
760
761 bool wxRadioBox::ContainsHWND(WXHWND hWnd) const
762 {
763 size_t count = GetCount();
764 for ( size_t i = 0; i < count; i++ )
765 {
766 if ( GetRadioButtons()[i] == hWnd )
767 return TRUE;
768 }
769
770 return FALSE;
771 }
772
773 void wxRadioBox::Command(wxCommandEvent & event)
774 {
775 SetSelection (event.m_commandInt);
776 SetFocus();
777 ProcessCommand (event);
778 }
779
780 // NB: if this code is changed, wxGetWindowForHWND() which relies on having the
781 // radiobox pointer in GWL_USERDATA for radio buttons must be updated too!
782 void wxRadioBox::SubclassRadioButton(WXHWND hWndBtn)
783 {
784 HWND hwndBtn = (HWND)hWndBtn;
785
786 if ( !s_wndprocRadioBtn )
787 s_wndprocRadioBtn = (WXFARPROC)wxGetWindowProc(hwndBtn);
788
789 wxSetWindowProc(hwndBtn, wxRadioBtnWndProc);
790 wxSetWindowUserData(hwndBtn, this);
791 }
792
793 void wxRadioBox::SendNotificationEvent()
794 {
795 wxCommandEvent event(wxEVT_COMMAND_RADIOBOX_SELECTED, m_windowId);
796 event.SetInt( m_selectedButton );
797 event.SetString( GetString(m_selectedButton) );
798 event.SetEventObject( this );
799 ProcessCommand(event);
800 }
801
802 bool wxRadioBox::SetFont(const wxFont& font)
803 {
804 if ( !wxControl::SetFont(font) )
805 {
806 // nothing to do
807 return FALSE;
808 }
809
810 // also set the font of our radio buttons
811 WXHFONT hfont = wxFont(font).GetResourceHandle();
812 for ( int n = 0; n < m_noItems; n++ )
813 {
814 HWND hwndBtn = (HWND)m_radioButtons[n];
815 ::SendMessage(hwndBtn, WM_SETFONT, (WPARAM)hfont, 0L);
816
817 // otherwise the buttons are not redrawn correctly
818 ::InvalidateRect(hwndBtn, NULL, FALSE /* don't erase bg */);
819 }
820
821 return TRUE;
822 }
823
824 // ----------------------------------------------------------------------------
825 // our window proc
826 // ----------------------------------------------------------------------------
827
828 WXLRESULT wxRadioBox::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
829 {
830 switch ( nMsg )
831 {
832 #ifdef __WIN32__
833 case WM_CTLCOLORSTATIC:
834 // set the colour of the radio buttons to be the same as ours
835 {
836 HDC hdc = (HDC)wParam;
837
838 const wxColour& colBack = GetBackgroundColour();
839 ::SetBkColor(hdc, wxColourToRGB(colBack));
840 ::SetTextColor(hdc, wxColourToRGB(GetForegroundColour()));
841
842 wxBrush *brush = wxTheBrushList->FindOrCreateBrush(colBack, wxSOLID);
843
844 return (WXLRESULT)brush->GetResourceHandle();
845 }
846 #endif // Win32
847
848 // VZ: this code breaks radiobox redrawing under Windows XP, don't use
849 // it. If you need to get messages from the static controls,
850 // create them as a child of another (non static) window
851 #if 0
852 // This is required for the radiobox to be sensitive to mouse input,
853 // e.g. for Dialog Editor.
854 case WM_NCHITTEST:
855 {
856 int xPos = LOWORD(lParam); // horizontal position of cursor
857 int yPos = HIWORD(lParam); // vertical position of cursor
858
859 ScreenToClient(&xPos, &yPos);
860
861 // Make sure you can drag by the top of the groupbox, but let
862 // other (enclosed) controls get mouse events also
863 if (yPos < 10)
864 return (long)HTCLIENT;
865 }
866 break;
867 #endif // 0
868 }
869
870 return wxControl::MSWWindowProc(nMsg, wParam, lParam);
871 }
872
873 WXHBRUSH wxRadioBox::OnCtlColor(WXHDC pDC, WXHWND WXUNUSED(pWnd), WXUINT WXUNUSED(nCtlColor),
874 #if wxUSE_CTL3D
875 WXUINT message,
876 WXWPARAM wParam,
877 WXLPARAM lParam
878 #else
879 WXUINT WXUNUSED(message),
880 WXWPARAM WXUNUSED(wParam),
881 WXLPARAM WXUNUSED(lParam)
882 #endif
883 )
884 {
885 #if wxUSE_CTL3D
886 if ( m_useCtl3D )
887 {
888 HBRUSH hbrush = Ctl3dCtlColorEx(message, wParam, lParam);
889 return (WXHBRUSH) hbrush;
890 }
891 #endif // wxUSE_CTL3D
892
893 HDC hdc = (HDC)pDC;
894 wxColour colBack = GetBackgroundColour();
895
896 ::SetBkColor(hdc, wxColourToRGB(colBack));
897 ::SetTextColor(hdc, wxColourToRGB(GetForegroundColour()));
898
899 wxBrush *brush = wxTheBrushList->FindOrCreateBrush(colBack, wxSOLID);
900
901 return (WXHBRUSH)brush->GetResourceHandle();
902 }
903
904
905 // ---------------------------------------------------------------------------
906 // window proc for radio buttons
907 // ---------------------------------------------------------------------------
908
909 #ifdef __WIN32__
910
911 LRESULT APIENTRY _EXPORT wxRadioBtnWndProc(HWND hwnd,
912 UINT message,
913 WPARAM wParam,
914 LPARAM lParam)
915 {
916 switch ( message )
917 {
918 case WM_GETDLGCODE:
919 // we must tell IsDialogMessage()/our kbd processing code that we
920 // want to process arrows ourselves because neither of them is
921 // smart enough to handle arrows properly for us
922 {
923 long lDlgCode = ::CallWindowProc(CASTWNDPROC s_wndprocRadioBtn, hwnd,
924 message, wParam, lParam);
925
926 return lDlgCode | DLGC_WANTARROWS;
927 }
928
929 #if wxUSE_TOOLTIPS
930 case WM_NOTIFY:
931 {
932 NMHDR* hdr = (NMHDR *)lParam;
933 if ( hdr->code == TTN_NEEDTEXT )
934 {
935 wxRadioBox *
936 radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd);
937
938 wxCHECK_MSG( radiobox, 0,
939 wxT("radio button without radio box?") );
940
941 wxToolTip *tooltip = radiobox->GetToolTip();
942 if ( tooltip )
943 {
944 TOOLTIPTEXT *ttt = (TOOLTIPTEXT *)lParam;
945 ttt->lpszText = (wxChar *)tooltip->GetTip().c_str();
946 }
947
948 // processed
949 return 0;
950 }
951 }
952 break;
953 #endif // wxUSE_TOOLTIPS
954
955 case WM_KEYDOWN:
956 {
957 wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd);
958
959 wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") );
960
961 bool processed = TRUE;
962
963 wxDirection dir;
964 switch ( wParam )
965 {
966 case VK_UP:
967 dir = wxUP;
968 break;
969
970 case VK_LEFT:
971 dir = wxLEFT;
972 break;
973
974 case VK_DOWN:
975 dir = wxDOWN;
976 break;
977
978 case VK_RIGHT:
979 dir = wxRIGHT;
980 break;
981
982 default:
983 processed = FALSE;
984
985 // just to suppress the compiler warning
986 dir = wxALL;
987 }
988
989 if ( processed )
990 {
991 int selOld = radiobox->GetSelection();
992 int selNew = radiobox->GetNextItem
993 (
994 selOld,
995 dir,
996 radiobox->GetWindowStyle()
997 );
998
999 if ( selNew != selOld )
1000 {
1001 radiobox->SetSelection(selNew);
1002 radiobox->SetFocus();
1003
1004 // emulate the button click
1005 radiobox->SendNotificationEvent();
1006
1007 return 0;
1008 }
1009 }
1010 }
1011 break;
1012
1013 case WM_SETFOCUS:
1014 case WM_KILLFOCUS:
1015 {
1016 wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd);
1017
1018 wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") );
1019
1020 // if we don't do this, no focus events are generated for the
1021 // radiobox and, besides, we need to notify the parent about
1022 // the focus change, otherwise the focus handling logic in
1023 // wxControlContainer doesn't work
1024 if ( message == WM_SETFOCUS )
1025 radiobox->HandleSetFocus((WXHWND)wParam);
1026 else
1027 radiobox->HandleKillFocus((WXHWND)wParam);
1028 }
1029 break;
1030
1031 #ifdef __WIN32__
1032 case WM_HELP:
1033 {
1034 wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd);
1035
1036 wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") );
1037
1038 bool processed = TRUE;
1039
1040 // HELPINFO doesn't seem to be supported on WinCE.
1041 #ifndef __WXWINCE__
1042 HELPINFO* info = (HELPINFO*) lParam;
1043 // Don't yet process menu help events, just windows
1044 if (info->iContextType == HELPINFO_WINDOW)
1045 #endif
1046 {
1047 wxWindow* subjectOfHelp = radiobox;
1048 bool eventProcessed = FALSE;
1049 while (subjectOfHelp && !eventProcessed)
1050 {
1051 wxHelpEvent helpEvent(wxEVT_HELP, subjectOfHelp->GetId(),
1052 #ifdef __WXWINCE__
1053 wxPoint(0, 0)
1054 #else
1055 wxPoint(info->MousePos.x, info->MousePos.y)
1056 #endif
1057 ) ; // info->iCtrlId);
1058 helpEvent.SetEventObject(radiobox);
1059 eventProcessed = radiobox->GetEventHandler()->ProcessEvent(helpEvent);
1060
1061 // Go up the window hierarchy until the event is handled (or not)
1062 subjectOfHelp = subjectOfHelp->GetParent();
1063 }
1064 processed = eventProcessed;
1065 }
1066 #ifndef __WXWINCE__
1067 else if (info->iContextType == HELPINFO_MENUITEM)
1068 {
1069 wxHelpEvent helpEvent(wxEVT_HELP, info->iCtrlId) ;
1070 helpEvent.SetEventObject(radiobox);
1071 processed = radiobox->GetEventHandler()->ProcessEvent(helpEvent);
1072 }
1073 else
1074 processed = FALSE;
1075 #endif
1076 if (processed)
1077 return 0;
1078
1079 break;
1080 }
1081 #endif // __WIN32__
1082 }
1083
1084 return ::CallWindowProc(CASTWNDPROC s_wndprocRadioBtn, hwnd, message, wParam, lParam);
1085 }
1086
1087 #endif // __WIN32__
1088
1089 #endif // wxUSE_RADIOBOX