src/msw/radiobox.cpp

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