src/msw/tglbtn.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/msw/tglbtn.cpp
   3 // Purpose:     Definition of the wxToggleButton class, which implements a
   4 //              toggle button under wxMSW.
   5 // Author:      John Norris, minor changes by Axel Schlueter
   6 // Modified by:
   7 // Created:     08.02.01
   8 // RCS-ID:      $Id$
   9 // Copyright:   (c) 2000 Johnny C. Norris II
  10 // License:     Rocketeer license
  11 /////////////////////////////////////////////////////////////////////////////
  12
  13 // ============================================================================
  14 // declatations
  15 // ============================================================================
  16
  17 // ----------------------------------------------------------------------------
  18 // headers
  19 // ----------------------------------------------------------------------------
  20
  21 #include "wx/wxprec.h"
  22
  23 #ifdef __BORLANDC__
  24     #pragma hdrstop
  25 #endif
  26
  27 #include "wx/tglbtn.h"
  28
  29 #if wxUSE_TOGGLEBTN
  30
  31 #ifndef WX_PRECOMP
  32     #include "wx/button.h"
  33     #include "wx/brush.h"
  34     #include "wx/dcscreen.h"
  35     #include "wx/settings.h"
  36
  37     #include "wx/log.h"
  38 #endif // WX_PRECOMP
  39
  40 #include "wx/msw/private.h"
  41
  42 // ----------------------------------------------------------------------------
  43 // macros
  44 // ----------------------------------------------------------------------------
  45
  46 IMPLEMENT_DYNAMIC_CLASS(wxToggleButton, wxControl)
  47 DEFINE_EVENT_TYPE(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED)
  48
  49 #define BUTTON_HEIGHT_FROM_CHAR_HEIGHT(cy) (11*EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy)/10)
  50
  51 // ============================================================================
  52 // implementation
  53 // ============================================================================
  54
  55 // ----------------------------------------------------------------------------
  56 // wxToggleButton
  57 // ----------------------------------------------------------------------------
  58
  59 bool wxToggleButton::MSWCommand(WXUINT WXUNUSED(param), WXWORD WXUNUSED(id))
  60 {
  61    wxCommandEvent event(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED, m_windowId);
  62    event.SetInt(GetValue());
  63    event.SetEventObject(this);
  64    ProcessCommand(event);
  65    return TRUE;
  66 }
  67
  68 // Single check box item
  69 bool wxToggleButton::Create(wxWindow *parent, wxWindowID id,
  70                             const wxString& label,
  71                             const wxPoint& pos,
  72                             const wxSize& size, long style,
  73                             const wxValidator& validator,
  74                             const wxString& name)
  75 {
  76    if (!CreateBase(parent, id, pos, size, style, validator, name))
  77       return FALSE;
  78
  79    parent->AddChild(this);
  80
  81    m_backgroundColour = parent->GetBackgroundColour();
  82    m_foregroundColour = parent->GetForegroundColour();
  83
  84 #ifndef BS_PUSHLIKE
  85 #define BS_PUSHLIKE 0x00001000L
  86 #endif
  87
  88    long msStyle = BS_AUTOCHECKBOX | BS_PUSHLIKE | WS_TABSTOP | WS_CHILD | WS_VISIBLE;
  89 #ifdef __WIN32__
  90    if(m_windowStyle & wxBU_LEFT)
  91       msStyle |= BS_LEFT;
  92    if(m_windowStyle & wxBU_RIGHT)
  93       msStyle |= BS_RIGHT;
  94    if(m_windowStyle & wxBU_TOP)
  95       msStyle |= BS_TOP;
  96    if(m_windowStyle & wxBU_BOTTOM)
  97       msStyle |= BS_BOTTOM;
  98 #endif
  99
 100    m_hWnd = (WXHWND)CreateWindowEx(MakeExtendedStyle(m_windowStyle),
 101                                    wxT("BUTTON"), label,
 102                                    msStyle, 0, 0, 0, 0,
 103                                    (HWND)parent->GetHWND(),
 104                                    (HMENU)m_windowId,
 105                                    wxGetInstance(), NULL);
 106
 107    if ( m_hWnd == 0 )
 108    {
 109         wxLogError(_T("Failed to create a toggle button"));
 110
 111         return FALSE;
 112     }
 113
 114     // Subclass again for purposes of dialog editing mode
 115     SubclassWin(m_hWnd);
 116
 117     SetFont(parent->GetFont());
 118
 119     SetSize(pos.x, pos.y, size.x, size.y);
 120
 121     return TRUE;
 122 }
 123
 124 void wxToggleButton::SetLabel(const wxString& label)
 125 {
 126     SetWindowText(GetHwnd(), label);
 127 }
 128
 129 wxSize wxToggleButton::DoGetBestSize() const
 130 {
 131    wxString label = wxGetWindowText(GetHWND());
 132    int wBtn;
 133    GetTextExtent(label, &wBtn, NULL);
 134
 135    int wChar, hChar;
 136    wxGetCharSize(GetHWND(), &wChar, &hChar, &GetFont());
 137
 138    // add a margin - the button is wider than just its label
 139    wBtn += 3*wChar;
 140
 141    // the button height is proportional to the height of the font used
 142    int hBtn = BUTTON_HEIGHT_FROM_CHAR_HEIGHT(hChar);
 143
 144    wxSize sz = wxButton::GetDefaultSize();
 145    if (wBtn > sz.x)
 146        sz.x = wBtn;
 147    if (hBtn > sz.y)
 148        sz.y = hBtn;
 149
 150    return sz;
 151 }
 152
 153 void wxToggleButton::SetValue(bool val)
 154 {
 155    SendMessage(GetHwnd(), BM_SETCHECK, val, 0);
 156 }
 157
 158 #ifndef BST_CHECKED
 159 #define BST_CHECKED 0x0001
 160 #endif
 161
 162 bool wxToggleButton::GetValue() const
 163 {
 164 #ifdef __WIN32__
 165    return (SendMessage(GetHwnd(), BM_GETCHECK, 0, 0) == BST_CHECKED);
 166 #else
 167    return ((0x001 & SendMessage(GetHwnd(), BM_GETCHECK, 0, 0)) == 0x001);
 168 #endif
 169 }
 170
 171 void wxToggleButton::Command(wxCommandEvent & event)
 172 {
 173    SetValue((event.GetInt() != 0));
 174    ProcessCommand(event);
 175 }
 176
 177 #endif // wxUSE_TOGGLEBTN
 178