1 /////////////////////////////////////////////////////////////////////////////
2 // Name: msw/radiobox.cpp
3 // Purpose: wxRadioBox implementation
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 "radiobox.h"
24 // For compilers that support precompilation, includes "wx.h".
25 #include "wx/wxprec.h"
34 #include "wx/bitmap.h"
36 #include "wx/radiobox.h"
37 #include "wx/settings.h"
41 #include "wx/msw/private.h"
44 #if !defined(__GNUWIN32_OLD__) || defined(__CYGWIN10__)
47 #include "wx/tooltip.h"
48 #endif // wxUSE_TOOLTIPS
50 // TODO: wxCONSTRUCTOR
51 #if 0 // wxUSE_EXTENDED_RTTI
52 WX_DEFINE_FLAGS( wxRadioBoxStyle
)
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
)
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(wxNO_BORDER
)
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(wxNO_FULL_REPAINT_ON_RESIZE
)
78 wxFLAGS_MEMBER(wxALWAYS_SHOW_SB
)
79 wxFLAGS_MEMBER(wxVSCROLL
)
80 wxFLAGS_MEMBER(wxHSCROLL
)
82 wxFLAGS_MEMBER(wxRA_SPECIFY_COLS
)
83 wxFLAGS_MEMBER(wxRA_HORIZONTAL
)
84 wxFLAGS_MEMBER(wxRA_SPECIFY_ROWS
)
85 wxFLAGS_MEMBER(wxRA_VERTICAL
)
87 wxEND_FLAGS( wxRadioBoxStyle
)
89 IMPLEMENT_DYNAMIC_CLASS_XTI(wxRadioBox
, wxControl
,"wx/radiobox.h")
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()
97 IMPLEMENT_DYNAMIC_CLASS(wxRadioBox
, wxControl
)
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
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
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
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
131 // ---------------------------------------------------------------------------
133 // ---------------------------------------------------------------------------
135 // wnd proc for radio buttons
137 LRESULT APIENTRY _EXPORT
wxRadioBtnWndProc(HWND hWnd
,
142 // ---------------------------------------------------------------------------
144 // ---------------------------------------------------------------------------
146 // the pointer to standard radio button wnd proc
147 static WXFARPROC s_wndprocRadioBtn
= (WXFARPROC
)NULL
;
151 // ===========================================================================
153 // ===========================================================================
155 // ---------------------------------------------------------------------------
157 // ---------------------------------------------------------------------------
159 int wxRadioBox::GetCount() const
164 int wxRadioBox::GetColumnCount() const
169 int wxRadioBox::GetRowCount() const
174 // returns the number of rows
175 int wxRadioBox::GetNumVer() const
177 if ( m_windowStyle
& wxRA_SPECIFY_ROWS
)
183 return (m_noItems
+ m_majorDim
- 1)/m_majorDim
;
187 // returns the number of columns
188 int wxRadioBox::GetNumHor() const
190 if ( m_windowStyle
& wxRA_SPECIFY_ROWS
)
192 return (m_noItems
+ m_majorDim
- 1)/m_majorDim
;
200 bool wxRadioBox::MSWCommand(WXUINT cmd
, WXWORD id
)
202 if ( cmd
== BN_CLICKED
)
207 int selectedButton
= -1;
209 for ( int i
= 0; i
< m_noItems
; i
++ )
211 if ( id
== wxGetWindowId(m_radioButtons
[i
]) )
219 if ( selectedButton
== -1 )
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
228 if ( selectedButton
!= m_selectedButton
)
230 m_selectedButton
= selectedButton
;
232 SendNotificationEvent();
234 //else: don't generate events when the selection doesn't change
243 wxRadioBox::wxRadioBox()
245 m_selectedButton
= -1;
248 m_radioButtons
= NULL
;
251 m_radioHeight
= NULL
;
254 bool wxRadioBox::Create(wxWindow
*parent
,
256 const wxString
& title
,
260 const wxString choices
[],
263 const wxValidator
& val
,
264 const wxString
& name
)
266 // initialize members
267 m_selectedButton
= -1;
270 m_majorDim
= majorDim
== 0 ? n
: majorDim
;
271 m_noRowsOrCols
= majorDim
;
273 // common initialization
274 if ( !CreateControl(parent
, id
, pos
, size
, style
, val
, name
) )
277 // create the static box
278 if ( !MSWCreateControl(wxT("BUTTON"), BS_GROUPBOX
| WS_GROUP
,
279 pos
, size
, title
, 0) )
282 // and now create the buttons
284 #if RADIOBTN_PARENT_IS_RADIOBOX
285 HWND hwndParent
= GetHwnd();
287 HWND hwndParent
= GetHwndOf(parent
);
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
];
297 wxFont
& font
= GetFont();
300 hfont
= font
.GetResourceHandle();
303 for ( int i
= 0; i
< n
; 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
;
311 long newId
= NewControlId();
313 HWND hwndBtn
= ::CreateWindow(_T("BUTTON"),
316 0, 0, 0, 0, // will be set in SetSize()
324 wxLogLastError(wxT("CreateWindow(radio btn)"));
329 m_radioButtons
[i
] = (WXHWND
)hwndBtn
;
331 SubclassRadioButton((WXHWND
)hwndBtn
);
335 ::SendMessage(hwndBtn
, WM_SETFONT
, (WPARAM
)hfont
, 0L);
338 m_subControls
.Add(newId
);
341 // Create a dummy radio control to end the group.
342 (void)::CreateWindow(_T("BUTTON"),
344 WS_GROUP
| BS_AUTORADIOBUTTON
| WS_CHILD
,
345 0, 0, 0, 0, hwndParent
,
346 (HMENU
)NewControlId(), wxGetInstance(), NULL
);
350 SetSize(pos
.x
, pos
.y
, size
.x
, size
.y
);
355 wxRadioBox::~wxRadioBox()
357 m_isBeingDeleted
= TRUE
;
362 for (i
= 0; i
< m_noItems
; i
++)
363 ::DestroyWindow((HWND
)m_radioButtons
[i
]);
364 delete[] m_radioButtons
;
368 delete[] m_radioWidth
;
370 delete[] m_radioHeight
;
374 void wxRadioBox::SetString(int item
, const wxString
& label
)
376 wxCHECK_RET( item
>= 0 && item
< m_noItems
, wxT("invalid radiobox index") );
378 m_radioWidth
[item
] = m_radioHeight
[item
] = -1;
379 SetWindowText((HWND
)m_radioButtons
[item
], label
.c_str());
382 void wxRadioBox::SetSelection(int N
)
384 wxCHECK_RET( (N
>= 0) && (N
< m_noItems
), wxT("invalid radiobox index") );
386 // Following necessary for Win32s, because Win32s translate BM_SETCHECK
387 if (m_selectedButton
>= 0 && m_selectedButton
< m_noItems
)
388 ::SendMessage((HWND
) m_radioButtons
[m_selectedButton
], BM_SETCHECK
, 0, 0L);
390 ::SendMessage((HWND
)m_radioButtons
[N
], BM_SETCHECK
, 1, 0L);
392 m_selectedButton
= N
;
395 // Get single selection, for single choice list items
396 int wxRadioBox::GetSelection() const
398 return m_selectedButton
;
401 // Find string for position
402 wxString
wxRadioBox::GetString(int item
) const
404 wxCHECK_MSG( item
>= 0 && item
< m_noItems
, wxEmptyString
,
405 wxT("invalid radiobox index") );
407 return wxGetWindowText(m_radioButtons
[item
]);
410 // ----------------------------------------------------------------------------
412 // ----------------------------------------------------------------------------
414 wxSize
wxRadioBox::GetMaxButtonSize() const
416 // calculate the max button size
419 for ( int i
= 0 ; i
< m_noItems
; i
++ )
422 if ( m_radioWidth
[i
] < 0 )
424 GetTextExtent(wxGetWindowText(m_radioButtons
[i
]), &width
, &height
);
426 // adjust the size to take into account the radio box itself
427 // FIXME this is totally bogus!
434 width
= m_radioWidth
[i
];
435 height
= m_radioHeight
[i
];
438 if ( widthMax
< width
)
440 if ( heightMax
< height
)
444 return wxSize(widthMax
, heightMax
);
447 wxSize
wxRadioBox::GetTotalButtonSize(const wxSize
& sizeBtn
) const
449 // the radiobox should be big enough for its buttons
451 wxGetCharSize(m_hWnd
, &cx1
, &cy1
, &GetFont());
453 int extraHeight
= cy1
;
455 /* We'll assume the adjustments below are OK for Win 3.1 too
456 #if defined(CTL3D) && !CTL3D
457 // Requires a bigger group box in plain Windows
463 int height
= GetNumVer() * sizeBtn
.y
+ cy1
/2 + extraHeight
;
464 int width
= GetNumHor() * (sizeBtn
.x
+ cx1
) + cx1
;
466 // Add extra space under the label, if it exists.
467 if (!wxControl::GetLabel().IsEmpty())
470 // and also wide enough for its label
472 GetTextExtent(GetTitle(), &widthLabel
, NULL
);
473 widthLabel
+= RADIO_SIZE
; // FIXME this is bogus too
474 if ( widthLabel
> width
)
477 return wxSize(width
, height
);
480 wxSize
wxRadioBox::DoGetBestSize() const
482 return GetTotalButtonSize(GetMaxButtonSize());
485 // Restored old code.
486 void wxRadioBox::DoSetSize(int x
, int y
, int width
, int height
, int sizeFlags
)
488 int currentX
, currentY
;
489 GetPosition(¤tX
, ¤tY
);
490 int widthOld
, heightOld
;
491 GetSize(&widthOld
, &heightOld
);
496 if (x
== -1 && !(sizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
498 if (y
== -1 && !(sizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
501 #if RADIOBTN_PARENT_IS_RADIOBOX
510 wxGetCharSize(m_hWnd
, &cx1
, &cy1
, & GetFont());
512 // Attempt to have a look coherent with other platforms: We compute the
513 // biggest toggle dim, then we align all items according this value.
514 wxSize maxSize
= GetMaxButtonSize();
515 int maxWidth
= maxSize
.x
,
516 maxHeight
= maxSize
.y
;
518 wxSize totSize
= GetTotalButtonSize(maxSize
);
519 int totWidth
= totSize
.x
,
520 totHeight
= totSize
.y
;
522 // only change our width/height if asked for
525 if ( sizeFlags
& wxSIZE_AUTO_WIDTH
)
533 if ( sizeFlags
& wxSIZE_AUTO_HEIGHT
)
539 ::MoveWindow(GetHwnd(), xx
, yy
, width
, height
, TRUE
);
541 // Now position all the buttons: the current button will be put at
542 // wxPoint(x_offset, y_offset) and the new row/column will start at
543 // startX/startY. The size of all buttons will be the same wxSize(maxWidth,
544 // maxHeight) except for the buttons in the last column which should extend
545 // to the right border of radiobox and thus can be wider than this.
547 // Also, remember that wxRA_SPECIFY_COLS means that we arrange buttons in
548 // left to right order and m_majorDim is the number of columns while
549 // wxRA_SPECIFY_ROWS means that the buttons are arranged top to bottom and
550 // m_majorDim is the number of rows.
555 // Add extra space under the label, if it exists.
556 if (!wxControl::GetLabel().IsEmpty())
559 int startX
= x_offset
;
560 int startY
= y_offset
;
562 for ( int i
= 0; i
< m_noItems
; i
++ )
564 // the last button in the row may be wider than the other ones as the
565 // radiobox may be wider than the sum of the button widths (as it
566 // happens, for example, when the radiobox label is very long)
568 if ( m_windowStyle
& wxRA_SPECIFY_COLS
)
570 // item is the last in its row if it is a multiple of the number of
571 // columns or if it is just the last item
573 isLastInTheRow
= ((n
% m_majorDim
) == 0) || (n
== m_noItems
);
575 else // wxRA_SPECIFY_ROWS
577 // item is the last in the row if it is in the last columns
578 isLastInTheRow
= i
>= (m_noItems
/m_majorDim
)*m_majorDim
;
581 // is this the start of new row/column?
582 if ( i
&& (i
% m_majorDim
== 0) )
584 if ( m_windowStyle
& wxRA_SPECIFY_ROWS
)
586 // start of new column
588 x_offset
+= maxWidth
+ cx1
;
590 else // start of new row
593 y_offset
+= maxHeight
;
594 if (m_radioWidth
[0]>0)
600 if ( isLastInTheRow
)
602 // make the button go to the end of radio box
603 widthBtn
= startX
+ width
- x_offset
- 2*cx1
;
604 if ( widthBtn
< maxWidth
)
609 // normal button, always of the same size
613 // VZ: make all buttons of the same, maximal size - like this they
614 // cover the radiobox entirely and the radiobox tooltips are always
615 // shown (otherwise they are not when the mouse pointer is in the
616 // radiobox part not belonging to any radiobutton)
617 ::MoveWindow((HWND
)m_radioButtons
[i
],
618 x_offset
, y_offset
, widthBtn
, maxHeight
,
621 // where do we put the next button?
622 if ( m_windowStyle
& wxRA_SPECIFY_ROWS
)
625 y_offset
+= maxHeight
;
626 if (m_radioWidth
[0]>0)
631 // to the right of this one
632 x_offset
+= widthBtn
+ cx1
;
637 void wxRadioBox::GetSize(int *width
, int *height
) const
640 rect
.left
= -1; rect
.right
= -1; rect
.top
= -1; rect
.bottom
= -1;
643 wxFindMaxSize(m_hWnd
, &rect
);
646 for (i
= 0; i
< m_noItems
; i
++)
647 wxFindMaxSize(m_radioButtons
[i
], &rect
);
649 *width
= rect
.right
- rect
.left
;
650 *height
= rect
.bottom
- rect
.top
;
653 void wxRadioBox::GetPosition(int *x
, int *y
) const
655 wxWindow
*parent
= GetParent();
656 RECT rect
= { -1, -1, -1, -1 };
659 for (i
= 0; i
< m_noItems
; i
++)
660 wxFindMaxSize(m_radioButtons
[i
], &rect
);
663 wxFindMaxSize(m_hWnd
, &rect
);
665 // Since we now have the absolute screen coords, if there's a parent we
666 // must subtract its top left corner
672 ::ScreenToClient((HWND
) parent
->GetHWND(), &point
);
675 // We may be faking the client origin. So a window that's really at (0, 30)
676 // may appear (to wxWin apps) to be at (0, 0).
679 wxPoint
pt(GetParent()->GetClientAreaOrigin());
688 void wxRadioBox::SetFocus()
692 ::SetFocus((HWND
)m_radioButtons
[m_selectedButton
== -1
694 : m_selectedButton
]);
699 bool wxRadioBox::Show(bool show
)
701 if ( !wxControl::Show(show
) )
704 int nCmdShow
= show
? SW_SHOW
: SW_HIDE
;
705 for ( int i
= 0; i
< m_noItems
; i
++ )
707 ::ShowWindow((HWND
)m_radioButtons
[i
], nCmdShow
);
713 // Enable a specific button
714 void wxRadioBox::Enable(int item
, bool enable
)
716 wxCHECK_RET( item
>= 0 && item
< m_noItems
,
717 wxT("invalid item in wxRadioBox::Enable()") );
719 ::EnableWindow((HWND
) m_radioButtons
[item
], enable
);
722 // Enable all controls
723 bool wxRadioBox::Enable(bool enable
)
725 if ( !wxControl::Enable(enable
) )
728 for (int i
= 0; i
< m_noItems
; i
++)
729 ::EnableWindow((HWND
) m_radioButtons
[i
], enable
);
734 // Show a specific button
735 void wxRadioBox::Show(int item
, bool show
)
737 wxCHECK_RET( item
>= 0 && item
< m_noItems
,
738 wxT("invalid item in wxRadioBox::Show()") );
740 ::ShowWindow((HWND
)m_radioButtons
[item
], show
? SW_SHOW
: SW_HIDE
);
743 bool wxRadioBox::ContainsHWND(WXHWND hWnd
) const
745 size_t count
= GetCount();
746 for ( size_t i
= 0; i
< count
; i
++ )
748 if ( GetRadioButtons()[i
] == hWnd
)
755 void wxRadioBox::Command(wxCommandEvent
& event
)
757 SetSelection (event
.m_commandInt
);
759 ProcessCommand (event
);
762 // NB: if this code is changed, wxGetWindowForHWND() which relies on having the
763 // radiobox pointer in GWL_USERDATA for radio buttons must be updated too!
764 void wxRadioBox::SubclassRadioButton(WXHWND hWndBtn
)
766 HWND hwndBtn
= (HWND
)hWndBtn
;
768 if ( !s_wndprocRadioBtn
)
769 s_wndprocRadioBtn
= (WXFARPROC
)::GetWindowLong(hwndBtn
, GWL_WNDPROC
);
771 ::SetWindowLong(hwndBtn
, GWL_WNDPROC
, (long)wxRadioBtnWndProc
);
772 ::SetWindowLong(hwndBtn
, GWL_USERDATA
, (long)this);
775 void wxRadioBox::SendNotificationEvent()
777 wxCommandEvent
event(wxEVT_COMMAND_RADIOBOX_SELECTED
, m_windowId
);
778 event
.SetInt( m_selectedButton
);
779 event
.SetString( GetString(m_selectedButton
) );
780 event
.SetEventObject( this );
781 ProcessCommand(event
);
784 bool wxRadioBox::SetFont(const wxFont
& font
)
786 if ( !wxControl::SetFont(font
) )
792 // also set the font of our radio buttons
793 WXHFONT hfont
= wxFont(font
).GetResourceHandle();
794 for ( int n
= 0; n
< m_noItems
; n
++ )
796 HWND hwndBtn
= (HWND
)m_radioButtons
[n
];
797 ::SendMessage(hwndBtn
, WM_SETFONT
, (WPARAM
)hfont
, 0L);
799 // otherwise the buttons are not redrawn correctly
800 ::InvalidateRect(hwndBtn
, NULL
, FALSE
/* don't erase bg */);
806 // ----------------------------------------------------------------------------
808 // ----------------------------------------------------------------------------
810 long wxRadioBox::MSWWindowProc(WXUINT nMsg
, WXWPARAM wParam
, WXLPARAM lParam
)
815 case WM_CTLCOLORSTATIC
:
816 // set the colour of the radio buttons to be the same as ours
818 HDC hdc
= (HDC
)wParam
;
820 const wxColour
& colBack
= GetBackgroundColour();
821 ::SetBkColor(hdc
, wxColourToRGB(colBack
));
822 ::SetTextColor(hdc
, wxColourToRGB(GetForegroundColour()));
824 wxBrush
*brush
= wxTheBrushList
->FindOrCreateBrush(colBack
, wxSOLID
);
826 return (WXHBRUSH
)brush
->GetResourceHandle();
830 // VZ: this code breaks radiobox redrawing under Windows XP, don't use
831 // it. If you need to get messages from the static controls,
832 // create them as a child of another (non static) window
834 // This is required for the radiobox to be sensitive to mouse input,
835 // e.g. for Dialog Editor.
838 int xPos
= LOWORD(lParam
); // horizontal position of cursor
839 int yPos
= HIWORD(lParam
); // vertical position of cursor
841 ScreenToClient(&xPos
, &yPos
);
843 // Make sure you can drag by the top of the groupbox, but let
844 // other (enclosed) controls get mouse events also
846 return (long)HTCLIENT
;
852 return wxControl::MSWWindowProc(nMsg
, wParam
, lParam
);
855 WXHBRUSH
wxRadioBox::OnCtlColor(WXHDC pDC
, WXHWND
WXUNUSED(pWnd
), WXUINT
WXUNUSED(nCtlColor
),
861 WXUINT
WXUNUSED(message
),
862 WXWPARAM
WXUNUSED(wParam
),
863 WXLPARAM
WXUNUSED(lParam
)
870 HBRUSH hbrush
= Ctl3dCtlColorEx(message
, wParam
, lParam
);
871 return (WXHBRUSH
) hbrush
;
873 #endif // wxUSE_CTL3D
876 wxColour colBack
= GetBackgroundColour();
879 colBack
= wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE
);
881 ::SetBkColor(hdc
, wxColourToRGB(colBack
));
882 ::SetTextColor(hdc
, wxColourToRGB(GetForegroundColour()));
884 wxBrush
*brush
= wxTheBrushList
->FindOrCreateBrush(colBack
, wxSOLID
);
886 return (WXHBRUSH
)brush
->GetResourceHandle();
890 // ---------------------------------------------------------------------------
891 // window proc for radio buttons
892 // ---------------------------------------------------------------------------
896 LRESULT APIENTRY _EXPORT
wxRadioBtnWndProc(HWND hwnd
,
904 // we must tell IsDialogMessage()/our kbd processing code that we
905 // want to process arrows ourselves because neither of them is
906 // smart enough to handle arrows properly for us
908 long lDlgCode
= ::CallWindowProc(CASTWNDPROC s_wndprocRadioBtn
, hwnd
,
909 message
, wParam
, lParam
);
911 return lDlgCode
| DLGC_WANTARROWS
;
917 NMHDR
* hdr
= (NMHDR
*)lParam
;
918 if ( hdr
->code
== TTN_NEEDTEXT
)
920 wxRadioBox
*radiobox
= (wxRadioBox
*)
921 ::GetWindowLong(hwnd
, GWL_USERDATA
);
923 wxCHECK_MSG( radiobox
, 0,
924 wxT("radio button without radio box?") );
926 wxToolTip
*tooltip
= radiobox
->GetToolTip();
929 TOOLTIPTEXT
*ttt
= (TOOLTIPTEXT
*)lParam
;
930 ttt
->lpszText
= (wxChar
*)tooltip
->GetTip().c_str();
938 #endif // wxUSE_TOOLTIPS
942 wxRadioBox
*radiobox
= (wxRadioBox
*)
943 ::GetWindowLong(hwnd
, GWL_USERDATA
);
945 wxCHECK_MSG( radiobox
, 0, wxT("radio button without radio box?") );
947 bool processed
= TRUE
;
971 // just to suppress the compiler warning
977 int selOld
= radiobox
->GetSelection();
978 int selNew
= radiobox
->GetNextItem
982 radiobox
->GetWindowStyle()
985 if ( selNew
!= selOld
)
987 radiobox
->SetSelection(selNew
);
988 radiobox
->SetFocus();
990 // emulate the button click
991 radiobox
->SendNotificationEvent();
1002 wxRadioBox
*radiobox
= (wxRadioBox
*)
1003 ::GetWindowLong(hwnd
, GWL_USERDATA
);
1005 wxCHECK_MSG( radiobox
, 0, wxT("radio button without radio box?") );
1007 bool processed
= TRUE
;
1009 // HELPINFO doesn't seem to be supported on WinCE.
1011 HELPINFO
* info
= (HELPINFO
*) lParam
;
1012 // Don't yet process menu help events, just windows
1013 if (info
->iContextType
== HELPINFO_WINDOW
)
1016 wxWindow
* subjectOfHelp
= radiobox
;
1017 bool eventProcessed
= FALSE
;
1018 while (subjectOfHelp
&& !eventProcessed
)
1020 wxHelpEvent
helpEvent(wxEVT_HELP
, subjectOfHelp
->GetId(),
1024 wxPoint(info
->MousePos
.x
, info
->MousePos
.y
)
1026 ) ; // info->iCtrlId);
1027 helpEvent
.SetEventObject(radiobox
);
1028 eventProcessed
= radiobox
->GetEventHandler()->ProcessEvent(helpEvent
);
1030 // Go up the window hierarchy until the event is handled (or not)
1031 subjectOfHelp
= subjectOfHelp
->GetParent();
1033 processed
= eventProcessed
;
1036 else if (info
->iContextType
== HELPINFO_MENUITEM
)
1038 wxHelpEvent
helpEvent(wxEVT_HELP
, info
->iCtrlId
) ;
1039 helpEvent
.SetEventObject(radiobox
);
1040 processed
= radiobox
->GetEventHandler()->ProcessEvent(helpEvent
);
1053 return ::CallWindowProc(CASTWNDPROC s_wndprocRadioBtn
, hwnd
, message
, wParam
, lParam
);
1058 #endif // wxUSE_RADIOBOX