src/os2/radiobut.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        radiobut.cpp
   3 // Purpose:     wxRadioButton
   4 // Author:      David Webster
   5 // Modified by:
   6 // Created:     10/12/99
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) David Webster
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #ifdef __BORLANDC__
  16 #pragma hdrstop
  17 #endif
  18
  19 #ifndef WX_PRECOMP
  20 #include <stdio.h>
  21 #include "wx/setup.h"
  22 #include "wx/radiobut.h"
  23 #include "wx/brush.h"
  24 #include "wx/dcscreen.h"
  25 #include "wx/settings.h"
  26 #endif
  27
  28 #include "wx/os2/private.h"
  29
  30 IMPLEMENT_DYNAMIC_CLASS(wxRadioButton, wxControl)
  31
  32 extern void  wxAssociateWinWithHandle( HWND         hWnd
  33                                       ,wxWindowOS2* pWin
  34                                      );
  35
  36 void wxRadioButton::Init()
  37 {
  38     m_bFocusJustSet = FALSE;
  39 } // end of wxRadioButton::Init
  40
  41 void wxRadioButton::Command (
  42   wxCommandEvent&                   rEvent
  43 )
  44 {
  45     SetValue ((rEvent.GetInt() != 0) );
  46     ProcessCommand (rEvent);
  47 } // end of wxRadioButton::Command
  48
  49 bool wxRadioButton::Create(
  50   wxWindow*                         pParent
  51 , wxWindowID                        vId
  52 , const wxString&                   rsLabel
  53 , const wxPoint&                    rPos
  54 , const wxSize&                     rSize
  55 , long                              lStyle
  56 , const wxValidator&                rValidator
  57 , const wxString&                   rsName
  58 )
  59 {
  60     if ( !CreateControl( pParent
  61                         ,vId
  62                         ,rPos
  63                         ,rSize
  64                         ,lStyle
  65                         ,rValidator
  66                         ,rsName))
  67         return FALSE;
  68
  69     long                            lSstyle = WS_TABSTOP;
  70
  71     if (HasFlag(wxRB_GROUP))
  72         lSstyle |= WS_GROUP;
  73
  74     //
  75     // wxRB_SINGLE is a temporary workaround for the following problem: if you
  76     // have 2 radiobuttons in the same group but which are not consecutive in
  77     // the dialog, Windows can enter an infinite loop! The simplest way to
  78     // reproduce it is to create radio button, then a panel and then another
  79     // radio button: then checking the last button hangs the app.
  80     //
  81     // Ideally, we'd detect (and avoid) such situation automatically but for
  82     // now, as I don't know how to do it, just allow the user to create
  83     // BS_RADIOBUTTON buttons for such situations.
  84     //
  85     lSstyle |= HasFlag(wxRB_SINGLE) ? BS_RADIOBUTTON : BS_AUTORADIOBUTTON;
  86
  87     if (HasFlag(wxCLIP_SIBLINGS))
  88         lSstyle |= WS_CLIPSIBLINGS;
  89
  90     if (!OS2CreateControl( _T("BUTTON")
  91                           ,lSstyle
  92                           ,rPos
  93                           ,rSize
  94                           ,rsLabel
  95                           ,0
  96                          ))
  97         return FALSE;
  98
  99     wxAssociateWinWithHandle(m_hWnd, this);
 100     if (HasFlag(wxRB_GROUP))
 101         SetValue(TRUE);
 102
 103     SetFont(*wxSMALL_FONT);
 104     SetSize( rPos.x
 105             ,rPos.y
 106             ,rSize.x
 107             ,rSize.y
 108            );
 109     return TRUE;
 110 } // end of wxRadioButton::Create
 111
 112 wxSize wxRadioButton::DoGetBestSize() const
 113 {
 114     static int                      snRadioSize = 0;
 115
 116     if (!snRadioSize)
 117     {
 118         wxScreenDC                  vDC;
 119
 120         vDC.SetFont(wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
 121         snRadioSize = vDC.GetCharHeight();
 122     }
 123
 124     wxString                        sStr = GetLabel();
 125     int                             nRadioWidth;
 126     int                             nRadioHeight;
 127
 128     if (!sStr.empty())
 129     {
 130         GetTextExtent( sStr
 131                       ,&nRadioWidth
 132                       ,&nRadioHeight
 133                      );
 134         nRadioWidth += snRadioSize + GetCharWidth();
 135         if (nRadioHeight < snRadioSize)
 136             nRadioHeight = snRadioSize;
 137     }
 138     else
 139     {
 140         nRadioWidth  = snRadioSize;
 141         nRadioHeight = snRadioSize;
 142     }
 143     return wxSize( nRadioWidth
 144                   ,nRadioHeight
 145                  );
 146 } // end of wxRadioButton::DoGetBestSize
 147
 148 //
 149 // Get single selection, for single choice list items
 150 //
 151 bool wxRadioButton::GetValue() const
 152 {
 153     return((::WinSendMsg((HWND) GetHWND(), BM_QUERYCHECK, (MPARAM)0L, (MPARAM)0L) != 0));
 154 } // end of wxRadioButton::GetValue
 155
 156 bool wxRadioButton::OS2Command(
 157   WXUINT                            wParam
 158 , WXWORD                            wId
 159 )
 160 {
 161     if (wParam != BN_CLICKED)
 162         return FALSE;
 163
 164     if (m_bFocusJustSet)
 165     {
 166         //
 167         // See above: we want to ignore this event
 168         //
 169         m_bFocusJustSet = FALSE;
 170     }
 171     else
 172     {
 173         bool                        bIsChecked = GetValue();
 174
 175         if (HasFlag(wxRB_SINGLE))
 176         {
 177             //
 178             // When we use a "manual" radio button, we have to check the button
 179             // ourselves -- but it's reset to unchecked state by the user code
 180             // (presumably when another button is pressed)
 181             //
 182             if (!bIsChecked )
 183                 SetValue(TRUE);
 184         }
 185         wxCommandEvent              rEvent( wxEVT_COMMAND_RADIOBUTTON_SELECTED
 186                                            ,m_windowId
 187                                           );
 188
 189         rEvent.SetEventObject(this);
 190         ProcessCommand(rEvent);
 191     }
 192     return TRUE;
 193 } // end of wxRadioButton::OS2Command
 194
 195 void wxRadioButton::SetFocus()
 196 {
 197     // when the radio button receives a WM_SETFOCUS message it generates a
 198     // BN_CLICKED which is totally unexpected and leads to catastrophic results
 199     // if you pop up a dialog from the radio button event handler as, when the
 200     // dialog is dismissed, the focus is returned to the radio button which
 201     // generates BN_CLICKED which leads to showing another dialog and so on
 202     // without end!
 203     //
 204     // to aviod this, we drop the pseudo BN_CLICKED events generated when the
 205     // button gains focus
 206     m_bFocusJustSet = TRUE;
 207
 208     wxControl::SetFocus();
 209 }
 210
 211 void wxRadioButton::SetLabel(
 212   const wxString&                   rsLabel
 213 )
 214 {
 215     ::WinSetWindowText((HWND)GetHWND(), (const char *)rsLabel.c_str());
 216 } // end of wxRadioButton::SetLabel
 217
 218 void wxRadioButton::SetValue(
 219   bool                              bValue
 220 )
 221 {
 222     ::WinSendMsg((HWND)GetHWND(), BM_SETCHECK, (MPARAM)bValue, (MPARAM)0);
 223     if (bValue)
 224     {
 225         const wxWindowList&         rSiblings = GetParent()->GetChildren();
 226         wxWindowList::Node*         pNodeThis = rSiblings.Find(this);
 227
 228         wxCHECK_RET(pNodeThis, _T("radio button not a child of its parent?"));
 229
 230         //
 231         // If it's not the first item of the group ...
 232         //
 233         if ( !HasFlag(wxRB_GROUP) )
 234         {
 235             //
 236             // ...turn off all radio buttons before this one
 237             //
 238             for ( wxWindowList::Node* pNodeBefore = pNodeThis->GetPrevious();
 239                   pNodeBefore;
 240                   pNodeBefore = pNodeBefore->GetPrevious() )
 241             {
 242                 wxRadioButton*      pBtn = wxDynamicCast( pNodeBefore->GetData()
 243                                                          ,wxRadioButton
 244                                                         );
 245                 if (!pBtn)
 246                 {
 247                     //
 248                     // The radio buttons in a group must be consecutive, so there
 249                     // are no more of them
 250                     //
 251                     break;
 252                 }
 253                 pBtn->SetValue(FALSE);
 254                 if (pBtn->HasFlag(wxRB_GROUP))
 255                 {
 256                     //
 257                     // Even if there are other radio buttons before this one,
 258                     // they're not in the same group with us
 259                     //
 260                     break;
 261                 }
 262             }
 263         }
 264
 265         //
 266         // ... and all after this one
 267         //
 268         for (wxWindowList::Node* pNodeAfter = pNodeThis->GetNext();
 269              pNodeAfter;
 270              pNodeAfter = pNodeAfter->GetNext())
 271         {
 272             wxRadioButton*          pBtn = wxDynamicCast( pNodeAfter->GetData()
 273                                                          ,wxRadioButton
 274                                                         );
 275
 276             if (!pBtn || pBtn->HasFlag(wxRB_GROUP) )
 277             {
 278                 //
 279                 // No more buttons or the first button of the next group
 280                 //
 281                 break;
 282             }
 283             pBtn->SetValue(FALSE);
 284         }
 285     }
 286 } // end of wxRadioButton::SetValue
 287
 288 MRESULT wxRadioButton::OS2WindowProc(
 289   WXUINT                            uMsg
 290 , WXWPARAM                          wParam
 291 , WXLPARAM                          lParam
 292 )
 293 {
 294     if (uMsg == WM_SETFOCUS)
 295     {
 296         m_bFocusJustSet = TRUE;
 297
 298         MRESULT                     mRc = wxControl::OS2WindowProc( uMsg
 299                                                                    ,wParam
 300                                                                    ,lParam
 301                                                                   );
 302
 303         m_bFocusJustSet = FALSE;
 304         return mRc;
 305     }
 306     return wxControl::OS2WindowProc( uMsg
 307                                     ,wParam
 308                                     ,lParam
 309                                    );
 310 } // end of wxRadioButton::OS2WindowProc