X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/bfc6fde4b1dd5bfd8ae22839ff9a69cf24eb9120..9d5507f7a2701395e1d5c121bd877bb9066ee6ea:/src/msw/radiobox.cpp diff --git a/src/msw/radiobox.cpp b/src/msw/radiobox.cpp index 66ee17fea5..b29e5eb3e2 100644 --- a/src/msw/radiobox.cpp +++ b/src/msw/radiobox.cpp @@ -1,17 +1,21 @@ ///////////////////////////////////////////////////////////////////////////// -// Name: radiobox.cpp -// Purpose: wxRadioBox +// Name: src/msw/radiobox.cpp +// Purpose: wxRadioBox implementation // Author: Julian Smart // Modified by: // Created: 04/01/98 // RCS-ID: $Id$ -// Copyright: (c) Julian Smart and Markus Holzem -// Licence: wxWindows license +// Copyright: (c) Julian Smart +// Licence: wxWindows licence ///////////////////////////////////////////////////////////////////////////// -#ifdef __GNUG__ - #pragma implementation "radiobox.h" -#endif +// =========================================================================== +// declarations +// =========================================================================== + +// --------------------------------------------------------------------------- +// headers +// --------------------------------------------------------------------------- // For compilers that support precompilation, includes "wx.h". #include "wx/wxprec.h" @@ -20,906 +24,841 @@ #pragma hdrstop #endif +#if wxUSE_RADIOBOX + +#include "wx/radiobox.h" + #ifndef WX_PRECOMP - #include - #include "wx/setup.h" #include "wx/bitmap.h" #include "wx/brush.h" - #include "wx/radiobox.h" + #include "wx/settings.h" + #include "wx/log.h" #endif -#include "wx/msw/private.h" +#include "wx/msw/subwin.h" + +#if wxUSE_TOOLTIPS + #include "wx/tooltip.h" +#endif // wxUSE_TOOLTIPS + +// TODO: wxCONSTRUCTOR +#if 0 // wxUSE_EXTENDED_RTTI +WX_DEFINE_FLAGS( wxRadioBoxStyle ) + +wxBEGIN_FLAGS( wxRadioBoxStyle ) + // new style border flags, we put them first to + // use them for streaming out + wxFLAGS_MEMBER(wxBORDER_SIMPLE) + wxFLAGS_MEMBER(wxBORDER_SUNKEN) + wxFLAGS_MEMBER(wxBORDER_DOUBLE) + wxFLAGS_MEMBER(wxBORDER_RAISED) + wxFLAGS_MEMBER(wxBORDER_STATIC) + wxFLAGS_MEMBER(wxBORDER_NONE) + + // old style border flags + wxFLAGS_MEMBER(wxSIMPLE_BORDER) + wxFLAGS_MEMBER(wxSUNKEN_BORDER) + wxFLAGS_MEMBER(wxDOUBLE_BORDER) + wxFLAGS_MEMBER(wxRAISED_BORDER) + wxFLAGS_MEMBER(wxSTATIC_BORDER) + wxFLAGS_MEMBER(wxBORDER) + + // standard window styles + wxFLAGS_MEMBER(wxTAB_TRAVERSAL) + wxFLAGS_MEMBER(wxCLIP_CHILDREN) + wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW) + wxFLAGS_MEMBER(wxWANTS_CHARS) + wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE) + wxFLAGS_MEMBER(wxALWAYS_SHOW_SB ) + wxFLAGS_MEMBER(wxVSCROLL) + wxFLAGS_MEMBER(wxHSCROLL) + + wxFLAGS_MEMBER(wxRA_SPECIFY_COLS) + wxFLAGS_MEMBER(wxRA_HORIZONTAL) + wxFLAGS_MEMBER(wxRA_SPECIFY_ROWS) + wxFLAGS_MEMBER(wxRA_VERTICAL) + +wxEND_FLAGS( wxRadioBoxStyle ) + +IMPLEMENT_DYNAMIC_CLASS_XTI(wxRadioBox, wxControl,"wx/radiobox.h") + +wxBEGIN_PROPERTIES_TABLE(wxRadioBox) + wxEVENT_PROPERTY( Select , wxEVT_COMMAND_RADIOBOX_SELECTED , wxCommandEvent ) + wxPROPERTY_FLAGS( WindowStyle , wxRadioBoxStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style +wxEND_PROPERTIES_TABLE() -#if !USE_SHARED_LIBRARY - IMPLEMENT_DYNAMIC_CLASS(wxRadioBox, wxControl) -#endif - -bool wxRadioBox::MSWCommand(WXUINT param, WXWORD id) -{ - if (param == BN_CLICKED) - { -#ifdef __WIN32__ - int i; - for (i = 0; i < m_noItems; i++) - if (id == GetWindowLong((HWND) m_radioButtons[i], GWL_ID)) - m_selectedButton = i; #else - int i; - for (i = 0; i < m_noItems; i++) - if (id == GetWindowWord((HWND) m_radioButtons[i], GWW_ID)) - m_selectedButton = i; +IMPLEMENT_DYNAMIC_CLASS(wxRadioBox, wxControl) #endif - wxCommandEvent event(wxEVT_COMMAND_RADIOBOX_SELECTED, m_windowId); - event.SetInt( m_selectedButton ); - event.SetEventObject( this ); - ProcessCommand(event); - return TRUE; - } - else return FALSE; -} +/* + selection + content + label + dimension + item +*/ -#if WXWIN_COMPATIBILITY -wxRadioBox::wxRadioBox(wxWindow *parent, wxFunction func, const char *title, - int x, int y, int width, int height, - int n, char **choices, - int majorDim, long style, const char *name) -{ - wxString *choices2 = new wxString[n]; - for ( int i = 0; i < n; i ++) choices2[i] = choices[i]; - Create(parent, -1, title, wxPoint(x, y), wxSize(width, height), n, choices2, majorDim, style, - wxDefaultValidator, name); - Callback(func); - delete choices2; -} +// --------------------------------------------------------------------------- +// private functions +// --------------------------------------------------------------------------- -#endif +// wnd proc for radio buttons +LRESULT APIENTRY _EXPORT wxRadioBtnWndProc(HWND hWnd, + UINT message, + WPARAM wParam, + LPARAM lParam); + +// --------------------------------------------------------------------------- +// global vars +// --------------------------------------------------------------------------- + +// the pointer to standard radio button wnd proc +static WXFARPROC s_wndprocRadioBtn = (WXFARPROC)NULL; + +// =========================================================================== +// implementation +// =========================================================================== + +// --------------------------------------------------------------------------- +// wxRadioBox creation +// --------------------------------------------------------------------------- // Radio box item -wxRadioBox::wxRadioBox(void) +void wxRadioBox::Init() { - m_selectedButton = -1; - m_noItems = 0; - m_noRowsOrCols = 0; + m_selectedButton = wxNOT_FOUND; m_radioButtons = NULL; - m_majorDim = 0 ; - m_radioWidth = NULL ; - m_radioHeight = NULL ; + m_radioWidth = NULL; + m_radioHeight = NULL; } -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) +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) { - m_selectedButton = -1; - m_noItems = n; + // common initialization + if ( !wxStaticBox::Create(parent, id, title, pos, size, style, name) ) + return false; - SetName(name); +#if wxUSE_VALIDATORS SetValidator(val); +#else + wxUnusedVar(val); +#endif // wxUSE_VALIDATORS/!wxUSE_VALIDATORS - parent->AddChild(this); - m_backgroundColour = parent->GetBackgroundColour() ; - m_foregroundColour = parent->GetForegroundColour() ; - - m_windowStyle = (long&)style; - - int x = pos.x; - int y = pos.y; - int width = size.x; - int height = size.y; + m_radioButtons = new wxSubwindows(n); + m_radioWidth = new int[n]; + m_radioHeight = new int[n]; - if (id == -1) - m_windowId = NewControlId(); - else - m_windowId = id; - - m_noRowsOrCols = majorDim; - if (majorDim==0) - m_majorDim = n ; - else // Seemed to make sense to put this 'else' here... (RD) - m_majorDim = majorDim ; - - long msStyle = GROUP_FLAGS; - - bool want3D; - WXDWORD exStyle = Determine3DEffects(0, &want3D) ; - // Even with extended styles, need to combine with WS_BORDER - // for them to look right. - /* - if ( want3D || wxStyleHasBorder(m_windowStyle) ) - msStyle |= WS_BORDER; - */ - - - HWND the_handle = (HWND) parent->GetHWND() ; - - m_hWnd = (WXHWND)::CreateWindowEx - ( - (DWORD)exStyle, - GROUP_CLASS, - title, - msStyle, - 0, 0, 0, 0, - the_handle, - (HMENU)m_windowId, - wxGetInstance(), - NULL - ); - -#if wxUSE_CTL3D - if (want3D) + for ( int i = 0; i < n; i++ ) { - Ctl3dSubclassCtl((HWND)m_hWnd); - m_useCtl3D = TRUE; - } -#endif - - SetFont(parent->GetFont()); + m_radioWidth[i] = + m_radioHeight[i] = wxDefaultCoord; + long styleBtn = BS_AUTORADIOBUTTON | WS_TABSTOP | WS_CHILD | WS_VISIBLE; + if ( i == 0 ) + styleBtn |= WS_GROUP; - SubclassWin((WXHWND)m_hWnd); - - // Some radio boxes test consecutive id. - (void)NewControlId() ; - m_radioButtons = new WXHWND[n]; - m_radioWidth = new int[n] ; - m_radioHeight = new int[n] ; - int i; - for (i = 0; i < n; i++) - { - m_radioWidth[i] = m_radioHeight[i] = -1 ; - long groupStyle = 0; - if (i == 0 && style==0) - groupStyle = WS_GROUP; long newId = NewControlId(); - long msStyle = groupStyle | RADIO_FLAGS; - m_radioButtons[i] = (WXHWND) CreateWindowEx(exStyle, RADIO_CLASS, choices[i], - msStyle,0,0,0,0, - the_handle, (HMENU)newId, wxGetInstance(), NULL); -#if wxUSE_CTL3D - if (want3D) - { - Ctl3dSubclassCtl((HWND) m_hWnd); - m_useCtl3D = TRUE; - } -#endif - if (GetFont().Ok()) + HWND hwndBtn = ::CreateWindow(_T("BUTTON"), + choices[i].wx_str(), + styleBtn, + 0, 0, 0, 0, // will be set in SetSize() + GetHwndOf(parent), + (HMENU)newId, + wxGetInstance(), + NULL); + + if ( !hwndBtn ) { - SendMessage((HWND)m_radioButtons[i],WM_SETFONT, - (WPARAM)GetFont().GetResourceHandle(),0L); + wxLogLastError(wxT("CreateWindow(radio btn)")); + + return false; } - m_subControls.Append((wxObject *)newId); + + (*m_radioButtons)[i] = hwndBtn; + + SubclassRadioButton((WXHWND)hwndBtn); + + m_subControls.Add(newId); } // Create a dummy radio control to end the group. - (void)CreateWindowEx(0, RADIO_CLASS, "", WS_GROUP|RADIO_FLAGS, 0,0,0,0, the_handle, (HMENU)NewControlId(), wxGetInstance(), NULL); + (void)::CreateWindow(_T("BUTTON"), + wxEmptyString, + WS_GROUP | BS_AUTORADIOBUTTON | WS_CHILD, + 0, 0, 0, 0, GetHwndOf(parent), + (HMENU)NewControlId(), wxGetInstance(), NULL); + m_radioButtons->SetFont(GetFont()); + +#ifdef __WXWINCE__ + // Set the z-order correctly + SetWindowPos(GetHwnd(), HWND_BOTTOM, 0, 0, 0, 0, SWP_NOMOVE|SWP_NOSIZE); +#endif + + SetMajorDim(majorDim == 0 ? n : majorDim, style); SetSelection(0); + SetSize(pos.x, pos.y, size.x, size.y); - SetSize(x, y, width, height); + // Now that we have items determine what is the best size and set it. + SetInitialSize(size); - return TRUE; + return true; } -#if 0 -bool wxRadioBox::Create(wxWindow *parent, wxWindowID id, const wxString& title, - const wxPoint& pos, const wxSize& size, - int n, const wxBitmap *choices[], - int majorDim, long style, - const wxValidator& val, const wxString& name) +bool wxRadioBox::Create(wxWindow *parent, + wxWindowID id, + const wxString& title, + const wxPoint& pos, + const wxSize& size, + const wxArrayString& choices, + int majorDim, + long style, + const wxValidator& val, + const wxString& name) { - m_selectedButton = -1; - m_noRowsOrCols = 0; - m_noItems = n; - - SetName(name); - SetValidator(val); - - parent->AddChild(this); - m_backgroundColour = parent->GetBackgroundColour() ; - m_foregroundColour = parent->GetForegroundColour() ; - - m_windowStyle = (long&)style; - - int x = pos.x; - int y = pos.y; - int width = size.x; - int height = size.y; + wxCArrayString chs(choices); + return Create(parent, id, title, pos, size, chs.GetCount(), + chs.GetStrings(), majorDim, style, val, name); +} - if (id == -1) - m_windowId = NewControlId(); - else - m_windowId = id; +wxRadioBox::~wxRadioBox() +{ + m_isBeingDeleted = true; + delete m_radioButtons; + delete[] m_radioWidth; + delete[] m_radioHeight; +} - m_noRowsOrCols = majorDim; - if (majorDim==0) - m_majorDim = n ; - m_majorDim = majorDim ; - HWND the_handle ; +// NB: if this code is changed, wxGetWindowForHWND() which relies on having the +// radiobox pointer in GWL_USERDATA for radio buttons must be updated too! +void wxRadioBox::SubclassRadioButton(WXHWND hWndBtn) +{ + HWND hwndBtn = (HWND)hWndBtn; - long msStyle = GROUP_FLAGS; + if ( !s_wndprocRadioBtn ) + s_wndprocRadioBtn = (WXFARPROC)wxGetWindowProc(hwndBtn); - bool want3D; - WXDWORD exStyle = Determine3DEffects(0, &want3D) ; - // Even with extended styles, need to combine with WS_BORDER - // for them to look right. - if ( want3D || wxStyleHasBorder(m_windowStyle) ) - msStyle |= WS_BORDER; + wxSetWindowProc(hwndBtn, wxRadioBtnWndProc); + wxSetWindowUserData(hwndBtn, this); +} - m_hWnd = (WXHWND) CreateWindowEx((DWORD) exStyle, GROUP_CLASS, (title == "" ? NULL : (const char *)title), - msStyle, - 0,0,0,0, - (HWND) parent->GetHWND(), (HMENU) m_windowId, wxGetInstance(), NULL) ; +// ---------------------------------------------------------------------------- +// events generation +// ---------------------------------------------------------------------------- - the_handle = (HWND) parent->GetHWND(); +bool wxRadioBox::MSWCommand(WXUINT cmd, WXWORD id_) +{ + const int id = (signed short)id_; -#if wxUSE_CTL3D - if (want3D) + if ( cmd == BN_CLICKED ) { - Ctl3dSubclassCtl((HWND) m_hWnd); - m_useCtl3D = TRUE; - } -#endif + if (id == GetId()) + return true; - SetFont(parent->GetFont()); + int selectedButton = wxNOT_FOUND; - // Subclass again for purposes of dialog editing mode - SubclassWin((WXHWND)m_hWnd); + const unsigned int count = GetCount(); + for ( unsigned int i = 0; i < count; i++ ) + { + const HWND hwndBtn = (*m_radioButtons)[i]; + if ( id == wxGetWindowId(hwndBtn) ) + { + // we can get BN_CLICKED for a button which just became focused + // but it may not be checked, in which case we shouldn't + // generate a radiobox selection changed event for it + if ( ::SendMessage(hwndBtn, BM_GETCHECK, 0, 0) == BST_CHECKED ) + selectedButton = i; - (void)NewControlId() ; - m_radioButtons = new WXHWND[n]; - m_radioWidth = new int[n] ; - m_radioHeight = new int[n] ; + break; + } + } - int i; - for (i = 0; i < n; i++) - { - long groupStyle = 0; - if (i == 0 && style==0) - groupStyle = WS_GROUP; - long newId = NewControlId(); - m_radioWidth[i] = ((wxBitmap *)choices[i])->GetWidth(); - m_radioHeight[i] = ((wxBitmap *)choices[i])->GetHeight(); - char tmp[32] ; - sprintf(tmp,"Toggle%d",i) ; - long msStyle = groupStyle | RADIO_FLAGS; - m_radioButtons[i] = (WXHWND) CreateWindowEx(exStyle, RADIO_CLASS, tmp, - msStyle,0,0,0,0, - the_handle, (HMENU)newId, wxhInstance, NULL); -#if wxUSE_CTL3D - if (want3D) + if ( selectedButton == wxNOT_FOUND ) { - Ctl3dSubclassCtl((HWND) m_hWnd); - m_useCtl3D = TRUE; + // just ignore it - due to a hack with WM_NCHITTEST handling in our + // wnd proc, we can receive dummy click messages when we click near + // the radiobox edge (this is ugly but Julian wouldn't let me get + // rid of this...) + return false; } -#endif - m_subControls.Append((wxObject *)newId); - } - // Create a dummy radio control to end the group. - (void)CreateWindowEx(0, RADIO_CLASS, "", WS_GROUP|RADIO_FLAGS, 0,0,0,0, the_handle, (HMENU)NewControlId(), wxGetInstance(), NULL); - SetSelection(0); - - SetSize(x, y, width, height); - - return TRUE; -} -#endif + if ( selectedButton != m_selectedButton ) + { + m_selectedButton = selectedButton; -wxRadioBox::~wxRadioBox(void) -{ - m_isBeingDeleted = TRUE; + SendNotificationEvent(); + } + //else: don't generate events when the selection doesn't change - if (m_radioButtons) - { - int i; - for (i = 0; i < m_noItems; i++) - DestroyWindow((HWND) m_radioButtons[i]); - delete[] m_radioButtons; + return true; } - if (m_radioWidth) - delete[] m_radioWidth ; - if (m_radioHeight) - delete[] m_radioHeight ; - if (m_hWnd) - ::DestroyWindow((HWND) m_hWnd) ; - m_hWnd = 0 ; - + else + return false; } -wxString wxRadioBox::GetLabel(int item) const +void wxRadioBox::Command(wxCommandEvent & event) { - GetWindowText((HWND)m_radioButtons[item], wxBuffer, 300); - return wxString(wxBuffer); + SetSelection (event.GetInt()); + SetFocus(); + ProcessCommand(event); } -void wxRadioBox::SetLabel(int item, const wxString& label) +void wxRadioBox::SendNotificationEvent() { - m_radioWidth[item] = m_radioHeight[item] = -1 ; - SetWindowText((HWND)m_radioButtons[item], (const char *)label); + wxCommandEvent event(wxEVT_COMMAND_RADIOBOX_SELECTED, m_windowId); + event.SetInt( m_selectedButton ); + event.SetString(GetString(m_selectedButton)); + event.SetEventObject( this ); + ProcessCommand(event); } -void wxRadioBox::SetLabel(int item, wxBitmap *bitmap) +// ---------------------------------------------------------------------------- +// simple accessors +// ---------------------------------------------------------------------------- + +unsigned int wxRadioBox::GetCount() const { - /* - m_radioWidth[item] = bitmap->GetWidth() + FB_MARGIN ; - m_radioHeight[item] = bitmap->GetHeight() + FB_MARGIN ; - */ + return m_radioButtons ? m_radioButtons->GetCount() : 0u; } -int wxRadioBox::FindString(const wxString& s) const +void wxRadioBox::SetString(unsigned int item, const wxString& label) { - int i; - for (i = 0; i < m_noItems; i++) - { - GetWindowText((HWND) m_radioButtons[i], wxBuffer, 1000); - if (s == wxBuffer) - return i; - } - return -1; + wxCHECK_RET( IsValid(item), wxT("invalid radiobox index") ); + + m_radioWidth[item] = + m_radioHeight[item] = wxDefaultCoord; + + ::SetWindowText((*m_radioButtons)[item], label.c_str()); + + InvalidateBestSize(); } void wxRadioBox::SetSelection(int N) { - if ((N < 0) || (N >= m_noItems)) - return; + wxCHECK_RET( IsValid(N), wxT("invalid radiobox index") ); + + // unselect the old button + if ( m_selectedButton != wxNOT_FOUND ) + ::SendMessage((*m_radioButtons)[m_selectedButton], BM_SETCHECK, 0, 0L); - // Following necessary for Win32s, because Win32s translate BM_SETCHECK - if (m_selectedButton >= 0 && m_selectedButton < m_noItems) - SendMessage((HWND) m_radioButtons[m_selectedButton], BM_SETCHECK, 0, 0L); + // and select the new one + ::SendMessage((*m_radioButtons)[N], BM_SETCHECK, 1, 0L); - SendMessage((HWND) m_radioButtons[N], BM_SETCHECK, 1, 0L); m_selectedButton = N; } -// Get single selection, for single choice list items -int wxRadioBox::GetSelection(void) const +// Find string for position +wxString wxRadioBox::GetString(unsigned int item) const { - return m_selectedButton; + wxCHECK_MSG( IsValid(item), wxEmptyString, + wxT("invalid radiobox index") ); + + return wxGetWindowText((*m_radioButtons)[item]); } -// Find string for position -wxString wxRadioBox::GetString(int N) const +void wxRadioBox::SetFocus() { - GetWindowText((HWND) m_radioButtons[N], wxBuffer, 1000); - return wxString(wxBuffer); + if ( GetCount() > 0 ) + { + ::SetFocus((*m_radioButtons)[m_selectedButton == wxNOT_FOUND + ? 0 + : m_selectedButton]); + } } -/* NOTE. The contributed code to size the group box according to the - * given size simply didn't work (try it in e.g. Dialog Editor) - * so sorry, I'm removing it. If you reinstate it, please make sure - * it's bullet-proof in Dialog Editor. Meanwhile, it's better to have it - * working with a calculated size, than supposedly flexibly but - * actually broken. This is rather important when it comes to releasing - * stable software. Suggestion: if you modify this, rewrite it completely. - * -- JACS 7/2/99 - */ - -#if 0 -void wxRadioBox::SetSize(int x, int y, int width, int height, int sizeFlags) +// Enable a specific button +bool wxRadioBox::Enable(unsigned int item, bool enable) { - int currentX, currentY; - GetPosition(¤tX, ¤tY); - int xx = x; - int yy = y; + wxCHECK_MSG( IsValid(item), false, + wxT("invalid item in wxRadioBox::Enable()") ); - if (x == -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE)) - xx = currentX; - if (y == -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE)) - yy = currentY; + BOOL ret = ::EnableWindow((*m_radioButtons)[item], enable); - AdjustForParentClientOrigin(xx, yy, sizeFlags); + return (ret == 0) != enable; +} - wxString textRadioButton; +bool wxRadioBox::IsItemEnabled(unsigned int item) const +{ + wxCHECK_MSG( IsValid(item), false, + wxT("invalid item in wxRadioBox::IsItemEnabled()") ); - int y_offset = yy; - int x_offset = xx; - int current_width, cyf; + return ::IsWindowEnabled((*m_radioButtons)[item]) != 0; +} + +// Show a specific button +bool wxRadioBox::Show(unsigned int item, bool show) +{ + wxCHECK_MSG( IsValid(item), false, + wxT("invalid item in wxRadioBox::Show()") ); - int cx1,cy1; - wxGetCharSize(m_hWnd, &cx1, &cy1, & this->GetFont()); + BOOL ret = ::ShowWindow((*m_radioButtons)[item], show ? SW_SHOW : SW_HIDE); - // number of radio boxes in both directions - int nbHor, nbVer; - if (m_windowStyle & wxRA_SPECIFY_ROWS) - { - nbVer = m_majorDim ; - nbHor = (m_noItems+m_majorDim-1)/m_majorDim ; - } - else + bool changed = (ret != 0) != show; + if ( changed ) { - nbHor = m_majorDim ; - nbVer = (m_noItems+m_majorDim-1)/m_majorDim ; + InvalidateBestSize(); } - // Attempt to have a look coherent with other platforms: - // We compute the biggest toggle dim, then we align all - // items according this value. - int maxWidth = width, - maxHeight = height; - - // if we're given the width or height explicitly do not recalculate it, but - // use what we have + return changed; +} - bool calcWidth = maxWidth == -1, - calcHeight = maxHeight == -1; +bool wxRadioBox::IsItemShown(unsigned int item) const +{ + wxCHECK_MSG( IsValid(item), false, + wxT("invalid item in wxRadioBox::IsItemShown()") ); + + // don't use IsWindowVisible() here because it would return false if the + // radiobox itself is hidden while we want to only return false if this + // button specifically is hidden + return (::GetWindowLong((*m_radioButtons)[item], + GWL_STYLE) & WS_VISIBLE) != 0; +} - if ( calcWidth || calcHeight ) - { - // init vars to avoid compiler warnings, even if we don't use them - int eachWidth = 0, - eachHeight = 0; +#if wxUSE_TOOLTIPS - for ( int i = 0 ; i < m_noItems; i++ ) - { - if ( m_radioWidth[i] < 0 ) - { - // It's a labelled toggle - textRadioButton = wxGetWindowText(m_radioButtons[i]); - GetTextExtent(textRadioButton, ¤t_width, &cyf, - NULL,NULL, & this->GetFont()); - - if ( calcWidth ) - eachWidth = (int)(current_width + RADIO_SIZE); - if ( calcHeight ) - eachHeight = (int)((3*cyf)/2); - } - else - { - if ( calcWidth ) - eachWidth = m_radioWidth[i] ; - if ( calcHeight ) - eachHeight = m_radioHeight[i] ; - } - - if ( calcWidth && maxWidth < eachWidth ) - maxWidth = eachWidth; - if ( calcHeight && maxHeight < eachHeight ) - maxHeight = eachHeight; - } - } - else - { - maxHeight = height/nbVer; - maxWidth = width/nbHor; - } +bool wxRadioBox::HasToolTips() const +{ + return wxStaticBox::HasToolTips() || wxRadioBoxBase::HasItemToolTips(); +} - if (m_hWnd) - { - int totWidth ; - int totHeight; +void wxRadioBox::DoSetItemToolTip(unsigned int item, wxToolTip *tooltip) +{ + // we have already checked for the item to be valid in wxRadioBoxBase + const HWND hwndRbtn = (*m_radioButtons)[item]; + if ( tooltip != NULL ) + tooltip->Add(hwndRbtn); + else // unset the tooltip + wxToolTip::Remove(hwndRbtn); +} - // this formula works, but I don't know why. - // Please, be sure what you do if you modify it!! - if (m_radioWidth[0]<0) - totHeight = (nbVer * maxHeight) + cy1/2 ; - else - totHeight = nbVer * (maxHeight+cy1/2) ; - totWidth = nbHor * (maxWidth+cx1) ; +#endif // wxUSE_TOOLTIPS -#if (!wxUSE_CTL3D) - // Requires a bigger group box in plain Windows - MoveWindow((HWND) m_hWnd,x_offset,y_offset,totWidth+cx1,totHeight+(3*cy1)/2,TRUE) ; -#else - MoveWindow((HWND) m_hWnd,x_offset,y_offset,totWidth+cx1,totHeight+cy1,TRUE) ; -#endif - x_offset += cx1; - y_offset += cy1; - } +WX_FORWARD_STD_METHODS_TO_SUBWINDOWS(wxRadioBox, wxStaticBox, m_radioButtons) -#if (!wxUSE_CTL3D) - y_offset += (int)(cy1/2); // Fudge factor since buttons overlapped label - // JACS 2/12/93. CTL3D draws group label quite high. -#endif - int startX = x_offset ; - int startY = y_offset ; +// ---------------------------------------------------------------------------- +// size calculations +// ---------------------------------------------------------------------------- - for ( int i = 0 ; i < m_noItems; i++) +wxSize wxRadioBox::GetMaxButtonSize() const +{ + // calculate the max button size + int widthMax = 0, + heightMax = 0; + const unsigned int count = GetCount(); + for ( unsigned int i = 0 ; i < count; i++ ) { - // Bidimensional radio adjustment - if (i&&((i%m_majorDim)==0)) // Why is this omitted for i = 0? - { - if (m_windowStyle & wxRA_SPECIFY_ROWS) - { - y_offset = startY; - x_offset += maxWidth + cx1 ; - } - else - { - x_offset = startX ; - y_offset += maxHeight ; - if (m_radioWidth[0]>0) - y_offset += cy1/2 ; - } - } - int eachWidth ; - int eachHeight ; - if (m_radioWidth[i]<0) + int width, height; + if ( m_radioWidth[i] < 0 ) { - // It's a labeled item - textRadioButton = wxGetWindowText(m_radioButtons[i]); - GetTextExtent(textRadioButton, ¤t_width, &cyf, - NULL,NULL, & this->GetFont()); - - // How do we find out radio button bitmap size!! - // By adjusting them carefully, manually :-) - eachWidth = (int)(current_width + RADIO_SIZE); - eachHeight = (int)((3*cyf)/2); + GetTextExtent(wxGetWindowText((*m_radioButtons)[i]), &width, &height); + + // adjust the size to take into account the radio box itself + // FIXME this is totally bogus! + width += RADIO_SIZE; + height *= 3; + height /= 2; } else { - eachWidth = m_radioWidth[i] ; - eachHeight = m_radioHeight[i] ; + width = m_radioWidth[i]; + height = m_radioHeight[i]; } - MoveWindow((HWND) m_radioButtons[i],x_offset,y_offset,eachWidth,eachHeight,TRUE); - if (m_windowStyle & wxRA_SPECIFY_ROWS) - { - y_offset += maxHeight; - if (m_radioWidth[0]>0) - y_offset += cy1/2 ; - } - else - x_offset += maxWidth + cx1; + if ( widthMax < width ) + widthMax = width; + if ( heightMax < height ) + heightMax = height; } + + return wxSize(widthMax, heightMax); } -#endif -// Restored old code. -void wxRadioBox::DoSetSize(int x, int y, int width, int height, int sizeFlags) +wxSize wxRadioBox::GetTotalButtonSize(const wxSize& sizeBtn) const { - int currentX, currentY; - GetPosition(¤tX, ¤tY); - int xx = x; - int yy = y; - - if (x == -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE)) - xx = currentX; - if (y == -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE)) - yy = currentY; - - char buf[400]; - - int y_offset = yy; - int x_offset = xx; - int current_width, cyf; - - int cx1,cy1 ; - wxGetCharSize(m_hWnd, &cx1, &cy1, & GetFont()); - // Attempt to have a look coherent with other platforms: - // We compute the biggest toggle dim, then we align all - // items according this value. - int maxWidth = -1; - int maxHeight = -1 ; - - int i; - for (i = 0 ; i < m_noItems; i++) - { - int eachWidth; - int eachHeight ; - if (m_radioWidth[i]<0) - { - // It's a labelled toggle - GetWindowText((HWND) m_radioButtons[i], buf, 300); - GetTextExtent(buf, ¤t_width, &cyf,NULL,NULL, & GetFont()); - eachWidth = (int)(current_width + RADIO_SIZE); - eachHeight = (int)((3*cyf)/2); - } - else - { - eachWidth = m_radioWidth[i] ; - eachHeight = m_radioHeight[i] ; - } - if (maxWidth width ) + width = widthLabel; -#if (!CTL3D) - // Requires a bigger group box in plain Windows - MoveWindow((HWND) m_hWnd,x_offset,y_offset,totWidth+cx1,totHeight+(3*cy1)/2,TRUE) ; -#else - MoveWindow((HWND) m_hWnd,x_offset,y_offset,totWidth+cx1,totHeight+cy1,TRUE) ; -#endif - x_offset += cx1; - y_offset += cy1; - } - -#if (!CTL3D) - y_offset += (int)(cy1/2); // Fudge factor since buttons overlapped label - // JACS 2/12/93. CTL3D draws group label quite high. -#endif - int startX = x_offset ; - int startY = y_offset ; + return wxSize(width, height); +} - for ( i = 0 ; i < m_noItems; i++) - { - // Bidimensional radio adjustment - if (i&&((i%m_majorDim)==0)) // Why is this omitted for i = 0? - { - if (m_windowStyle & wxRA_VERTICAL) - { - y_offset = startY; - x_offset += maxWidth + cx1 ; - } - else - { - x_offset = startX ; - y_offset += maxHeight ; - if (m_radioWidth[0]>0) - y_offset += cy1/2 ; - } - } - int eachWidth ; - int eachHeight ; - if (m_radioWidth[i]<0) - { - // It's a labeled item - GetWindowText((HWND) m_radioButtons[i], buf, 300); - GetTextExtent(buf, ¤t_width, &cyf,NULL,NULL, & GetFont()); - - // How do we find out radio button bitmap size!! - // By adjusting them carefully, manually :-) - eachWidth = (int)(current_width + RADIO_SIZE); - eachHeight = (int)((3*cyf)/2); - } - else +wxSize wxRadioBox::DoGetBestSize() const +{ + if ( !m_radioButtons ) { - eachWidth = m_radioWidth[i] ; - eachHeight = m_radioHeight[i] ; + // if we're not fully initialized yet, we can't meaningfully compute + // our best size, we'll do it later + return wxSize(1, 1); } - MoveWindow((HWND) m_radioButtons[i],x_offset,y_offset,eachWidth,eachHeight,TRUE); - if (m_windowStyle & wxRA_SPECIFY_ROWS) - { - y_offset += maxHeight; - if (m_radioWidth[0]>0) - y_offset += cy1/2 ; - } - else - x_offset += maxWidth + cx1; - } + wxSize best = GetTotalButtonSize(GetMaxButtonSize()); + CacheBestSize(best); + return best; } - -void wxRadioBox::GetSize(int *width, int *height) const +// Restored old code. +void wxRadioBox::DoSetSize(int x, int y, int width, int height, int sizeFlags) { - RECT rect; - rect.left = -1; rect.right = -1; rect.top = -1; rect.bottom = -1; + int currentX, currentY; + GetPosition(¤tX, ¤tY); + int widthOld, heightOld; + GetSize(&widthOld, &heightOld); - if (m_hWnd) - wxFindMaxSize(m_hWnd, &rect); + int xx = x; + int yy = y; - int i; - for (i = 0; i < m_noItems; i++) - wxFindMaxSize(m_radioButtons[i], &rect); + if (x == wxDefaultCoord && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE)) + xx = currentX; + if (y == wxDefaultCoord && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE)) + yy = currentY; - *width = rect.right - rect.left; - *height = rect.bottom - rect.top; -} + int y_offset = yy; + int x_offset = xx; -void wxRadioBox::GetPosition(int *x, int *y) const -{ - wxWindow *parent = GetParent(); - RECT rect; - rect.left = -1; rect.right = -1; rect.top = -1; rect.bottom = -1; - - int i; - for (i = 0; i < m_noItems; i++) - wxFindMaxSize(m_radioButtons[i], &rect); - - if (m_hWnd) - wxFindMaxSize(m_hWnd, &rect); - - // Since we now have the absolute screen coords, - // if there's a parent we must subtract its top left corner - POINT point; - point.x = rect.left; - point.y = rect.top; - if (parent) - { - ::ScreenToClient((HWND) parent->GetHWND(), &point); - } - // We may be faking the client origin. - // So a window that's really at (0, 30) may appear - // (to wxWin apps) to be at (0, 0). - if (GetParent()) - { - wxPoint pt(GetParent()->GetClientAreaOrigin()); - point.x -= pt.x; - point.y -= pt.y; - } + int cx1, cy1; + wxGetCharSize(m_hWnd, &cx1, &cy1, GetFont()); - *x = point.x; - *y = point.y; -} + // Attempt to have a look coherent with other platforms: We compute the + // biggest toggle dim, then we align all items according this value. + wxSize maxSize = GetMaxButtonSize(); + int maxWidth = maxSize.x, + maxHeight = maxSize.y; -wxString wxRadioBox::GetLabel(void) const -{ - if (m_hWnd) + wxSize totSize = GetTotalButtonSize(maxSize); + int totWidth = totSize.x, + totHeight = totSize.y; + + // only change our width/height if asked for + if ( width == wxDefaultCoord ) { - GetWindowText((HWND) m_hWnd, wxBuffer, 300); - return wxString(wxBuffer); + if ( sizeFlags & wxSIZE_AUTO_WIDTH ) + width = totWidth; + else + width = widthOld; } - else return wxString(""); -} - -void wxRadioBox::SetLabel(const wxString& label) -{ - if (m_hWnd) - SetWindowText((HWND) m_hWnd, label); -} -void wxRadioBox::SetFocus(void) -{ - if (m_noItems > 0) + if ( height == wxDefaultCoord ) { - if (m_selectedButton == -1) - ::SetFocus((HWND) m_radioButtons[0]); + if ( sizeFlags & wxSIZE_AUTO_HEIGHT ) + height = totHeight; else - ::SetFocus((HWND) m_radioButtons[m_selectedButton]); + height = heightOld; } -} + DoMoveWindow(xx, yy, width, height); -bool wxRadioBox::Show(bool show) -{ - m_isShown = show; - int cshow; - if (show) - cshow = SW_SHOW; - else - cshow = SW_HIDE; - if (m_hWnd) - ShowWindow((HWND) m_hWnd, cshow); - int i; - for (i = 0; i < m_noItems; i++) - ShowWindow((HWND) m_radioButtons[i], cshow); - return TRUE; -} + // 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. -// Enable a specific button -void wxRadioBox::Enable(int item, bool enable) -{ - if (item<0) - wxWindow::Enable(enable) ; - else if (item < m_noItems) - ::EnableWindow((HWND) m_radioButtons[item], enable); -} + // Also, remember that wxRA_SPECIFY_COLS means that we arrange buttons in + // left to right order and GetMajorDim() is the number of columns while + // wxRA_SPECIFY_ROWS means that the buttons are arranged top to bottom and + // GetMajorDim() is the number of rows. -// Enable all controls -void wxRadioBox::Enable(bool enable) -{ - wxControl::Enable(enable); + x_offset += cx1; + y_offset += cy1; - int i; - for (i = 0; i < m_noItems; i++) - ::EnableWindow((HWND) m_radioButtons[i], enable); -} + // Add extra space under the label, if it exists. + if (!wxControl::GetLabel().empty()) + y_offset += cy1/2; -// Show a specific button -void wxRadioBox::Show(int item, bool show) -{ - if (item<0) - wxRadioBox::Show(show) ; - else if (item < m_noItems) + int startX = x_offset; + int startY = y_offset; + + const unsigned int count = GetCount(); + for (unsigned int i = 0; i < count; i++) { - int cshow; - if (show) - cshow = SW_SHOW; + // 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 isLastInTheRow; + 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 + unsigned int n = i + 1; + isLastInTheRow = ((n % GetMajorDim()) == 0) || (n == count); + } + else // wxRA_SPECIFY_ROWS + { + // item is the last in the row if it is in the last columns + isLastInTheRow = i >= (count/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 + y_offset = startY; + x_offset += maxWidth + cx1; + } + else // start of new row + { + x_offset = startX; + y_offset += maxHeight; + if (m_radioWidth[0]>0) + y_offset += cy1/2; + } + } + + int widthBtn; + if ( isLastInTheRow ) + { + // make the button go to the end of radio box + widthBtn = startX + width - x_offset - 2*cx1; + if ( widthBtn < maxWidth ) + widthBtn = maxWidth; + } else - cshow = SW_HIDE; - ShowWindow((HWND) m_radioButtons[item], cshow); + { + // normal button, always of the same size + widthBtn = maxWidth; + } + + // 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) + DoMoveSibling((*m_radioButtons)[i], x_offset, y_offset, widthBtn, maxHeight); + + // where do we put the next button? + if ( m_windowStyle & wxRA_SPECIFY_ROWS ) + { + // below this one + y_offset += maxHeight; + if (m_radioWidth[0]>0) + y_offset += cy1/2; + } + else + { + // to the right of this one + x_offset += widthBtn + cx1; + } } } -WXHBRUSH wxRadioBox::OnCtlColor(WXHDC pDC, WXHWND pWnd, WXUINT nCtlColor, - WXUINT message, WXWPARAM wParam, WXLPARAM lParam) +int wxRadioBox::GetItemFromPoint(const wxPoint& pt) const { -#if wxUSE_CTL3D - if ( m_useCtl3D ) + const unsigned int count = GetCount(); + for ( unsigned int i = 0; i < count; i++ ) { - HBRUSH hbrush = Ctl3dCtlColorEx(message, wParam, lParam); - return (WXHBRUSH) hbrush; - } -#endif + RECT rect = wxGetWindowRect((*m_radioButtons)[i]); - if (GetParent()->GetTransparentBackground()) - SetBkMode((HDC) pDC, TRANSPARENT); - else - SetBkMode((HDC) pDC, OPAQUE); + if ( rect.left <= pt.x && pt.x < rect.right && + rect.top <= pt.y && pt.y < rect.bottom ) + { + return i; + } + } - ::SetBkColor((HDC) pDC, RGB(GetBackgroundColour().Red(), GetBackgroundColour().Green(), GetBackgroundColour().Blue())); - ::SetTextColor((HDC) pDC, RGB(GetForegroundColour().Red(), GetForegroundColour().Green(), GetForegroundColour().Blue())); + return wxNOT_FOUND; +} - wxBrush *backgroundBrush = wxTheBrushList->FindOrCreateBrush(GetBackgroundColour(), wxSOLID); +// ---------------------------------------------------------------------------- +// radio box drawing +// ---------------------------------------------------------------------------- - // Note that this will be cleaned up in wxApp::OnIdle, if backgroundBrush - // has a zero usage count. - // backgroundBrush->RealizeResource(); - return (WXHBRUSH) backgroundBrush->GetResourceHandle(); -} +#ifndef __WXWINCE__ -// For single selection items only -wxString wxRadioBox::GetStringSelection (void) const +WXHRGN wxRadioBox::MSWGetRegionWithoutChildren() { - int sel = GetSelection (); - if (sel > -1) - return this->GetString (sel); - else - return wxString(""); -} + RECT rc; + ::GetWindowRect(GetHwnd(), &rc); + HRGN hrgn = ::CreateRectRgn(rc.left, rc.top, rc.right + 1, rc.bottom + 1); -bool wxRadioBox::SetStringSelection (const wxString& s) -{ - int sel = FindString (s); - if (sel > -1) + const unsigned int count = GetCount(); + for ( unsigned int i = 0; i < count; ++i ) { - SetSelection (sel); - return TRUE; + // don't clip out hidden children + if ( !IsItemShown(i) ) + continue; + + ::GetWindowRect((*m_radioButtons)[i], &rc); + AutoHRGN hrgnchild(::CreateRectRgnIndirect(&rc)); + ::CombineRgn(hrgn, hrgn, hrgnchild, RGN_DIFF); } - else - return FALSE; -} -bool wxRadioBox::ContainsHWND(WXHWND hWnd) const -{ - int i; - for (i = 0; i < Number(); i++) - if (GetRadioButtons()[i] == hWnd) - return TRUE; - return FALSE; + return (WXHRGN)hrgn; } -void wxRadioBox::Command (wxCommandEvent & event) -{ - SetSelection (event.m_commandInt); - ProcessCommand (event); -} +#endif // __WXWINCE__ + +// --------------------------------------------------------------------------- +// window proc for radio buttons +// --------------------------------------------------------------------------- -long wxRadioBox::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam) +LRESULT APIENTRY _EXPORT wxRadioBtnWndProc(HWND hwnd, + UINT message, + WPARAM wParam, + LPARAM lParam) { - if (nMsg == WM_NCHITTEST) + switch ( message ) { - int xPos = LOWORD(lParam); // horizontal position of cursor - int yPos = HIWORD(lParam); // vertical position of cursor + case WM_GETDLGCODE: + // we must tell IsDialogMessage()/our kbd processing code that we + // want to process arrows ourselves because neither of them is + // smart enough to handle arrows properly for us + { + long lDlgCode = ::CallWindowProc(CASTWNDPROC s_wndprocRadioBtn, hwnd, + message, wParam, lParam); + + return lDlgCode | DLGC_WANTARROWS; + } + + case WM_KEYDOWN: + { + wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd); + + wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") ); + + bool processed = true; + + wxDirection dir; + switch ( wParam ) + { + case VK_UP: + dir = wxUP; + break; + + case VK_LEFT: + dir = wxLEFT; + break; + + case VK_DOWN: + dir = wxDOWN; + break; + + case VK_RIGHT: + dir = wxRIGHT; + break; + + default: + processed = false; + + // just to suppress the compiler warning + dir = wxALL; + } + + if ( processed ) + { + int selOld = radiobox->GetSelection(); + int selNew = radiobox->GetNextItem + ( + selOld, + dir, + radiobox->GetWindowStyle() + ); + + if ( selNew != selOld ) + { + radiobox->SetSelection(selNew); + radiobox->SetFocus(); + + // emulate the button click + radiobox->SendNotificationEvent(); + + return 0; + } + } + } + break; - ScreenToClient(&xPos, &yPos); + case WM_SETFOCUS: + case WM_KILLFOCUS: + { + wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd); + + wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") ); + + // if we don't do this, no focus events are generated for the + // radiobox and, besides, we need to notify the parent about + // the focus change, otherwise the focus handling logic in + // wxControlContainer doesn't work + if ( message == WM_SETFOCUS ) + radiobox->HandleSetFocus((WXHWND)wParam); + else + radiobox->HandleKillFocus((WXHWND)wParam); + } + break; - // Make sure you can drag by the top of the groupbox, but let - // other (enclosed) controls get mouse events also - if (yPos < 10) - return (long)HTCLIENT; +#ifndef __WXWINCE__ + case WM_HELP: + { + wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd); + + wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") ); + + bool processed = false; + + wxEvtHandler * const handler = radiobox->GetEventHandler(); + + HELPINFO* info = (HELPINFO*) lParam; + if ( info->iContextType == HELPINFO_WINDOW ) + { + for ( wxWindow* subjectOfHelp = radiobox; + subjectOfHelp; + subjectOfHelp = subjectOfHelp->GetParent() ) + { + wxHelpEvent helpEvent(wxEVT_HELP, + subjectOfHelp->GetId(), + wxPoint(info->MousePos.x, + info->MousePos.y)); + helpEvent.SetEventObject(radiobox); + if ( handler->ProcessEvent(helpEvent) ) + { + processed = true; + break; + } + } + } + else if (info->iContextType == HELPINFO_MENUITEM) + { + wxHelpEvent helpEvent(wxEVT_HELP, info->iCtrlId); + helpEvent.SetEventObject(radiobox); + processed = handler->ProcessEvent(helpEvent); + } + + if ( processed ) + return 0; + } + break; +#endif // !__WXWINCE__ } - return wxControl::MSWWindowProc(nMsg, wParam, lParam); + return ::CallWindowProc(CASTWNDPROC s_wndprocRadioBtn, hwnd, message, wParam, lParam); } +#endif // wxUSE_RADIOBOX