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     // We should probably compute snRadioSize but it seems to be a constant
 115     // independent of its label's font size and not made available by OS/2.
 116     static int                      snRadioSize = RADIO_SIZE;
 117
 118     wxString                        sStr = wxGetWindowText(GetHwnd());
 119     int                             nRadioWidth;
 120     int                             nRadioHeight;
 121
 122     if (!sStr.empty())
 123     {
 124         GetTextExtent( sStr
 125                       ,&nRadioWidth
 126                       ,&nRadioHeight
 127                      );
 128         nRadioWidth += snRadioSize;
 129         if (nRadioHeight < snRadioSize)
 130             nRadioHeight = snRadioSize;
 131     }
 132     else
 133     {
 134         nRadioWidth  = snRadioSize;
 135         nRadioHeight = snRadioSize;
 136     }
 137     return wxSize( nRadioWidth
 138                   ,nRadioHeight
 139                  );
 140 } // end of wxRadioButton::DoGetBestSize
 141
 142 //
 143 // Get single selection, for single choice list items
 144 //
 145 bool wxRadioButton::GetValue() const
 146 {
 147     return((::WinSendMsg((HWND) GetHWND(), BM_QUERYCHECK, (MPARAM)0L, (MPARAM)0L) != 0));
 148 } // end of wxRadioButton::GetValue
 149
 150 bool wxRadioButton::OS2Command( WXUINT wParam, WXWORD WXUNUSED(wId) )
 151 {
 152     if (wParam != BN_CLICKED)
 153         return false;
 154
 155     if (m_bFocusJustSet)
 156     {
 157         //
 158         // See above: we want to ignore this event
 159         //
 160         m_bFocusJustSet = false;
 161     }
 162     else
 163     {
 164         bool bIsChecked = GetValue();
 165
 166         if (HasFlag(wxRB_SINGLE))
 167         {
 168             //
 169             // When we use a "manual" radio button, we have to check the button
 170             // ourselves -- but it's reset to unchecked state by the user code
 171             // (presumably when another button is pressed)
 172             //
 173             if (!bIsChecked )
 174                 SetValue(TRUE);
 175         }
 176         wxCommandEvent rEvent( wxEVT_COMMAND_RADIOBUTTON_SELECTED, m_windowId );
 177         rEvent.SetEventObject(this);
 178         ProcessCommand(rEvent);
 179     }
 180     return true;
 181 } // end of wxRadioButton::OS2Command
 182
 183 void wxRadioButton::SetFocus()
 184 {
 185     // when the radio button receives a WM_SETFOCUS message it generates a
 186     // BN_CLICKED which is totally unexpected and leads to catastrophic results
 187     // if you pop up a dialog from the radio button event handler as, when the
 188     // dialog is dismissed, the focus is returned to the radio button which
 189     // generates BN_CLICKED which leads to showing another dialog and so on
 190     // without end!
 191     //
 192     // to avoid this, we drop the pseudo BN_CLICKED events generated when the
 193     // button gains focus
 194     m_bFocusJustSet = true;
 195
 196     wxControl::SetFocus();
 197 }
 198
 199 void wxRadioButton::SetLabel(
 200   const wxString&                   rsLabel
 201 )
 202 {
 203     wxString                        sLabel = ::wxPMTextToLabel(rsLabel);
 204     ::WinSetWindowText((HWND)GetHWND(), (const char *)sLabel.c_str());
 205 } // end of wxRadioButton::SetLabel
 206
 207 void wxRadioButton::SetValue(
 208   bool                              bValue
 209 )
 210 {
 211     ::WinSendMsg((HWND)GetHWND(), BM_SETCHECK, (MPARAM)bValue, (MPARAM)0);
 212     if (bValue)
 213     {
 214         const wxWindowList&         rSiblings = GetParent()->GetChildren();
 215         wxWindowList::compatibility_iterator nodeThis = rSiblings.Find(this);
 216
 217         wxCHECK_RET(nodeThis, _T("radio button not a child of its parent?"));
 218
 219         //
 220         // If it's not the first item of the group ...
 221         //
 222         if ( !HasFlag(wxRB_GROUP) )
 223         {
 224             //
 225             // ...turn off all radio buttons before this one
 226             //
 227             for ( wxWindowList::compatibility_iterator nodeBefore = nodeThis->GetPrevious();
 228                   nodeBefore;
 229                   nodeBefore = nodeBefore->GetPrevious() )
 230             {
 231                 wxRadioButton*      pBtn = wxDynamicCast( nodeBefore->GetData()
 232                                                          ,wxRadioButton
 233                                                         );
 234                 if (!pBtn)
 235                 {
 236                     //
 237                     // The radio buttons in a group must be consecutive, so there
 238                     // are no more of them
 239                     //
 240                     break;
 241                 }
 242                 pBtn->SetValue(FALSE);
 243                 if (pBtn->HasFlag(wxRB_GROUP))
 244                 {
 245                     //
 246                     // Even if there are other radio buttons before this one,
 247                     // they're not in the same group with us
 248                     //
 249                     break;
 250                 }
 251             }
 252         }
 253
 254         //
 255         // ... and all after this one
 256         //
 257         for (wxWindowList::compatibility_iterator nodeAfter = nodeThis->GetNext();
 258              nodeAfter;
 259              nodeAfter = nodeAfter->GetNext())
 260         {
 261             wxRadioButton*          pBtn = wxDynamicCast( nodeAfter->GetData()
 262                                                          ,wxRadioButton
 263                                                         );
 264
 265             if (!pBtn || pBtn->HasFlag(wxRB_GROUP) )
 266             {
 267                 //
 268                 // No more buttons or the first button of the next group
 269                 //
 270                 break;
 271             }
 272             pBtn->SetValue(FALSE);
 273         }
 274     }
 275 } // end of wxRadioButton::SetValue
 276
 277 MRESULT wxRadioButton::OS2WindowProc(
 278   WXUINT                            uMsg
 279 , WXWPARAM                          wParam
 280 , WXLPARAM                          lParam
 281 )
 282 {
 283     if (uMsg == WM_SETFOCUS)
 284     {
 285         m_bFocusJustSet = TRUE;
 286
 287         MRESULT                     mRc = wxControl::OS2WindowProc( uMsg
 288                                                                    ,wParam
 289                                                                    ,lParam
 290                                                                   );
 291
 292         m_bFocusJustSet = FALSE;
 293         return mRc;
 294     }
 295     return wxControl::OS2WindowProc( uMsg
 296                                     ,wParam
 297                                     ,lParam
 298                                    );
 299 } // end of wxRadioButton::OS2WindowProc