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    long msStyle = BS_AUTOCHECKBOX | BS_PUSHLIKE | WS_TABSTOP | WS_CHILD | WS_VISIBLE;
  85 #ifdef __WIN32__
  86    if(m_windowStyle & wxBU_LEFT)
  87       msStyle |= BS_LEFT;
  88    if(m_windowStyle & wxBU_RIGHT)
  89       msStyle |= BS_RIGHT;
  90    if(m_windowStyle & wxBU_TOP)
  91       msStyle |= BS_TOP;
  92    if(m_windowStyle & wxBU_BOTTOM)
  93       msStyle |= BS_BOTTOM;
  94 #endif
  95
  96    m_hWnd = (WXHWND)CreateWindowEx(MakeExtendedStyle(m_windowStyle),
  97                                    wxT("BUTTON"), label,
  98                                    msStyle, 0, 0, 0, 0,
  99                                    (HWND)parent->GetHWND(),
 100                                    (HMENU)m_windowId,
 101                                    wxGetInstance(), NULL);
 102
 103    if ( m_hWnd == 0 )
 104    {
 105         wxLogError(_T("Failed to create a toggle button"));
 106
 107         return FALSE;
 108     }
 109
 110     // Subclass again for purposes of dialog editing mode
 111     SubclassWin(m_hWnd);
 112
 113     SetFont(parent->GetFont());
 114
 115     SetSize(pos.x, pos.y, size.x, size.y);
 116
 117     return TRUE;
 118 }
 119
 120 void wxToggleButton::SetLabel(const wxString& label)
 121 {
 122     SetWindowText(GetHwnd(), label);
 123 }
 124
 125 wxSize wxToggleButton::DoGetBestSize() const
 126 {
 127    wxString label = wxGetWindowText(GetHWND());
 128    int wBtn;
 129    GetTextExtent(label, &wBtn, NULL);
 130
 131    int wChar, hChar;
 132    wxGetCharSize(GetHWND(), &wChar, &hChar, &GetFont());
 133
 134    // add a margin - the button is wider than just its label
 135    wBtn += 3*wChar;
 136
 137    // the button height is proportional to the height of the font used
 138    int hBtn = BUTTON_HEIGHT_FROM_CHAR_HEIGHT(hChar);
 139
 140    wxSize sz = wxButton::GetDefaultSize();
 141    if (wBtn > sz.x)
 142        sz.x = wBtn;
 143    if (hBtn > sz.y)
 144        sz.y = hBtn;
 145
 146    return sz;
 147 }
 148
 149 void wxToggleButton::SetValue(bool val)
 150 {
 151    SendMessage(GetHwnd(), BM_SETCHECK, val, 0);
 152 }
 153
 154 #ifndef BST_CHECKED
 155 #define BST_CHECKED 0x0001
 156 #endif
 157
 158 bool wxToggleButton::GetValue() const
 159 {
 160 #ifdef __WIN32__
 161    return (SendMessage(GetHwnd(), BM_GETCHECK, 0, 0) == BST_CHECKED);
 162 #else
 163    return ((0x001 & SendMessage(GetHwnd(), BM_GETCHECK, 0, 0)) == 0x001);
 164 #endif
 165 }
 166
 167 void wxToggleButton::Command(wxCommandEvent & event)
 168 {
 169    SetValue((event.GetInt() != 0));
 170    ProcessCommand(event);
 171 }
 172
 173 #endif // wxUSE_TOGGLEBTN
 174