X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/0e320a79f187558effb04d92020b470372bbe456..28bf925c65ac2ccda970d4ab6fb2ba4e3a4168c7:/src/os2/radiobox.cpp diff --git a/src/os2/radiobox.cpp b/src/os2/radiobox.cpp index da582d0e52..6b09f22646 100644 --- a/src/os2/radiobox.cpp +++ b/src/os2/radiobox.cpp @@ -1,194 +1,941 @@ ///////////////////////////////////////////////////////////////////////////// -// Name: radiobox.cpp +// Name: src/os2/radiobox.cpp // Purpose: wxRadioBox -// Author: AUTHOR +// Author: David Webster // Modified by: -// Created: ??/??/98 +// Created: 10/12/99 // RCS-ID: $Id$ -// Copyright: (c) AUTHOR -// Licence: wxWindows licence +// Copyright: (c) David Webster +// Licence: wxWindows licence ///////////////////////////////////////////////////////////////////////////// -#ifdef __GNUG__ -#pragma implementation "radiobox.h" -#endif +// For compilers that support precompilation, includes "wx.h". +#include "wx/wxprec.h" + +#if wxUSE_RADIOBOX #include "wx/radiobox.h" -#if !USE_SHARED_LIBRARY -IMPLEMENT_DYNAMIC_CLASS(wxRadioBox, wxControl) +#ifndef WX_PRECOMP + #include + #include "wx/crt.h" + #include "wx/string.h" + #include "wx/bitmap.h" + #include "wx/brush.h" #endif +#include "wx/os2/private.h" + +IMPLEMENT_DYNAMIC_CLASS(wxRadioBox, wxControl) + +// --------------------------------------------------------------------------- +// private functions +// --------------------------------------------------------------------------- + +// wnd proc for radio buttons +MRESULT EXPENTRY wxRadioBtnWndProc( HWND hWnd + ,UINT uMessage + ,MPARAM wParam + ,MPARAM lParam + ); +MRESULT EXPENTRY wxRadioBoxWndProc( HWND hWnd + ,UINT uMessage + ,MPARAM wParam + ,MPARAM lParam + ); + +// --------------------------------------------------------------------------- +// global vars +// --------------------------------------------------------------------------- + +extern void wxAssociateWinWithHandle( HWND hWnd + ,wxWindowOS2* pWin + ); +extern void wxRemoveHandleAssociation( wxWindowOS2 *pWin ); +// the pointer to standard radio button & box wnd procs +static WXFARPROC fnWndProcRadioBtn = NULL; +static WXFARPROC fnWndProcRadioBox = NULL; + +// =========================================================================== +// implementation +// =========================================================================== + +// --------------------------------------------------------------------------- +// wxRadioBox +// --------------------------------------------------------------------------- + // Radio box item wxRadioBox::wxRadioBox() { - m_selectedButton = -1; - m_noItems = 0; - m_noRowsOrCols = 0; - m_majorDim = 0 ; -} + m_nSelectedButton = -1; + m_nNoItems = 0; + m_ahRadioButtons = NULL; + m_pnRadioWidth = NULL; + m_pnRadioHeight = NULL; +} // end of wxRadioBox::wxRadioBox -bool wxRadioBox::Create(wxWindow *parent, wxWindowID id, const wxString& title, - const wxPoint& pos, const wxSize& size, - int n, const wxString choices[], - int majorDim, long style, - const wxValidator& val, const wxString& name) +wxRadioBox::~wxRadioBox() { - m_selectedButton = -1; - m_noItems = n; - - SetName(name); - SetValidator(val); - - parent->AddChild(this); + m_isBeingDeleted = true; - m_windowStyle = (long&)style; + if (m_hWnd) + wxRemoveHandleAssociation(this); + if (m_ahRadioButtons) + { + for (unsigned int i = 0; i < m_nNoItems; i++) + { + wxWindow* pWin = wxFindWinFromHandle((WXHWND)m_ahRadioButtons[i]); + wxRemoveHandleAssociation(pWin); - if (id == -1) - m_windowId = NewControlId(); - else - m_windowId = id; + ::WinDestroyWindow((HWND)m_ahRadioButtons[i]); + } + delete[] m_ahRadioButtons; + } + if (m_pnRadioWidth) + delete[] m_pnRadioWidth; + if (m_pnRadioHeight) + delete[] m_pnRadioHeight; +} // end of wxRadioBox::~wxRadioBox - m_noRowsOrCols = majorDim; +void wxRadioBox::Command ( wxCommandEvent& rEvent ) +{ + SetSelection (rEvent.GetInt()); + ProcessCommand(rEvent); +} // end of wxRadioBox::Command - if (majorDim==0) - m_majorDim = n ; - else - m_majorDim = majorDim ; +bool wxRadioBox::ContainsHWND( WXHWND hWnd ) const +{ + unsigned int nCount = GetCount(); + unsigned int i; + for (i = 0; i < nCount; i++) + { + if (GetRadioButtons()[i] == hWnd) + return true; + } + return false; +} // end of wxRadioBox::ContainsHWND + +bool wxRadioBox::Create( wxWindow* pParent, + wxWindowID vId, + const wxString& rsTitle, + const wxPoint& rPos, + const wxSize& rSize, + const wxArrayString& asChoices, + int nMajorDim, + long lStyle, + const wxValidator& rVal, + const wxString& rsName ) +{ + wxCArrayString chs(asChoices); - // TODO create radiobox - return FALSE; + return Create(pParent, vId, rsTitle, rPos, rSize, chs.GetCount(), + chs.GetStrings(), nMajorDim, lStyle, rVal, rsName); } +bool wxRadioBox::Create( wxWindow* pParent, + wxWindowID vId, + const wxString& rsTitle, + const wxPoint& rPos, + const wxSize& rSize, + int nNum, + const wxString asChoices[], + int nMajorDim, + long lStyle, + const wxValidator& rVal, + const wxString& rsName ) +{ + wxColour vColour(*wxBLACK); + LONG lColor; + HWND hWndParent = GetHwndOf(pParent); + + m_backgroundColour = pParent->GetBackgroundColour(); + m_nSelectedButton = -1; + m_nNoItems = 0; + + // + // Common initialization + // + if (!CreateControl( pParent + ,vId + ,rPos + ,rSize + ,lStyle + ,rVal + ,rsName + )) + return false; + if (!OS2CreateControl( wxT("STATIC") + ,SS_GROUPBOX + ,rPos + ,rSize + ,rsTitle + )) + return false; + + wxAssociateWinWithHandle(m_hWnd, this); + + // + // Now we can set m_nNoItems and let SetMajorDim set m_numCols/m_numRows + // + m_nNoItems = (unsigned int)nNum; + SetMajorDim(nMajorDim == 0 ? nNum : nMajorDim, lStyle); + + m_ahRadioButtons = new WXHWND[nNum]; + m_pnRadioWidth = new int[nNum]; + m_pnRadioHeight = new int[nNum]; + + for (int i = 0; i < nNum; i++) + { + m_pnRadioWidth[i] = m_pnRadioHeight[i] = -1; + long lStyleBtn = BS_AUTORADIOBUTTON | WS_VISIBLE; + int nNewId = NewControlId(); + + if (i == 0) + lStyleBtn |= WS_GROUP | WS_TABSTOP; + + wxString sLabel = ::wxPMTextToLabel(asChoices[i]); + + HWND hWndBtn = (WXHWND)::WinCreateWindow ( hWndParent, + WC_BUTTON, + sLabel.c_str(), + lStyleBtn, + 0, 0, 0, 0, + hWndParent, + HWND_BOTTOM, + (HMENU)nNewId, + NULL, + NULL + ); + if (!hWndBtn) + { + return false; + } + lColor = (LONG)vColour.GetPixel(); + ::WinSetPresParam( hWndBtn + ,PP_FOREGROUNDCOLOR + ,sizeof(LONG) + ,(PVOID)&lColor + ); + + lColor = (LONG)m_backgroundColour.GetPixel(); + ::WinSetPresParam( hWndBtn + ,PP_BACKGROUNDCOLOR + ,sizeof(LONG) + ,(PVOID)&lColor + ); + m_ahRadioButtons[i] = (WXHWND)hWndBtn; + SubclassRadioButton((WXHWND)hWndBtn); + wxAssociateWinWithHandle(hWndBtn, this); + wxOS2SetFont( hWndBtn + ,*wxSMALL_FONT + ); + ::WinSetWindowULong(hWndBtn, QWL_USER, (ULONG)this); + m_aSubControls.Add(nNewId); + } -wxRadioBox::~wxRadioBox() + // + // Create a dummy control to end the group. + // + (void)::WinCreateWindow ( hWndParent, + WC_BUTTON, + "", + WS_GROUP, + 0, 0, 0, 0, + hWndParent, + HWND_TOP, + (HMENU)NewControlId(), + NULL, + NULL + ); + fnWndProcRadioBox = (WXFARPROC)::WinSubclassWindow( GetHwnd() + ,(PFNWP)wxRadioBoxWndProc + ); + ::WinSetWindowULong(GetHwnd(), QWL_USER, (ULONG)this); + lColor = (LONG)vColour.GetPixel(); + ::WinSetPresParam( m_hWnd + ,PP_FOREGROUNDCOLOR + ,sizeof(LONG) + ,(PVOID)&lColor + ); + + lColor = (LONG)m_backgroundColour.GetPixel(); + ::WinSetPresParam( m_hWnd + ,PP_BACKGROUNDCOLOR + ,sizeof(LONG) + ,(PVOID)&lColor + ); + SetXComp(0); + SetYComp(0); + SetSelection(0); + SetSize( rPos.x + ,rPos.y + ,rSize.x + ,rSize.y + ); + return true; +} // end of wxRadioBox::Create + +wxSize wxRadioBox::DoGetBestSize() const { - // TODO -} + return (GetTotalButtonSize(GetMaxButtonSize())); +} // end of wxRadioBox::DoGetBestSize + +void wxRadioBox::DoSetSize( + int nX +, int nY +, int nWidth +, int nHeight +, int nSizeFlags +) +{ + // + // Input parameters assume wxWidgets coordinate system + // + int nCurrentX; + int nCurrentY; + int nWidthOld; + int nHeightOld; + int nXx = nX; + int nYy = nY; + int nXOffset = nXx; + int nYOffset = nYy; + int nCx1; + int nCy1; + wxSize vMaxSize = GetMaxButtonSize(); + int nMaxWidth; + int nMaxHeight; + wxSize vTotSize; + int nTotWidth; + int nTotHeight; + int nStartX; + int nStartY; + wxFont vFont = GetFont(); + + m_nSizeFlags = nSizeFlags; + GetPosition( &nCurrentX + ,&nCurrentY + ); + GetSize( &nWidthOld + ,&nHeightOld + ); + + if (nX == wxDefaultCoord && !(nSizeFlags & wxSIZE_ALLOW_MINUS_ONE)) + nXx = nCurrentX; + if (nY == wxDefaultCoord && !(nSizeFlags & wxSIZE_ALLOW_MINUS_ONE)) + nYy = nCurrentY; + if (nYy < 0) + nYy = 0; + if (nXx < 0) + nXx = 0; + + wxGetCharSize( m_hWnd + ,&nCx1 + ,&nCy1 + ,&vFont + ); + + // + // Attempt to have a look coherent with other platforms: We compute the + // biggest toggle dim, then we align all items according this value. + // + vMaxSize = GetMaxButtonSize(); + nMaxWidth = vMaxSize.x; + nMaxHeight = vMaxSize.y; + + vTotSize = GetTotalButtonSize(vMaxSize); + nTotWidth = vTotSize.x; + nTotHeight = vTotSize.y; + + // + // Only change our width/height if asked for + // + if (nWidth == -1) + { + if (nSizeFlags & wxSIZE_AUTO_WIDTH ) + nWidth = nTotWidth; + else + nWidth = nWidthOld; + } + + if (nHeight == -1) + { + if (nSizeFlags & wxSIZE_AUTO_HEIGHT) + nHeight = nTotHeight; + else + nHeight = nHeightOld; + } + + // + // Now convert to OS/2 coordinate system + // + wxWindowOS2* pParent = (wxWindowOS2*)GetParent(); + if (pParent) + nYy = GetOS2ParentHeight(pParent) - nYy - nHeight; + else + { + RECTL vRect; + ::WinQueryWindowRect(HWND_DESKTOP, &vRect); + nYy = vRect.yTop - nYy - nHeight; + } + nYOffset = nYy + nHeight; + ::WinSetWindowPos( GetHwnd() + ,HWND_TOP + ,(LONG)nXx + ,(LONG)nYy + ,(LONG)nWidth + ,(LONG)nHeight + ,SWP_ZORDER | SWP_SIZE | SWP_MOVE | SWP_SHOW + ); + + // + // Now position all the buttons: the current button will be put at + // wxPoint(x_offset, y_offset) and the new row/column will start at + // startX/startY. The size of all buttons will be the same wxSize(maxWidth, + // maxHeight) except for the buttons in the last column which should extend + // to the right border of radiobox and thus can be wider than this. + // + // Also, remember that wxRA_SPECIFY_COLS means that we arrange buttons in + // left to right order and m_majorDim is the number of columns while + // wxRA_SPECIFY_ROWS means that the buttons are arranged top to bottom and + // m_majorDim is the number of rows. + // + nXOffset += nCx1; + nYOffset -= (nMaxHeight + ((3*nCy1)/2)); + + nStartX = nXOffset; + nStartY = nYOffset; + + for (unsigned int i = 0; i < m_nNoItems; i++) + { + // + // The last button in the row may be wider than the other ones as the + // radiobox may be wider than the sum of the button widths (as it + // happens, for example, when the radiobox label is very long) + // + bool bIsLastInTheRow; + + if (m_windowStyle & wxRA_SPECIFY_COLS) + { + // + // Item is the last in its row if it is a multiple of the number of + // columns or if it is just the last item + // + int n = i + 1; + + bIsLastInTheRow = ((n % GetMajorDim()) == 0) || (n == (int)m_nNoItems); + } + else // winRA_SPECIFY_ROWS + { + // + // Item is the last in the row if it is in the last columns + // + bIsLastInTheRow = i >= (m_nNoItems/GetMajorDim()) * GetMajorDim(); + } + + // + // Is this the start of new row/column? + // + if (i && (i % GetMajorDim() == 0)) + { + if (m_windowStyle & wxRA_SPECIFY_ROWS) + { + // + // Start of new column + // + nYOffset = nStartY; + nXOffset += nMaxWidth + nCx1; + } + else // start of new row + { + nXOffset = nStartX; + nYOffset -= nMaxHeight; + if (m_pnRadioWidth[0] > 0L) + nYOffset -= nCy1/2; + } + } + + int nWidthBtn; + + if (bIsLastInTheRow) + { + // + // Make the button go to the end of radio box + // + nWidthBtn = nStartX + nWidth - nXOffset - (2 * nCx1); + if (nWidthBtn < nMaxWidth) + nWidthBtn = nMaxWidth; + } + else + { + // + // Normal button, always of the same size + // + nWidthBtn = nMaxWidth; + } + + // + // Make all buttons of the same, maximal size - like this they + // cover the radiobox entirely and the radiobox tooltips are always + // shown (otherwise they are not when the mouse pointer is in the + // radiobox part not belonging to any radiobutton) + // + ::WinSetWindowPos( (HWND)m_ahRadioButtons[i] + ,HWND_BOTTOM + ,(LONG)nXOffset + ,(LONG)nYOffset + ,(LONG)nWidthBtn + ,(LONG)nMaxHeight + ,SWP_ZORDER | SWP_SIZE | SWP_MOVE | SWP_SHOW + ); + // + // Where do we put the next button? + // + if (m_windowStyle & wxRA_SPECIFY_ROWS) + { + // + // Below this one + // + nYOffset -= nMaxHeight; + if (m_pnRadioWidth[0] > 0) + nYOffset -= nCy1/2; + } + else + { + // + // To the right of this one + // + nXOffset += nWidthBtn + nCx1; + } + } +} // end of wxRadioBox::DoSetSize -wxString wxRadioBox::GetLabel(int item) const +bool wxRadioBox::Enable(unsigned int nItem, bool bEnable) { - // TODO - return wxString(""); -} + wxCHECK_MSG( IsValid(nItem), false, + wxT("invalid item in wxRadioBox::Enable()") ); -void wxRadioBox::SetLabel(int item, const wxString& label) + ::WinEnableWindow((HWND) m_ahRadioButtons[nItem], bEnable); + return true; +} // end of wxRadioBox::Enable + +bool wxRadioBox::Enable(bool bEnable) { - // TODO -} + if ( !wxControl::Enable(bEnable) ) + return false; + for (unsigned int i = 0; i < m_nNoItems; i++) + ::WinEnableWindow((HWND)m_ahRadioButtons[i], bEnable); + return true; +} // end of wxRadioBox::Enable + +unsigned int wxRadioBox::GetCount() const +{ + return m_nNoItems; +} // end of wxRadioBox::GetCount -int wxRadioBox::FindString(const wxString& s) const +wxString wxRadioBox::GetLabel(int nItem) const { - // TODO - return -1; -} + wxCHECK_MSG( IsValid(nItem), wxEmptyString, wxT("invalid radiobox index") ); + + return wxGetWindowText(m_ahRadioButtons[nItem]); +} // end of wxRadioBox::GetLabel -void wxRadioBox::SetSelection(int n) +wxSize wxRadioBox::GetMaxButtonSize() const { - if ((n < 0) || (n >= m_noItems)) - return; - // TODO + int nWidthMax = 0; + int nHeightMax = 0; - m_selectedButton = n; -} + for (unsigned int i = 0 ; i < m_nNoItems; i++) + { + int nWidth; + int nHeight; + + if (m_pnRadioWidth[i] < 0L) + { + GetTextExtent( wxGetWindowText(m_ahRadioButtons[i]) + ,&nWidth + ,&nHeight + ); + + // + // Adjust the size to take into account the radio box itself + // FIXME this is totally bogus! + // + nWidth += RADIO_SIZE; + nHeight *= 3; + nHeight /= 2; + } + else + { + nWidth = m_pnRadioWidth[i]; + nHeight = m_pnRadioHeight[i]; + } + if (nWidthMax < nWidth ) + nWidthMax = nWidth; + if (nHeightMax < nHeight ) + nHeightMax = nHeight; + } + wxSize maxsize( nWidthMax, nHeightMax); + return maxsize; +} // end of wxRadioBox::GetMaxButtonSize // Get single selection, for single choice list items int wxRadioBox::GetSelection() const { - return m_selectedButton; -} + return m_nSelectedButton; +} // end of wxRadioBox::GetSelection -// Find string for position -wxString wxRadioBox::GetString(int n) const +void wxRadioBox::GetSize( int* pnWidth, int* pnHeight ) const { - // TODO - return wxString(""); -} + RECT vRect; + + vRect.xLeft = -1; + vRect.xRight = -1; + vRect.yTop = -1; + vRect.yBottom = -1; + + if (m_hWnd) + wxFindMaxSize( m_hWnd, &vRect ); -void wxRadioBox::SetSize(int x, int y, int width, int height, int sizeFlags) + for (unsigned int i = 0; i < m_nNoItems; i++) + wxFindMaxSize( m_ahRadioButtons[i], &vRect ); + + if (pnWidth) + *pnWidth = vRect.xRight - vRect.xLeft; + if (pnHeight) + *pnHeight = vRect.yTop - vRect.yBottom; +} // end of wxRadioBox::GetSize + +// Find string for position +wxString wxRadioBox::GetString(unsigned int nNum) const { - // TODO -} + wxCHECK_MSG( IsValid(nNum), wxEmptyString, wxT("invalid radiobox index") ); + return wxGetWindowText(m_ahRadioButtons[nNum]); +} // end of wxRadioBox::GetString -void wxRadioBox::GetSize(int *width, int *height) const +// For single selection items only +wxString wxRadioBox::GetStringSelection() const { - // TODO -} + wxString sResult; + int nSel = GetSelection(); + + if (nSel != wxNOT_FOUND) + sResult = GetString(nSel); -void wxRadioBox::GetPosition(int *x, int *y) const + return sResult; +} // end of wxRadioBox::GetStringSelection + +wxSize wxRadioBox::GetTotalButtonSize( const wxSize& rSizeBtn ) const { - // TODO -} + int nCx1; + int nCy1; + int nHeight; + int nWidth; + int nWidthLabel = 0; + + nCx1 = GetCharWidth(); + nCy1 = GetCharHeight(); + nHeight = GetRowCount() * rSizeBtn.y + (2 * nCy1); + nWidth = GetColumnCount() * (rSizeBtn.x + nCx1) + nCx1; + + // + // And also wide enough for its label + // + wxString sStr = wxGetWindowText(GetHwnd()); + if (!sStr.empty()) + { + GetTextExtent( sStr + ,&nWidthLabel + ,NULL + ); + nWidthLabel += 2*nCx1; + } + if (nWidthLabel > nWidth) + nWidth = nWidthLabel; + + wxSize total( nWidth, nHeight ); + return total; +} // end of wxRadioBox::GetTotalButtonSize + +WXHBRUSH wxRadioBox::OnCtlColor( WXHDC hwinDC, + WXHWND WXUNUSED(hWnd), + WXUINT WXUNUSED(uCtlColor), + WXUINT WXUNUSED(uMessage), + WXWPARAM WXUNUSED(wParam), + WXLPARAM WXUNUSED(lParam) ) +{ + HPS hPS = (HPS)hwinDC; // pass in a PS handle in OS/2 + + if (GetParent()->GetTransparentBackground()) + ::GpiSetBackMix(hPS, BM_LEAVEALONE); + else + ::GpiSetBackMix(hPS, BM_OVERPAINT); + + wxColour vColBack = GetBackgroundColour(); + + ::GpiSetBackColor(hPS, vColBack.GetPixel()); + ::GpiSetColor(hPS, vColBack.GetPixel()); + + wxBrush* pBrush = wxTheBrushList->FindOrCreateBrush( vColBack, wxSOLID ); + return ((WXHBRUSH)pBrush->GetResourceHandle()); +} // end of wxRadioBox::OnCtlColor -wxString wxRadioBox::GetLabel() const +bool wxRadioBox::OS2Command( WXUINT uCmd, + WXWORD wId) { - // TODO - return wxString(""); -} + int nSelectedButton = -1; -void wxRadioBox::SetLabel(const wxString& label) + if (uCmd == BN_CLICKED) + { + if (wId == GetId()) + return true; + + for (unsigned int i = 0; i < m_nNoItems; i++) + { + if (wId == wxGetWindowId(m_ahRadioButtons[i])) + { + nSelectedButton = i; + break; + } + } + if (nSelectedButton == -1) + { + // + // Just ignore it + // + return false; + } + if (nSelectedButton != m_nSelectedButton) + { + m_nSelectedButton = nSelectedButton; + SendNotificationEvent(); + } + return true; + } + else + return false; +} // end of wxRadioBox::OS2Command + +void wxRadioBox::SendNotificationEvent() { - // TODO -} + wxCommandEvent vEvent( + wxEVT_COMMAND_RADIOBOX_SELECTED, + m_windowId + ); + + vEvent.SetInt( m_nSelectedButton ); + vEvent.SetString( GetString(m_nSelectedButton) ); + vEvent.SetEventObject(this); + ProcessCommand(vEvent); +} // end of wxRadioBox::SendNotificationEvent void wxRadioBox::SetFocus() { - // TODO -} + if (m_nNoItems > 0) + { + if (m_nSelectedButton == -1) + ::WinSetFocus(HWND_DESKTOP, (HWND)m_ahRadioButtons[0]); + else + ::WinSetFocus(HWND_DESKTOP, (HWND)m_ahRadioButtons[m_nSelectedButton]); + } +} // end of wxRadioBox::SetFocus -bool wxRadioBox::Show(bool show) +bool wxRadioBox::SetFont(const wxFont& rFont) { - // TODO - return FALSE; -} + if (!wxControl::SetFont(rFont)) + { + // + // Nothing to do + // + return false; + } + // + // Also set the font of our radio buttons + // + for (unsigned int n = 0; n < m_nNoItems; n++) + { + HWND hWndBtn = (HWND)m_ahRadioButtons[n]; -// Enable a specific button -void wxRadioBox::Enable(int item, bool enable) -{ - // TODO -} + wxOS2SetFont( hWndBtn, rFont ); + ::WinInvalidateRect(hWndBtn, NULL, FALSE); + } + return true; +} // end of wxRadioBox::SetFont -// Enable all controls -void wxRadioBox::Enable(bool enable) +void wxRadioBox::SetSelection( + int nNum +) { - wxControl::Enable(enable); + wxCHECK_RET( IsValid(nNum), wxT("invalid radiobox index") ); - // TODO -} + if ( IsValid(m_nSelectedButton) ) + ::WinSendMsg((HWND)m_ahRadioButtons[m_nSelectedButton], BM_SETCHECK, (MPARAM)0, (MPARAM)0); -// Show a specific button -void wxRadioBox::Show(int item, bool show) + ::WinSendMsg((HWND)m_ahRadioButtons[nNum], BM_SETCHECK, (MPARAM)1, (MPARAM)0); + ::WinSetFocus(HWND_DESKTOP, (HWND)m_ahRadioButtons[nNum]); + m_nSelectedButton = nNum; +} // end of wxRadioBox::SetSelection + +void wxRadioBox::SetString(unsigned int nItem, const wxString& rsLabel) { - // TODO -} + wxCHECK_RET( IsValid(nItem), wxT("invalid radiobox index") ); -// For single selection items only -wxString wxRadioBox::GetStringSelection () const + m_pnRadioWidth[nItem] = m_pnRadioHeight[nItem] = -1; + ::WinSetWindowText((HWND)m_ahRadioButtons[nItem], rsLabel.c_str()); +} // end of wxRadioBox::SetString + +bool wxRadioBox::SetStringSelection(const wxString& rsStr) { - int sel = GetSelection (); - if (sel > -1) - return this->GetString (sel); + int nSel = FindString(rsStr); + + if (nSel > -1) + { + SetSelection(nSel); + return true; + } else - return wxString(""); -} + return false; +} // end of wxRadioBox::SetStringSelection -bool wxRadioBox::SetStringSelection (const wxString& s) +bool wxRadioBox::Show(bool bShow) { - int sel = FindString (s); - if (sel > -1) + if (!wxControl::Show(bShow)) + return false; + + for (unsigned int i = 0; i < m_nNoItems; i++) { - SetSelection (sel); - return TRUE; + ::WinShowWindow((HWND)m_ahRadioButtons[i], (BOOL)bShow); } - else - return FALSE; -} + return true; +} // end of wxRadioBox::Show -void wxRadioBox::Command (wxCommandEvent & event) +// Show a specific button +bool wxRadioBox::Show(unsigned int nItem, bool bShow) { - SetSelection (event.m_commandInt); - ProcessCommand (event); -} + wxCHECK_MSG( IsValid(nItem), false, + wxT("invalid item in wxRadioBox::Show()") ); + + ::WinShowWindow((HWND)m_ahRadioButtons[nItem], bShow); + return true; +} // end of wxRadioBox::Show +void wxRadioBox::SubclassRadioButton( + WXHWND hWndBtn +) +{ + fnWndProcRadioBtn = (WXFARPROC)::WinSubclassWindow(hWndBtn, (PFNWP)wxRadioBtnWndProc); +} // end of wxRadioBox::SubclassRadioButton + +MRESULT wxRadioBox::WindowProc( + WXUINT uMsg +, WXWPARAM wParam +, WXLPARAM lParam +) +{ + return (wxControl::OS2WindowProc( uMsg + ,wParam + ,lParam + )); +} // end of wxRadioBox::WindowProc + +// --------------------------------------------------------------------------- +// window proc for radio buttons +// --------------------------------------------------------------------------- + +MRESULT wxRadioBtnWndProc( + HWND hWnd +, UINT uMessage +, MPARAM wParam +, MPARAM lParam +) +{ + switch (uMessage) + { + case WM_CHAR: + { + USHORT uKeyFlags = SHORT1FROMMP((MPARAM)wParam); + + if (!(uKeyFlags & KC_KEYUP)) // Key Down event + { + if (uKeyFlags & KC_VIRTUALKEY) + { + wxRadioBox* pRadiobox = (wxRadioBox *)::WinQueryWindowULong( hWnd + ,QWL_USER + ); + USHORT uVk = SHORT2FROMMP((MPARAM)lParam); + bool bProcessed = true; + wxDirection eDir; + + switch(uVk) + { + case VK_LEFT: + eDir = wxLEFT; + break; + + case VK_RIGHT: + eDir = wxRIGHT; + break; + + case VK_DOWN: + eDir = wxDOWN; + break; + + case VK_UP: + eDir = wxUP; + break; + + default: + bProcessed = false; + + // + // Just to suppress the compiler warning + // + eDir = wxALL; + } + + if (bProcessed) + { + int nSelOld = pRadiobox->GetSelection(); + int nSelNew = pRadiobox->GetNextItem( nSelOld + ,eDir + ,pRadiobox->GetWindowStyleFlag() + ); + + if (nSelNew != nSelOld) + { + pRadiobox->SetSelection(nSelNew); + + // + // Emulate the button click + // + pRadiobox->SendNotificationEvent(); + return 0; + } + } + } + } + } + break; + } + + return fnWndProcRadioBtn( hWnd + ,(ULONG)uMessage + ,(MPARAM)wParam + ,(MPARAM)lParam + ); +} // end of wxRadioBtnWndProc + +MRESULT EXPENTRY wxRadioBoxWndProc( HWND hWnd, + UINT uMessage, + MPARAM wParam, + MPARAM lParam ) +{ + return (fnWndProcRadioBox( hWnd, + (ULONG)uMessage, + (MPARAM)wParam, + (MPARAM)lParam ) + ); +} // end of wxRadioBoxWndProc + +#endif // wxUSE_RADIOBOX