1 /////////////////////////////////////////////////////////////////////////////
4 // Author: David Webster
8 // Copyright: (c) David Webster
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 // For compilers that support precompilation, includes "wx.h".
13 #include "wx/wxprec.h"
18 #include "wx/wxchar.h"
19 #include "wx/string.h"
20 #include "wx/bitmap.h"
22 #include "wx/radiobox.h"
25 #include "wx/os2/private.h"
27 IMPLEMENT_DYNAMIC_CLASS(wxRadioBox
, wxControl
)
29 // ---------------------------------------------------------------------------
31 // ---------------------------------------------------------------------------
33 // wnd proc for radio buttons
34 MRESULT EXPENTRY
wxRadioBtnWndProc( HWND hWnd
39 MRESULT EXPENTRY
wxRadioBoxWndProc( HWND hWnd
45 // ---------------------------------------------------------------------------
47 // ---------------------------------------------------------------------------
49 // the pointer to standard radio button wnd proc
50 extern void wxAssociateWinWithHandle( HWND hWnd
53 static WXFARPROC fnWndProcRadioBtn
= NULL
;
54 static WXFARPROC fnWndProcRadioBox
= NULL
;
56 // ===========================================================================
58 // ===========================================================================
60 // ---------------------------------------------------------------------------
62 // ---------------------------------------------------------------------------
65 wxRadioBox::wxRadioBox()
67 m_nSelectedButton
= -1;
70 m_ahRadioButtons
= NULL
;
72 m_pnRadioWidth
= NULL
;
73 m_pnRadioHeight
= NULL
;
74 } // end of wxRadioBox::wxRadioBox
76 wxRadioBox::~wxRadioBox()
78 m_isBeingDeleted
= true;
83 for (i
= 0; i
< m_nNoItems
; i
++)
84 ::WinDestroyWindow((HWND
)m_ahRadioButtons
[i
]);
85 delete[] m_ahRadioButtons
;
88 delete[] m_pnRadioWidth
;
90 delete[] m_pnRadioHeight
;
91 } // end of wxRadioBox::~wxRadioBox
93 void wxRadioBox::AdjustButtons(
103 int nYOffset
= nY
+ nHeight
;
110 wxFont vFont
= GetFont();
112 wxGetCharSize( m_hWnd
117 vMaxSize
= GetMaxButtonSize();
118 nMaxWidth
= vMaxSize
.x
;
119 nMaxHeight
= vMaxSize
.y
;
122 nYOffset
-= (nMaxHeight
+ ((3*nCy1
)/2));
127 for (int i
= 0; i
< m_nNoItems
; i
++)
130 // The last button in the row may be wider than the other ones as the
131 // radiobox may be wider than the sum of the button widths (as it
132 // happens, for example, when the radiobox label is very long)
134 bool bIsLastInTheRow
;
136 if (m_windowStyle
& wxRA_SPECIFY_COLS
)
139 // Item is the last in its row if it is a multiple of the number of
140 // columns or if it is just the last item
144 bIsLastInTheRow
= ((n
% m_nMajorDim
) == 0) || (n
== m_nNoItems
);
146 else // winRA_SPECIFY_ROWS
149 // Item is the last in the row if it is in the last columns
151 bIsLastInTheRow
= i
>= (m_nNoItems
/m_nMajorDim
) * m_nMajorDim
;
155 // Is this the start of new row/column?
157 if (i
&& (i
% m_nMajorDim
== 0))
159 if (m_windowStyle
& wxRA_SPECIFY_ROWS
)
163 // Start of new column
166 nXOffset
+= nMaxWidth
+ nCx1
;
168 else // start of new row
171 nYOffset
-= nMaxHeight
;
172 if (m_pnRadioWidth
[0] > 0L)
182 // Make the button go to the end of radio box
184 nWidthBtn
= nStartX
+ nWidth
- nXOffset
- (2 * nCx1
);
185 if (nWidthBtn
< nMaxWidth
)
186 nWidthBtn
= nMaxWidth
;
191 // Normal button, always of the same size
193 nWidthBtn
= nMaxWidth
;
197 // Make all buttons of the same, maximal size - like this they
198 // cover the radiobox entirely and the radiobox tooltips are always
199 // shown (otherwise they are not when the mouse pointer is in the
200 // radiobox part not beYInt32ing to any radiobutton)
202 ::WinSetWindowPos( (HWND
)m_ahRadioButtons
[i
]
208 ,SWP_ZORDER
| SWP_SIZE
| SWP_MOVE
| SWP_SHOW
211 // Where do we put the next button?
213 if (m_windowStyle
& wxRA_SPECIFY_ROWS
)
218 nYOffset
-= nMaxHeight
;
219 if (m_pnRadioWidth
[0] > 0)
225 // To the right of this one
227 nXOffset
+= nWidthBtn
+ nCx1
;
230 } // end of wxRadioBox::AdjustButtons
232 void wxRadioBox::Command (
233 wxCommandEvent
& rEvent
236 SetSelection (rEvent
.GetInt());
237 ProcessCommand(rEvent
);
238 } // end of wxRadioBox::Command
240 bool wxRadioBox::ContainsHWND(
244 size_t nCount
= GetCount();
247 for (i
= 0; i
< nCount
; i
++)
249 if (GetRadioButtons()[i
] == hWnd
)
253 } // end of wxRadioBox::ContainsHWND
255 bool wxRadioBox::Create(
258 , const wxString
& rsTitle
259 , const wxPoint
& rPos
260 , const wxSize
& rSize
261 , const wxArrayString
& asChoices
264 , const wxValidator
& rVal
265 , const wxString
& rsName
268 wxCArrayString
chs(asChoices
);
270 return Create(pParent
, vId
, rsTitle
, rPos
, rSize
, chs
.GetCount(),
271 chs
.GetStrings(), nMajorDim
, lStyle
, rVal
, rsName
);
274 bool wxRadioBox::Create(
277 , const wxString
& rsTitle
278 , const wxPoint
& rPos
279 , const wxSize
& rSize
281 , const wxString asChoices
[]
284 , const wxValidator
& rVal
285 , const wxString
& rsName
291 vColour
.Set(wxString(wxT("BLACK")));
292 m_backgroundColour
= pParent
->GetBackgroundColour();
293 m_nSelectedButton
= -1;
296 m_nMajorDim
= nMajorDim
== 0 ? nNum
: nMajorDim
;
297 m_nNoRowsOrCols
= nMajorDim
;
300 // Common initialization
302 if (!CreateControl( pParent
311 if (!OS2CreateControl( wxT("STATIC")
319 wxAssociateWinWithHandle(m_hWnd
, this);
322 // Some radio boxes test consecutive id.
325 (void)NewControlId();
326 m_ahRadioButtons
= new WXHWND
[nNum
];
327 m_pnRadioWidth
= new int[nNum
];
328 m_pnRadioHeight
= new int[nNum
];
330 for (int i
= 0; i
< nNum
; i
++)
332 m_pnRadioWidth
[i
] = m_pnRadioHeight
[i
] = -1;
334 long lStyleBtn
= BS_AUTORADIOBUTTON
| WS_TABSTOP
| WS_VISIBLE
;
335 int nNewId
= NewControlId();
337 if (i
== 0 && lStyle
== 0)
338 lStyleBtn
|= WS_GROUP
;
340 HWND hWndBtn
= (WXHWND
)::WinCreateWindow ( GetHwndOf(pParent
)
342 ,(PSZ
)asChoices
[i
].c_str()
351 lColor
= (LONG
)vColour
.GetPixel();
352 ::WinSetPresParam( hWndBtn
357 lColor
= (LONG
)m_backgroundColour
.GetPixel();
359 ::WinSetPresParam( hWndBtn
368 m_ahRadioButtons
[i
] = (WXHWND
)hWndBtn
;
369 SubclassRadioButton((WXHWND
)hWndBtn
);
370 wxAssociateWinWithHandle(hWndBtn
, this);
371 wxOS2SetFont( hWndBtn
374 ::WinSetWindowULong(hWndBtn
, QWL_USER
, (ULONG
)this);
375 m_aSubControls
.Add(nNewId
);
379 // Create a dummy radio control to end the group.
381 (void)::WinCreateWindow ( GetHwndOf(pParent
)
384 ,WS_GROUP
| BS_AUTORADIOBUTTON
388 ,(HMENU
)NewControlId()
392 SetFont(*wxSMALL_FONT
);
393 fnWndProcRadioBox
= (WXFARPROC
)::WinSubclassWindow( GetHwnd()
394 ,(PFNWP
)wxRadioBoxWndProc
396 ::WinSetWindowULong(GetHwnd(), QWL_USER
, (ULONG
)this);
397 lColor
= (LONG
)vColour
.GetPixel();
398 ::WinSetPresParam( m_hWnd
403 ::WinSetPresParam( m_hWnd
408 lColor
= (LONG
)m_backgroundColour
.GetPixel();
410 ::WinSetPresParam( m_hWnd
415 ::WinSetPresParam( m_hWnd
429 } // end of wxRadioBox::Create
431 wxSize
wxRadioBox::DoGetBestSize() const
433 return (GetTotalButtonSize(GetMaxButtonSize()));
434 } // end of WinGuiBase_CRadioBox::DoGetBestSize
436 void wxRadioBox::DoSetSize(
450 #if RADIOBTN_PARENT_IS_RADIOBOX
459 wxSize vMaxSize
= GetMaxButtonSize();
467 wxFont vFont
= GetFont();
469 m_nSizeFlags
= nSizeFlags
;
470 GetPosition( &nCurrentX
477 if (nX
== wxDefaultCoord
&& !(nSizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
479 if (nY
== wxDefaultCoord
&& !(nSizeFlags
& wxSIZE_ALLOW_MINUS_ONE
))
486 wxGetCharSize( m_hWnd
493 // Attempt to have a look coherent with other platforms: We compute the
494 // biggest toggle dim, then we align all items according this value.
496 vMaxSize
= GetMaxButtonSize();
497 nMaxWidth
= vMaxSize
.x
;
498 nMaxHeight
= vMaxSize
.y
;
500 vTotSize
= GetTotalButtonSize(vMaxSize
);
501 nTotWidth
= vTotSize
.x
;
502 nTotHeight
= vTotSize
.y
;
505 // Only change our width/height if asked for
509 if (nSizeFlags
& wxSIZE_AUTO_WIDTH
)
517 if (nSizeFlags
& wxSIZE_AUTO_HEIGHT
)
518 nHeight
= nTotHeight
;
520 nHeight
= nHeightOld
;
523 wxWindowOS2
* pParent
= (wxWindowOS2
*)GetParent();
527 int nOS2Height
= GetOS2ParentHeight(pParent
);
529 nYy
= nOS2Height
- (nYy
+ nHeight
);
530 nYOffset
= nYy
+ nHeight
;
536 ::WinQueryWindowRect(HWND_DESKTOP
, &vRect
);
537 nYy
= vRect
.yTop
- (nYy
+ nHeight
);
539 ::WinSetWindowPos( GetHwnd()
545 ,SWP_ZORDER
| SWP_SIZE
| SWP_MOVE
| SWP_SHOW
549 // Now position all the buttons: the current button will be put at
550 // wxPoint(x_offset, y_offset) and the new row/column will start at
551 // startX/startY. The size of all buttons will be the same wxSize(maxWidth,
552 // maxHeight) except for the buttons in the last column which should extend
553 // to the right border of radiobox and thus can be wider than this.
555 // Also, remember that wxRA_SPECIFY_COLS means that we arrange buttons in
556 // left to right order and m_majorDim is the number of columns while
557 // wxRA_SPECIFY_ROWS means that the buttons are arranged top to bottom and
558 // m_majorDim is the number of rows.
561 nYOffset
-= (nMaxHeight
+ ((3*nCy1
)/2));
566 for (int i
= 0; i
< m_nNoItems
; i
++)
569 // The last button in the row may be wider than the other ones as the
570 // radiobox may be wider than the sum of the button widths (as it
571 // happens, for example, when the radiobox label is very long)
573 bool bIsLastInTheRow
;
575 if (m_windowStyle
& wxRA_SPECIFY_COLS
)
578 // Item is the last in its row if it is a multiple of the number of
579 // columns or if it is just the last item
583 bIsLastInTheRow
= ((n
% m_nMajorDim
) == 0) || (n
== m_nNoItems
);
585 else // winRA_SPECIFY_ROWS
588 // Item is the last in the row if it is in the last columns
590 bIsLastInTheRow
= i
>= (m_nNoItems
/m_nMajorDim
) * m_nMajorDim
;
594 // Is this the start of new row/column?
596 if (i
&& (i
% m_nMajorDim
== 0))
598 if (m_windowStyle
& wxRA_SPECIFY_ROWS
)
602 // Start of new column
605 nXOffset
+= nMaxWidth
+ nCx1
;
607 else // start of new row
610 nYOffset
-= nMaxHeight
;
611 if (m_pnRadioWidth
[0] > 0L)
621 // Make the button go to the end of radio box
623 nWidthBtn
= nStartX
+ nWidth
- nXOffset
- (2 * nCx1
);
624 if (nWidthBtn
< nMaxWidth
)
625 nWidthBtn
= nMaxWidth
;
630 // Normal button, always of the same size
632 nWidthBtn
= nMaxWidth
;
636 // Make all buttons of the same, maximal size - like this they
637 // cover the radiobox entirely and the radiobox tooltips are always
638 // shown (otherwise they are not when the mouse pointer is in the
639 // radiobox part not beinting to any radiobutton)
641 ::WinSetWindowPos( (HWND
)m_ahRadioButtons
[i
]
647 ,SWP_ZORDER
| SWP_SIZE
| SWP_MOVE
| SWP_SHOW
650 // Where do we put the next button?
652 if (m_windowStyle
& wxRA_SPECIFY_ROWS
)
657 nYOffset
-= nMaxHeight
;
658 if (m_pnRadioWidth
[0] > 0)
664 // To the right of this one
666 nXOffset
+= nWidthBtn
+ nCx1
;
669 } // end of wxRadioBox::DoSetSize
671 bool wxRadioBox::Enable(int nItem
, bool bEnable
)
673 wxCHECK_MSG( IsValid(nItem
), false,
674 wxT("invalid item in wxRadioBox::Enable()") );
676 ::WinEnableWindow((HWND
) m_ahRadioButtons
[nItem
], bEnable
);
678 } // end of wxRadioBox::Enable
680 bool wxRadioBox::Enable(
684 if ( !wxControl::Enable(bEnable
) )
686 for (int i
= 0; i
< m_nNoItems
; i
++)
687 ::WinEnableWindow((HWND
)m_ahRadioButtons
[i
], bEnable
);
689 } // end of wxRadioBox::Enable
691 int wxRadioBox::FindString(
692 const wxString
& rsStr
695 for (int i
= 0; i
< m_nNoItems
; i
++)
697 if (rsStr
== wxGetWindowText(m_ahRadioButtons
[i
]) )
701 } // end of wxRadioBox::FindString
703 int wxRadioBox::GetColumnCount() const
706 } // end of wxRadioBox::GetColumnCount
708 int wxRadioBox::GetCount() const
711 } // end of wxRadioBox::GetCount
713 wxString
wxRadioBox::GetLabel(
717 wxCHECK_MSG( IsValid(nItem
), wxEmptyString
, wxT("invalid radiobox index") );
719 return wxGetWindowText(m_ahRadioButtons
[nItem
]);
720 } // end of wxRadioBox::GetLabel
722 wxSize
wxRadioBox::GetMaxButtonSize() const
727 for (int i
= 0 ; i
< m_nNoItems
; i
++)
732 if (m_pnRadioWidth
[i
] < 0L)
734 GetTextExtent( wxGetWindowText(m_ahRadioButtons
[i
])
740 // Adjust the size to take into account the radio box itself
741 // FIXME this is totally bogus!
743 nWidth
+= RADIO_SIZE
;
749 nWidth
= m_pnRadioWidth
[i
];
750 nHeight
= m_pnRadioHeight
[i
];
752 if (nWidthMax
< nWidth
)
754 if (nHeightMax
< nHeight
)
755 nHeightMax
= nHeight
;
757 return(wxSize( nWidthMax
761 } // end of wxRadioBox::GetMaxButtonSize
763 int wxRadioBox::GetNumHor() const
765 if ( m_windowStyle
& wxRA_SPECIFY_ROWS
)
767 return (m_nNoItems
+ m_nMajorDim
- 1)/m_nMajorDim
;
773 } // end of wxRadioBox::GetNumHor
775 int wxRadioBox::GetNumVer() const
777 if ( m_windowStyle
& wxRA_SPECIFY_ROWS
)
783 return (m_nNoItems
+ m_nMajorDim
- 1)/m_nMajorDim
;
785 } // end of wxRadioBox::GetNumVer
787 void wxRadioBox::GetPosition(
792 wxWindowOS2
* pParent
= GetParent();
793 RECT vRect
= { -1, -1, -1, -1 };;
797 for (i
= 0; i
< m_nNoItems
; i
++)
798 wxFindMaxSize( m_ahRadioButtons
[i
]
802 wxFindMaxSize( m_hWnd
807 // Since we now have the absolute screen coords, if there's a parent we
808 // must subtract its top left corner
810 vPoint
.x
= vRect
.xLeft
;
811 vPoint
.y
= vRect
.yTop
;
816 ::WinQueryWindowPos((HWND
)pParent
->GetHWND(), &vSwp
);
822 // We may be faking the client origin. So a window that's really at (0, 30)
823 // may appear (to wxWin apps) to be at (0, 0).
827 wxPoint
vPt(GetParent()->GetClientAreaOrigin());
834 } // end of wxRadioBox::GetPosition
836 int wxRadioBox::GetRowCount() const
839 } // end of wxRadioBox::GetRowCount
841 // Get single selection, for single choice list items
842 int wxRadioBox::GetSelection() const
844 return m_nSelectedButton
;
845 } // end of wxRadioBox::GetSelection
847 void wxRadioBox::GetSize(
861 wxFindMaxSize( m_hWnd
865 for (i
= 0; i
< m_nNoItems
; i
++)
866 wxFindMaxSize( m_ahRadioButtons
[i
]
871 *pnWidth
= vRect
.xRight
- vRect
.xLeft
;
873 *pnHeight
= vRect
.yTop
- vRect
.yBottom
;
874 } // end of wxRadioBox::GetSize
876 // Find string for position
877 wxString
wxRadioBox::GetString(
881 return wxGetWindowText(m_ahRadioButtons
[nNum
]);
882 } // end of wxRadioBox::GetString
884 // For single selection items only
885 wxString
wxRadioBox::GetStringSelection() const
888 int nSel
= GetSelection();
891 sResult
= GetString(nSel
);
893 } // end of wxRadioBox::GetStringSelection
895 wxSize
wxRadioBox::GetTotalButtonSize(
896 const wxSize
& rSizeBtn
905 wxFont vFont
= GetFont();
907 wxGetCharSize( m_hWnd
914 nHeight
= GetNumVer() * rSizeBtn
.y
+ (2 * nCy1
);
915 nWidth
= GetNumHor() * (rSizeBtn
.x
+ nCx1
) + nCx1
;
918 // And also wide enough for its label
920 GetTextExtent( GetTitle()
924 nWidthLabel
+= RADIO_SIZE
;
925 if (nWidthLabel
> nWidth
)
926 nWidth
= nWidthLabel
;
928 return(wxSize( nWidth
932 } // end of wxRadioBox::GetTotalButtonSize
934 WXHBRUSH
wxRadioBox::OnCtlColor(
943 HPS hPS
= (HPS
)hwinDC
; // pass in a PS handle in OS/2
945 if (GetParent()->GetTransparentBackground())
946 ::GpiSetBackMix(hPS
, BM_LEAVEALONE
);
948 ::GpiSetBackMix(hPS
, BM_OVERPAINT
);
950 wxColour vColBack
= GetBackgroundColour();
952 ::GpiSetBackColor(hPS
, vColBack
.GetPixel());
953 ::GpiSetColor(hPS
, vColBack
.GetPixel());
956 wxBrush
* pBrush
= wxTheBrushList
->FindOrCreateBrush( vColBack
959 return ((WXHBRUSH
)pBrush
->GetResourceHandle());
960 } // end of wxRadioBox::OnCtlColor
962 bool wxRadioBox::OS2Command(
967 int nSelectedButton
= -1;
969 if (uCmd
== BN_CLICKED
)
975 for (int i
= 0; i
< m_nNoItems
; i
++)
977 if (wId
== wxGetWindowId(m_ahRadioButtons
[i
]))
983 if (nSelectedButton
== -1)
990 if (nSelectedButton
!= m_nSelectedButton
)
992 m_nSelectedButton
= nSelectedButton
;
993 SendNotificationEvent();
999 } // end of wxRadioBox::OS2Command
1001 void wxRadioBox::SendNotificationEvent()
1003 wxCommandEvent
vEvent( wxEVT_COMMAND_RADIOBOX_SELECTED
1007 vEvent
.SetInt( m_nSelectedButton
);
1008 vEvent
.SetString( GetString(m_nSelectedButton
) );
1009 vEvent
.SetEventObject(this);
1010 ProcessCommand(vEvent
);
1011 } // end of wxRadioBox::SendNotificationEvent
1013 void wxRadioBox::SetFocus()
1017 if (m_nSelectedButton
== -1)
1018 ::WinSetFocus(HWND_DESKTOP
, (HWND
)m_ahRadioButtons
[0]);
1020 ::WinSetFocus(HWND_DESKTOP
, (HWND
)m_ahRadioButtons
[m_nSelectedButton
]);
1022 } // end of wxRadioBox::SetFocus
1024 bool wxRadioBox::SetFont(
1028 if (!wxControl::SetFont(rFont
))
1036 // Also set the font of our radio buttons
1038 for (int n
= 0; n
< (int)m_nNoItems
; n
++)
1040 HWND hWndBtn
= (HWND
)m_ahRadioButtons
[n
];
1042 wxOS2SetFont( hWndBtn
1045 ::WinInvalidateRect(hWndBtn
, NULL
, FALSE
);
1048 } // end of wxRadioBox::SetFont
1050 void wxRadioBox::SetSelection(
1054 wxCHECK_RET( IsValid(nNum
), wxT("invalid radiobox index") );
1056 if ( IsValid(m_nSelectedButton
) )
1057 ::WinSendMsg((HWND
)m_ahRadioButtons
[m_nSelectedButton
], BM_SETCHECK
, (MPARAM
)0, (MPARAM
)0);
1059 ::WinSendMsg((HWND
)m_ahRadioButtons
[nNum
], BM_SETCHECK
, (MPARAM
)1, (MPARAM
)0);
1060 ::WinSetFocus(HWND_DESKTOP
, (HWND
)m_ahRadioButtons
[nNum
]);
1061 m_nSelectedButton
= nNum
;
1062 } // end of wxRadioBox::SetSelection
1064 void wxRadioBox::SetString(
1066 , const wxString
& rsLabel
1069 wxCHECK_RET( IsValid(nItem
), wxT("invalid radiobox index") );
1071 m_pnRadioWidth
[nItem
] = m_pnRadioHeight
[nItem
] = -1;
1072 ::WinSetWindowText((HWND
)m_ahRadioButtons
[nItem
], (PSZ
)rsLabel
.c_str());
1073 } // end of wxRadioBox::SetString
1075 bool wxRadioBox::SetStringSelection(
1076 const wxString
& rsStr
1079 int nSel
= FindString(rsStr
);
1088 } // end of wxRadioBox::SetStringSelection
1090 bool wxRadioBox::Show(
1094 if (!wxControl::Show(bShow
))
1097 for (int i
= 0; i
< m_nNoItems
; i
++)
1099 ::WinShowWindow((HWND
)m_ahRadioButtons
[i
], (BOOL
)bShow
);
1102 } // end of wxRadioBox::Show
1104 // Show a specific button
1105 bool wxRadioBox::Show(
1110 wxCHECK_MSG( IsValid(nItem
), false,
1111 wxT("invalid item in wxRadioBox::Show()") );
1113 ::WinShowWindow((HWND
)m_ahRadioButtons
[nItem
], bShow
);
1116 } // end of wxRadioBox::Show
1118 void wxRadioBox::SubclassRadioButton(
1122 fnWndProcRadioBtn
= (WXFARPROC
)::WinSubclassWindow(hWndBtn
, (PFNWP
)wxRadioBtnWndProc
);
1123 } // end of wxRadioBox::SubclassRadioButton
1125 MRESULT
wxRadioBox::WindowProc(
1131 return (wxControl::OS2WindowProc( uMsg
1135 } // end of wxRadioBox::WindowProc
1137 // ---------------------------------------------------------------------------
1138 // window proc for radio buttons
1139 // ---------------------------------------------------------------------------
1141 MRESULT
wxRadioBtnWndProc(
1152 USHORT uKeyFlags
= SHORT1FROMMP((MPARAM
)wParam
);
1154 if (!(uKeyFlags
& KC_KEYUP
)) // Key Down event
1156 if (uKeyFlags
& KC_VIRTUALKEY
)
1158 wxRadioBox
* pRadiobox
= (wxRadioBox
*)::WinQueryWindowULong( hWnd
1161 USHORT uVk
= SHORT2FROMMP((MPARAM
)lParam
);
1162 bool bProcessed
= true;
1187 // Just to suppress the compiler warning
1194 int nSelOld
= pRadiobox
->GetSelection();
1195 int nSelNew
= pRadiobox
->GetNextItem( nSelOld
1197 ,pRadiobox
->GetWindowStyleFlag()
1200 if (nSelNew
!= nSelOld
)
1202 pRadiobox
->SetSelection(nSelNew
);
1205 // Emulate the button click
1207 pRadiobox
->SendNotificationEvent();
1217 return fnWndProcRadioBtn( hWnd
1222 } // end of wxRadioBtnWndProc
1224 MRESULT EXPENTRY
wxRadioBoxWndProc(
1231 return (fnWndProcRadioBox( hWnd
1237 } // end of wxRadioBoxWndProc