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 //              and William Gallafent.
   7 // Modified by:
   8 // Created:     08.02.01
   9 // RCS-ID:      $Id$
  10 // Copyright:   (c) 2000 Johnny C. Norris II
  11 // License:     wxWindows licence
  12 /////////////////////////////////////////////////////////////////////////////
  13
  14 // ============================================================================
  15 // declarations
  16 // ============================================================================
  17
  18 // ----------------------------------------------------------------------------
  19 // headers
  20 // ----------------------------------------------------------------------------
  21
  22 #include "wx/wxprec.h"
  23
  24 #ifdef __BORLANDC__
  25     #pragma hdrstop
  26 #endif
  27
  28 #if wxUSE_TOGGLEBTN
  29
  30 #include "wx/tglbtn.h"
  31
  32 #ifndef WX_PRECOMP
  33     #include "wx/button.h"
  34     #include "wx/brush.h"
  35     #include "wx/dcscreen.h"
  36     #include "wx/settings.h"
  37
  38     #include "wx/log.h"
  39 #endif // WX_PRECOMP
  40
  41 #include "wx/msw/private.h"
  42
  43 // ----------------------------------------------------------------------------
  44 // macros
  45 // ----------------------------------------------------------------------------
  46
  47 IMPLEMENT_DYNAMIC_CLASS(wxToggleButton, wxControl)
  48 DEFINE_EVENT_TYPE(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED)
  49
  50 #define BUTTON_HEIGHT_FROM_CHAR_HEIGHT(cy) (11*EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy)/10)
  51
  52 // ============================================================================
  53 // implementation
  54 // ============================================================================
  55
  56 // ----------------------------------------------------------------------------
  57 // wxToggleButton
  58 // ----------------------------------------------------------------------------
  59
  60 bool wxToggleButton::MSWCommand(WXUINT WXUNUSED(param), WXWORD WXUNUSED(id))
  61 {
  62    wxCommandEvent event(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED, m_windowId);
  63    event.SetInt(GetValue());
  64    event.SetEventObject(this);
  65    ProcessCommand(event);
  66    return true;
  67 }
  68
  69 // Single check box item
  70 bool wxToggleButton::Create(wxWindow *parent, wxWindowID id,
  71                             const wxString& label,
  72                             const wxPoint& pos,
  73                             const wxSize& size, long style,
  74                             const wxValidator& validator,
  75                             const wxString& name)
  76 {
  77     if ( !CreateControl(parent, id, pos, size, style, validator, name) )
  78         return false;
  79
  80     if ( !MSWCreateControl(wxT("BUTTON"), label, pos, size) )
  81       return false;
  82
  83     return true;
  84 }
  85
  86 WXDWORD wxToggleButton::MSWGetStyle(long style, WXDWORD *exstyle) const
  87 {
  88     WXDWORD msStyle = wxControl::MSWGetStyle(style, exstyle);
  89
  90 #ifndef BS_PUSHLIKE
  91 #define BS_PUSHLIKE 0x00001000L
  92 #endif
  93
  94     msStyle |= BS_AUTOCHECKBOX | BS_PUSHLIKE | WS_TABSTOP;
  95
  96     if(style & wxBU_LEFT)
  97       msStyle |= BS_LEFT;
  98     if(style & wxBU_RIGHT)
  99       msStyle |= BS_RIGHT;
 100     if(style & wxBU_TOP)
 101       msStyle |= BS_TOP;
 102     if(style & wxBU_BOTTOM)
 103       msStyle |= BS_BOTTOM;
 104
 105     return msStyle;
 106 }
 107
 108 wxSize wxToggleButton::DoGetBestSize() const
 109 {
 110    wxString label = wxGetWindowText(GetHWND());
 111    int wBtn;
 112    GetTextExtent(GetLabelText(label), &wBtn, NULL);
 113
 114    int wChar, hChar;
 115    wxGetCharSize(GetHWND(), &wChar, &hChar, GetFont());
 116
 117    // add a margin - the button is wider than just its label
 118    wBtn += 3*wChar;
 119
 120    // the button height is proportional to the height of the font used
 121    int hBtn = BUTTON_HEIGHT_FROM_CHAR_HEIGHT(hChar);
 122
 123 #if wxUSE_BUTTON
 124    // make all buttons of at least standard size unless wxBU_EXACTFIT is given
 125    if ( !HasFlag(wxBU_EXACTFIT) )
 126    {
 127        const wxSize szMin = wxButton::GetDefaultSize();
 128        if ( wBtn < szMin.x )
 129            wBtn = szMin.x;
 130        if ( hBtn < szMin.y )
 131            hBtn = szMin.y;
 132    }
 133 #endif // wxUSE_BUTTON
 134
 135    wxSize sz(wBtn, hBtn);
 136
 137    CacheBestSize(sz);
 138    return sz;
 139 }
 140
 141 void wxToggleButton::SetValue(bool val)
 142 {
 143    ::SendMessage(GetHwnd(), BM_SETCHECK, val, 0);
 144 }
 145
 146 #ifndef BST_CHECKED
 147 #define BST_CHECKED 0x0001
 148 #endif
 149
 150 bool wxToggleButton::GetValue() const
 151 {
 152 #ifdef __WIN32__
 153    return (::SendMessage(GetHwnd(), BM_GETCHECK, 0, 0) == BST_CHECKED);
 154 #else
 155    return ((0x001 & ::SendMessage(GetHwnd(), BM_GETCHECK, 0, 0)) == 0x001);
 156 #endif
 157 }
 158
 159 void wxToggleButton::Command(wxCommandEvent & event)
 160 {
 161    SetValue((event.GetInt() != 0));
 162    ProcessCommand(event);
 163 }
 164
 165 #endif // wxUSE_TOGGLEBTN