src/msw/radiobox.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/msw/radiobox.cpp
   3 // Purpose:     wxRadioBox implementation
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ===========================================================================
  13 // declarations
  14 // ===========================================================================
  15
  16 // ---------------------------------------------------------------------------
  17 // headers
  18 // ---------------------------------------------------------------------------
  19
  20 // For compilers that support precompilation, includes "wx.h".
  21 #include "wx/wxprec.h"
  22
  23 #ifdef __BORLANDC__
  24     #pragma hdrstop
  25 #endif
  26
  27 #if wxUSE_RADIOBOX
  28
  29 #include "wx/radiobox.h"
  30
  31 #ifndef WX_PRECOMP
  32     #include "wx/bitmap.h"
  33     #include "wx/brush.h"
  34     #include "wx/settings.h"
  35     #include "wx/log.h"
  36 #endif
  37
  38 #include "wx/msw/subwin.h"
  39
  40 #if wxUSE_TOOLTIPS
  41     #include "wx/tooltip.h"
  42 #endif // wxUSE_TOOLTIPS
  43
  44 // TODO: wxCONSTRUCTOR
  45 #if 0 // wxUSE_EXTENDED_RTTI
  46 WX_DEFINE_FLAGS( wxRadioBoxStyle )
  47
  48 wxBEGIN_FLAGS( wxRadioBoxStyle )
  49     // new style border flags, we put them first to
  50     // use them for streaming out
  51     wxFLAGS_MEMBER(wxBORDER_SIMPLE)
  52     wxFLAGS_MEMBER(wxBORDER_SUNKEN)
  53     wxFLAGS_MEMBER(wxBORDER_DOUBLE)
  54     wxFLAGS_MEMBER(wxBORDER_RAISED)
  55     wxFLAGS_MEMBER(wxBORDER_STATIC)
  56     wxFLAGS_MEMBER(wxBORDER_NONE)
  57
  58     // old style border flags
  59     wxFLAGS_MEMBER(wxSIMPLE_BORDER)
  60     wxFLAGS_MEMBER(wxSUNKEN_BORDER)
  61     wxFLAGS_MEMBER(wxDOUBLE_BORDER)
  62     wxFLAGS_MEMBER(wxRAISED_BORDER)
  63     wxFLAGS_MEMBER(wxSTATIC_BORDER)
  64     wxFLAGS_MEMBER(wxBORDER)
  65
  66     // standard window styles
  67     wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
  68     wxFLAGS_MEMBER(wxCLIP_CHILDREN)
  69     wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
  70     wxFLAGS_MEMBER(wxWANTS_CHARS)
  71     wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE)
  72     wxFLAGS_MEMBER(wxALWAYS_SHOW_SB )
  73     wxFLAGS_MEMBER(wxVSCROLL)
  74     wxFLAGS_MEMBER(wxHSCROLL)
  75
  76     wxFLAGS_MEMBER(wxRA_SPECIFY_COLS)
  77     wxFLAGS_MEMBER(wxRA_HORIZONTAL)
  78     wxFLAGS_MEMBER(wxRA_SPECIFY_ROWS)
  79     wxFLAGS_MEMBER(wxRA_VERTICAL)
  80
  81 wxEND_FLAGS( wxRadioBoxStyle )
  82
  83 IMPLEMENT_DYNAMIC_CLASS_XTI(wxRadioBox, wxControl,"wx/radiobox.h")
  84
  85 wxBEGIN_PROPERTIES_TABLE(wxRadioBox)
  86     wxEVENT_PROPERTY( Select , wxEVT_COMMAND_RADIOBOX_SELECTED , wxCommandEvent )
  87     wxPROPERTY_FLAGS( WindowStyle , wxRadioBoxStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
  88 wxEND_PROPERTIES_TABLE()
  89
  90 #else
  91 IMPLEMENT_DYNAMIC_CLASS(wxRadioBox, wxControl)
  92 #endif
  93
  94 /*
  95     selection
  96     content
  97         label
  98         dimension
  99         item
 100 */
 101
 102 // ---------------------------------------------------------------------------
 103 // private functions
 104 // ---------------------------------------------------------------------------
 105
 106 // wnd proc for radio buttons
 107 LRESULT APIENTRY _EXPORT wxRadioBtnWndProc(HWND hWnd,
 108                                            UINT message,
 109                                            WPARAM wParam,
 110                                            LPARAM lParam);
 111
 112 // ---------------------------------------------------------------------------
 113 // global vars
 114 // ---------------------------------------------------------------------------
 115
 116 // the pointer to standard radio button wnd proc
 117 static WXFARPROC s_wndprocRadioBtn = (WXFARPROC)NULL;
 118
 119 // ===========================================================================
 120 // implementation
 121 // ===========================================================================
 122
 123 // ---------------------------------------------------------------------------
 124 // wxRadioBox creation
 125 // ---------------------------------------------------------------------------
 126
 127 // Radio box item
 128 void wxRadioBox::Init()
 129 {
 130     m_selectedButton = wxNOT_FOUND;
 131     m_radioButtons = NULL;
 132     m_radioWidth = NULL;
 133     m_radioHeight = NULL;
 134 }
 135
 136 bool wxRadioBox::Create(wxWindow *parent,
 137                         wxWindowID id,
 138                         const wxString& title,
 139                         const wxPoint& pos,
 140                         const wxSize& size,
 141                         int n,
 142                         const wxString choices[],
 143                         int majorDim,
 144                         long style,
 145                         const wxValidator& val,
 146                         const wxString& name)
 147 {
 148     // common initialization
 149     if ( !wxStaticBox::Create(parent, id, title, pos, size, style, name) )
 150         return false;
 151
 152 #if wxUSE_VALIDATORS
 153     SetValidator(val);
 154 #else
 155     wxUnusedVar(val);
 156 #endif // wxUSE_VALIDATORS/!wxUSE_VALIDATORS
 157
 158     m_radioButtons = new wxSubwindows(n);
 159     m_radioWidth = new int[n];
 160     m_radioHeight = new int[n];
 161
 162     for ( int i = 0; i < n; i++ )
 163     {
 164         m_radioWidth[i] =
 165         m_radioHeight[i] = wxDefaultCoord;
 166         long styleBtn = BS_AUTORADIOBUTTON | WS_TABSTOP | WS_CHILD | WS_VISIBLE;
 167         if ( i == 0 )
 168             styleBtn |= WS_GROUP;
 169
 170         long newId = NewControlId();
 171
 172         HWND hwndBtn = ::CreateWindow(_T("BUTTON"),
 173                                       choices[i],
 174                                       styleBtn,
 175                                       0, 0, 0, 0,   // will be set in SetSize()
 176                                       GetHwndOf(parent),
 177                                       (HMENU)newId,
 178                                       wxGetInstance(),
 179                                       NULL);
 180
 181         if ( !hwndBtn )
 182         {
 183             wxLogLastError(wxT("CreateWindow(radio btn)"));
 184
 185             return false;
 186         }
 187
 188         (*m_radioButtons)[i] = hwndBtn;
 189
 190         SubclassRadioButton((WXHWND)hwndBtn);
 191
 192         m_subControls.Add(newId);
 193     }
 194
 195     // Create a dummy radio control to end the group.
 196     (void)::CreateWindow(_T("BUTTON"),
 197                          wxEmptyString,
 198                          WS_GROUP | BS_AUTORADIOBUTTON | WS_CHILD,
 199                          0, 0, 0, 0, GetHwndOf(parent),
 200                          (HMENU)NewControlId(), wxGetInstance(), NULL);
 201
 202     m_radioButtons->SetFont(GetFont());
 203
 204 #ifdef __WXWINCE__
 205     // Set the z-order correctly
 206     SetWindowPos(GetHwnd(), HWND_BOTTOM, 0, 0, 0, 0, SWP_NOMOVE|SWP_NOSIZE);
 207 #endif
 208
 209     SetMajorDim(majorDim == 0 ? n : majorDim, style);
 210     SetSelection(0);
 211     SetSize(pos.x, pos.y, size.x, size.y);
 212
 213     // Now that we have items determine what is the best size and set it.
 214     SetBestSize(size);
 215
 216     return true;
 217 }
 218
 219 bool wxRadioBox::Create(wxWindow *parent,
 220                         wxWindowID id,
 221                         const wxString& title,
 222                         const wxPoint& pos,
 223                         const wxSize& size,
 224                         const wxArrayString& choices,
 225                         int majorDim,
 226                         long style,
 227                         const wxValidator& val,
 228                         const wxString& name)
 229 {
 230     wxCArrayString chs(choices);
 231     return Create(parent, id, title, pos, size, chs.GetCount(),
 232                   chs.GetStrings(), majorDim, style, val, name);
 233 }
 234
 235 wxRadioBox::~wxRadioBox()
 236 {
 237     m_isBeingDeleted = true;
 238
 239     delete m_radioButtons;
 240     delete[] m_radioWidth;
 241     delete[] m_radioHeight;
 242 }
 243
 244 // NB: if this code is changed, wxGetWindowForHWND() which relies on having the
 245 //     radiobox pointer in GWL_USERDATA for radio buttons must be updated too!
 246 void wxRadioBox::SubclassRadioButton(WXHWND hWndBtn)
 247 {
 248     HWND hwndBtn = (HWND)hWndBtn;
 249
 250     if ( !s_wndprocRadioBtn )
 251         s_wndprocRadioBtn = (WXFARPROC)wxGetWindowProc(hwndBtn);
 252
 253     wxSetWindowProc(hwndBtn, wxRadioBtnWndProc);
 254     wxSetWindowUserData(hwndBtn, this);
 255 }
 256
 257 // ----------------------------------------------------------------------------
 258 // events generation
 259 // ----------------------------------------------------------------------------
 260
 261 bool wxRadioBox::MSWCommand(WXUINT cmd, WXWORD id)
 262 {
 263     if ( cmd == BN_CLICKED )
 264     {
 265         if (id == GetId())
 266             return true;
 267
 268         int selectedButton = wxNOT_FOUND;
 269
 270         const unsigned int count = GetCount();
 271         for ( unsigned int i = 0; i < count; i++ )
 272         {
 273             if ( id == wxGetWindowId((*m_radioButtons)[i]) )
 274             {
 275                 selectedButton = i;
 276
 277                 break;
 278             }
 279         }
 280
 281         if ( selectedButton == wxNOT_FOUND )
 282         {
 283             // just ignore it - due to a hack with WM_NCHITTEST handling in our
 284             // wnd proc, we can receive dummy click messages when we click near
 285             // the radiobox edge (this is ugly but Julian wouldn't let me get
 286             // rid of this...)
 287             return false;
 288         }
 289
 290         if ( selectedButton != m_selectedButton )
 291         {
 292             m_selectedButton = selectedButton;
 293
 294             SendNotificationEvent();
 295         }
 296         //else: don't generate events when the selection doesn't change
 297
 298         return true;
 299     }
 300     else
 301         return false;
 302 }
 303
 304 void wxRadioBox::Command(wxCommandEvent & event)
 305 {
 306     SetSelection (event.GetInt());
 307     SetFocus();
 308     ProcessCommand(event);
 309 }
 310
 311 void wxRadioBox::SendNotificationEvent()
 312 {
 313     wxCommandEvent event(wxEVT_COMMAND_RADIOBOX_SELECTED, m_windowId);
 314     event.SetInt( m_selectedButton );
 315     event.SetString(GetString(m_selectedButton));
 316     event.SetEventObject( this );
 317     ProcessCommand(event);
 318 }
 319
 320 // ----------------------------------------------------------------------------
 321 // simple accessors
 322 // ----------------------------------------------------------------------------
 323
 324 unsigned int wxRadioBox::GetCount() const
 325 {
 326     return m_radioButtons->GetCount();
 327 }
 328
 329 void wxRadioBox::SetString(unsigned int item, const wxString& label)
 330 {
 331     wxCHECK_RET( IsValid(item), wxT("invalid radiobox index") );
 332
 333     m_radioWidth[item] =
 334     m_radioHeight[item] = wxDefaultCoord;
 335
 336     ::SetWindowText((*m_radioButtons)[item], label.c_str());
 337
 338     InvalidateBestSize();
 339 }
 340
 341 void wxRadioBox::SetSelection(int N)
 342 {
 343     wxCHECK_RET( IsValid(N), wxT("invalid radiobox index") );
 344
 345     // unselect the old button
 346     if ( m_selectedButton != wxNOT_FOUND )
 347         ::SendMessage((*m_radioButtons)[m_selectedButton], BM_SETCHECK, 0, 0L);
 348
 349     // and select the new one
 350     ::SendMessage((*m_radioButtons)[N], BM_SETCHECK, 1, 0L);
 351
 352     m_selectedButton = N;
 353 }
 354
 355 // Find string for position
 356 wxString wxRadioBox::GetString(unsigned int item) const
 357 {
 358     wxCHECK_MSG( IsValid(item), wxEmptyString,
 359                  wxT("invalid radiobox index") );
 360
 361     return wxGetWindowText((*m_radioButtons)[item]);
 362 }
 363
 364 void wxRadioBox::SetFocus()
 365 {
 366     if ( GetCount() > 0 )
 367     {
 368         ::SetFocus((*m_radioButtons)[m_selectedButton == wxNOT_FOUND
 369                                         ? 0
 370                                         : m_selectedButton]);
 371     }
 372 }
 373
 374 // Enable a specific button
 375 bool wxRadioBox::Enable(unsigned int item, bool enable)
 376 {
 377     wxCHECK_MSG( IsValid(item), false,
 378                  wxT("invalid item in wxRadioBox::Enable()") );
 379
 380     BOOL ret = ::EnableWindow((*m_radioButtons)[item], enable);
 381
 382     return (ret == 0) != enable;
 383 }
 384
 385 bool wxRadioBox::IsItemEnabled(unsigned int item) const
 386 {
 387     wxCHECK_MSG( IsValid(item), false,
 388                  wxT("invalid item in wxRadioBox::IsItemEnabled()") );
 389
 390     return ::IsWindowEnabled((*m_radioButtons)[item]) != 0;
 391 }
 392
 393 // Show a specific button
 394 bool wxRadioBox::Show(unsigned int item, bool show)
 395 {
 396     wxCHECK_MSG( IsValid(item), false,
 397                  wxT("invalid item in wxRadioBox::Show()") );
 398
 399     BOOL ret = ::ShowWindow((*m_radioButtons)[item], show ? SW_SHOW : SW_HIDE);
 400
 401     bool changed = (ret != 0) != show;
 402     if ( changed )
 403     {
 404         InvalidateBestSize();
 405     }
 406
 407     return changed;
 408 }
 409
 410 bool wxRadioBox::IsItemShown(unsigned int item) const
 411 {
 412     wxCHECK_MSG( IsValid(item), false,
 413                  wxT("invalid item in wxRadioBox::IsItemShown()") );
 414
 415     // don't use IsWindowVisible() here because it would return false if the
 416     // radiobox itself is hidden while we want to only return false if this
 417     // button specifically is hidden
 418     return (::GetWindowLong((*m_radioButtons)[item],
 419                             GWL_STYLE) & WS_VISIBLE) != 0;
 420 }
 421
 422 #if wxUSE_TOOLTIPS
 423
 424 bool wxRadioBox::HasToolTips() const
 425 {
 426     return wxStaticBox::HasToolTips() || wxRadioBoxBase::HasItemToolTips();
 427 }
 428
 429 void wxRadioBox::DoSetItemToolTip(unsigned int item, wxToolTip *tooltip)
 430 {
 431     // we have already checked for the item to be valid in wxRadioBoxBase
 432     const HWND hwndRbtn = (*m_radioButtons)[item];
 433     if ( tooltip != NULL )
 434         tooltip->Add(hwndRbtn);
 435     else // unset the tooltip
 436         wxToolTip::Remove(hwndRbtn);
 437 }
 438
 439 #endif // wxUSE_TOOLTIPS
 440
 441 WX_FORWARD_STD_METHODS_TO_SUBWINDOWS(wxRadioBox, wxStaticBox, m_radioButtons)
 442
 443 // ----------------------------------------------------------------------------
 444 // size calculations
 445 // ----------------------------------------------------------------------------
 446
 447 wxSize wxRadioBox::GetMaxButtonSize() const
 448 {
 449     // calculate the max button size
 450     int widthMax = 0,
 451         heightMax = 0;
 452     const unsigned int count = GetCount();
 453     for ( unsigned int i = 0 ; i < count; i++ )
 454     {
 455         int width, height;
 456         if ( m_radioWidth[i] < 0 )
 457         {
 458             GetTextExtent(wxGetWindowText((*m_radioButtons)[i]), &width, &height);
 459
 460             // adjust the size to take into account the radio box itself
 461             // FIXME this is totally bogus!
 462             width += RADIO_SIZE;
 463             height *= 3;
 464             height /= 2;
 465         }
 466         else
 467         {
 468             width = m_radioWidth[i];
 469             height = m_radioHeight[i];
 470         }
 471
 472         if ( widthMax < width )
 473             widthMax = width;
 474         if ( heightMax < height )
 475             heightMax = height;
 476     }
 477
 478     return wxSize(widthMax, heightMax);
 479 }
 480
 481 wxSize wxRadioBox::GetTotalButtonSize(const wxSize& sizeBtn) const
 482 {
 483     // the radiobox should be big enough for its buttons
 484     int cx1, cy1;
 485     wxGetCharSize(m_hWnd, &cx1, &cy1, GetFont());
 486
 487     int extraHeight = cy1;
 488
 489     int height = GetRowCount() * sizeBtn.y + cy1/2 + extraHeight;
 490     int width  = GetColumnCount() * (sizeBtn.x + cx1) + cx1;
 491
 492     // Add extra space under the label, if it exists.
 493     if (!wxControl::GetLabel().empty())
 494         height += cy1/2;
 495
 496     // and also wide enough for its label
 497     int widthLabel;
 498     GetTextExtent(wxStripMenuCodes(GetLabel()), &widthLabel, NULL);
 499     widthLabel += RADIO_SIZE; // FIXME this is bogus too
 500     if ( widthLabel > width )
 501         width = widthLabel;
 502
 503     return wxSize(width, height);
 504 }
 505
 506 wxSize wxRadioBox::DoGetBestSize() const
 507 {
 508     wxSize best = GetTotalButtonSize(GetMaxButtonSize());
 509     CacheBestSize(best);
 510     return best;
 511 }
 512
 513 // Restored old code.
 514 void wxRadioBox::DoSetSize(int x, int y, int width, int height, int sizeFlags)
 515 {
 516     int currentX, currentY;
 517     GetPosition(&currentX, &currentY);
 518     int widthOld, heightOld;
 519     GetSize(&widthOld, &heightOld);
 520
 521     int xx = x;
 522     int yy = y;
 523
 524     if (x == wxDefaultCoord && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
 525         xx = currentX;
 526     if (y == wxDefaultCoord && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
 527         yy = currentY;
 528
 529     int y_offset = yy;
 530     int x_offset = xx;
 531
 532     int cx1, cy1;
 533     wxGetCharSize(m_hWnd, &cx1, &cy1, GetFont());
 534
 535     // Attempt to have a look coherent with other platforms: We compute the
 536     // biggest toggle dim, then we align all items according this value.
 537     wxSize maxSize = GetMaxButtonSize();
 538     int maxWidth = maxSize.x,
 539         maxHeight = maxSize.y;
 540
 541     wxSize totSize = GetTotalButtonSize(maxSize);
 542     int totWidth = totSize.x,
 543         totHeight = totSize.y;
 544
 545     // only change our width/height if asked for
 546     if ( width == wxDefaultCoord )
 547     {
 548         if ( sizeFlags & wxSIZE_AUTO_WIDTH )
 549             width = totWidth;
 550         else
 551             width = widthOld;
 552     }
 553
 554     if ( height == wxDefaultCoord )
 555     {
 556         if ( sizeFlags & wxSIZE_AUTO_HEIGHT )
 557             height = totHeight;
 558         else
 559             height = heightOld;
 560     }
 561
 562     DoMoveWindow(xx, yy, width, height);
 563
 564     // Now position all the buttons: the current button will be put at
 565     // wxPoint(x_offset, y_offset) and the new row/column will start at
 566     // startX/startY. The size of all buttons will be the same wxSize(maxWidth,
 567     // maxHeight) except for the buttons in the last column which should extend
 568     // to the right border of radiobox and thus can be wider than this.
 569
 570     // Also, remember that wxRA_SPECIFY_COLS means that we arrange buttons in
 571     // left to right order and GetMajorDim() is the number of columns while
 572     // wxRA_SPECIFY_ROWS means that the buttons are arranged top to bottom and
 573     // GetMajorDim() is the number of rows.
 574
 575     x_offset += cx1;
 576     y_offset += cy1;
 577
 578     // Add extra space under the label, if it exists.
 579     if (!wxControl::GetLabel().empty())
 580         y_offset += cy1/2;
 581
 582     int startX = x_offset;
 583     int startY = y_offset;
 584
 585     const unsigned int count = GetCount();
 586     for (unsigned int i = 0; i < count; i++)
 587     {
 588         // the last button in the row may be wider than the other ones as the
 589         // radiobox may be wider than the sum of the button widths (as it
 590         // happens, for example, when the radiobox label is very long)
 591         bool isLastInTheRow;
 592         if ( m_windowStyle & wxRA_SPECIFY_COLS )
 593         {
 594             // item is the last in its row if it is a multiple of the number of
 595             // columns or if it is just the last item
 596             unsigned int n = i + 1;
 597             isLastInTheRow = ((n % GetMajorDim()) == 0) || (n == count);
 598         }
 599         else // wxRA_SPECIFY_ROWS
 600         {
 601             // item is the last in the row if it is in the last columns
 602             isLastInTheRow = i >= (count/GetMajorDim())*GetMajorDim();
 603         }
 604
 605         // is this the start of new row/column?
 606         if ( i && (i % GetMajorDim() == 0) )
 607         {
 608             if ( m_windowStyle & wxRA_SPECIFY_ROWS )
 609             {
 610                 // start of new column
 611                 y_offset = startY;
 612                 x_offset += maxWidth + cx1;
 613             }
 614             else // start of new row
 615             {
 616                 x_offset = startX;
 617                 y_offset += maxHeight;
 618                 if (m_radioWidth[0]>0)
 619                     y_offset += cy1/2;
 620             }
 621         }
 622
 623         int widthBtn;
 624         if ( isLastInTheRow )
 625         {
 626             // make the button go to the end of radio box
 627             widthBtn = startX + width - x_offset - 2*cx1;
 628             if ( widthBtn < maxWidth )
 629                 widthBtn = maxWidth;
 630         }
 631         else
 632         {
 633             // normal button, always of the same size
 634             widthBtn = maxWidth;
 635         }
 636
 637         // make all buttons of the same, maximal size - like this they cover
 638         // the radiobox entirely and the radiobox tooltips are always shown
 639         // (otherwise they are not when the mouse pointer is in the radiobox
 640         // part not belonging to any radiobutton)
 641         DoMoveSibling((*m_radioButtons)[i], x_offset, y_offset, widthBtn, maxHeight);
 642
 643         // where do we put the next button?
 644         if ( m_windowStyle & wxRA_SPECIFY_ROWS )
 645         {
 646             // below this one
 647             y_offset += maxHeight;
 648             if (m_radioWidth[0]>0)
 649                 y_offset += cy1/2;
 650         }
 651         else
 652         {
 653             // to the right of this one
 654             x_offset += widthBtn + cx1;
 655         }
 656     }
 657 }
 658
 659 // ----------------------------------------------------------------------------
 660 // radio box drawing
 661 // ----------------------------------------------------------------------------
 662
 663 #ifndef __WXWINCE__
 664
 665 WXHRGN wxRadioBox::MSWGetRegionWithoutChildren()
 666 {
 667     RECT rc;
 668     ::GetWindowRect(GetHwnd(), &rc);
 669     HRGN hrgn = ::CreateRectRgn(rc.left, rc.top, rc.right + 1, rc.bottom + 1);
 670
 671     const unsigned int count = GetCount();
 672     for ( unsigned int i = 0; i < count; ++i )
 673     {
 674         // don't clip out hidden children
 675         if ( !IsItemShown(i) )
 676             continue;
 677
 678         ::GetWindowRect((*m_radioButtons)[i], &rc);
 679         AutoHRGN hrgnchild(::CreateRectRgnIndirect(&rc));
 680         ::CombineRgn(hrgn, hrgn, hrgnchild, RGN_DIFF);
 681     }
 682
 683     return (WXHRGN)hrgn;
 684 }
 685
 686 #endif // __WXWINCE__
 687
 688 // ---------------------------------------------------------------------------
 689 // window proc for radio buttons
 690 // ---------------------------------------------------------------------------
 691
 692 LRESULT APIENTRY _EXPORT wxRadioBtnWndProc(HWND hwnd,
 693                                            UINT message,
 694                                            WPARAM wParam,
 695                                            LPARAM lParam)
 696 {
 697     switch ( message )
 698     {
 699         case WM_GETDLGCODE:
 700             // we must tell IsDialogMessage()/our kbd processing code that we
 701             // want to process arrows ourselves because neither of them is
 702             // smart enough to handle arrows properly for us
 703             {
 704                 long lDlgCode = ::CallWindowProc(CASTWNDPROC s_wndprocRadioBtn, hwnd,
 705                                                  message, wParam, lParam);
 706
 707                 return lDlgCode | DLGC_WANTARROWS;
 708             }
 709
 710         case WM_KEYDOWN:
 711             {
 712                 wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd);
 713
 714                 wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") );
 715
 716                 bool processed = true;
 717
 718                 wxDirection dir;
 719                 switch ( wParam )
 720                 {
 721                     case VK_UP:
 722                         dir = wxUP;
 723                         break;
 724
 725                     case VK_LEFT:
 726                         dir = wxLEFT;
 727                         break;
 728
 729                     case VK_DOWN:
 730                         dir = wxDOWN;
 731                         break;
 732
 733                     case VK_RIGHT:
 734                         dir = wxRIGHT;
 735                         break;
 736
 737                     default:
 738                         processed = false;
 739
 740                         // just to suppress the compiler warning
 741                         dir = wxALL;
 742                 }
 743
 744                 if ( processed )
 745                 {
 746                     int selOld = radiobox->GetSelection();
 747                     int selNew = radiobox->GetNextItem
 748                                  (
 749                                   selOld,
 750                                   dir,
 751                                   radiobox->GetWindowStyle()
 752                                  );
 753
 754                     if ( selNew != selOld )
 755                     {
 756                         radiobox->SetSelection(selNew);
 757                         radiobox->SetFocus();
 758
 759                         // emulate the button click
 760                         radiobox->SendNotificationEvent();
 761
 762                         return 0;
 763                     }
 764                 }
 765             }
 766             break;
 767
 768         case WM_SETFOCUS:
 769         case WM_KILLFOCUS:
 770             {
 771                 wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd);
 772
 773                 wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") );
 774
 775                 // if we don't do this, no focus events are generated for the
 776                 // radiobox and, besides, we need to notify the parent about
 777                 // the focus change, otherwise the focus handling logic in
 778                 // wxControlContainer doesn't work
 779                 if ( message == WM_SETFOCUS )
 780                     radiobox->HandleSetFocus((WXHWND)wParam);
 781                 else
 782                     radiobox->HandleKillFocus((WXHWND)wParam);
 783             }
 784             break;
 785
 786 #ifndef __WXWINCE__
 787         case WM_HELP:
 788             {
 789                 wxRadioBox *radiobox = (wxRadioBox *)wxGetWindowUserData(hwnd);
 790
 791                 wxCHECK_MSG( radiobox, 0, wxT("radio button without radio box?") );
 792
 793                 bool processed = false;
 794
 795                 wxEvtHandler * const handler = radiobox->GetEventHandler();
 796
 797                 HELPINFO* info = (HELPINFO*) lParam;
 798                 if ( info->iContextType == HELPINFO_WINDOW )
 799                 {
 800                     for ( wxWindow* subjectOfHelp = radiobox;
 801                           subjectOfHelp;
 802                           subjectOfHelp = subjectOfHelp->GetParent() )
 803                     {
 804                         wxHelpEvent helpEvent(wxEVT_HELP,
 805                                               subjectOfHelp->GetId(),
 806                                               wxPoint(info->MousePos.x,
 807                                                       info->MousePos.y));
 808                         helpEvent.SetEventObject(radiobox);
 809                         if ( handler->ProcessEvent(helpEvent) )
 810                         {
 811                             processed = true;
 812                             break;
 813                         }
 814                     }
 815                 }
 816                 else if (info->iContextType == HELPINFO_MENUITEM)
 817                 {
 818                     wxHelpEvent helpEvent(wxEVT_HELP, info->iCtrlId);
 819                     helpEvent.SetEventObject(radiobox);
 820                     processed = handler->ProcessEvent(helpEvent);
 821                 }
 822
 823                 if ( processed )
 824                     return 0;
 825             }
 826             break;
 827 #endif // !__WXWINCE__
 828     }
 829
 830     return ::CallWindowProc(CASTWNDPROC s_wndprocRadioBtn, hwnd, message, wParam, lParam);
 831 }
 832
 833 #endif // wxUSE_RADIOBOX