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 wxBorder wxToggleButton::GetDefaultBorder() const
  87 {
  88     return wxBORDER_NONE;
  89 }
  90
  91 WXDWORD wxToggleButton::MSWGetStyle(long style, WXDWORD *exstyle) const
  92 {
  93     WXDWORD msStyle = wxControl::MSWGetStyle(style, exstyle);
  94
  95 #ifndef BS_PUSHLIKE
  96 #define BS_PUSHLIKE 0x00001000L
  97 #endif
  98
  99     msStyle |= BS_AUTOCHECKBOX | BS_PUSHLIKE | WS_TABSTOP;
 100
 101     if(style & wxBU_LEFT)
 102       msStyle |= BS_LEFT;
 103     if(style & wxBU_RIGHT)
 104       msStyle |= BS_RIGHT;
 105     if(style & wxBU_TOP)
 106       msStyle |= BS_TOP;
 107     if(style & wxBU_BOTTOM)
 108       msStyle |= BS_BOTTOM;
 109
 110     return msStyle;
 111 }
 112
 113 wxSize wxToggleButton::DoGetBestSize() const
 114 {
 115    wxString label = wxGetWindowText(GetHWND());
 116    int wBtn;
 117    GetTextExtent(wxStripMenuCodes(label), &wBtn, NULL);
 118
 119    int wChar, hChar;
 120    wxGetCharSize(GetHWND(), &wChar, &hChar, GetFont());
 121
 122    // add a margin - the button is wider than just its label
 123    wBtn += 3*wChar;
 124
 125    // the button height is proportional to the height of the font used
 126    int hBtn = BUTTON_HEIGHT_FROM_CHAR_HEIGHT(hChar);
 127
 128 #if wxUSE_BUTTON
 129    wxSize sz = wxButton::GetDefaultSize();
 130    if (wBtn > sz.x)
 131        sz.x = wBtn;
 132    if (hBtn > sz.y)
 133        sz.y = hBtn;
 134 #else
 135    wxSize sz(wBtn, hBtn);
 136 #endif
 137
 138    CacheBestSize(sz);
 139    return sz;
 140 }
 141
 142 void wxToggleButton::SetValue(bool val)
 143 {
 144    ::SendMessage(GetHwnd(), BM_SETCHECK, val, 0);
 145 }
 146
 147 #ifndef BST_CHECKED
 148 #define BST_CHECKED 0x0001
 149 #endif
 150
 151 bool wxToggleButton::GetValue() const
 152 {
 153 #ifdef __WIN32__
 154    return (::SendMessage(GetHwnd(), BM_GETCHECK, 0, 0) == BST_CHECKED);
 155 #else
 156    return ((0x001 & ::SendMessage(GetHwnd(), BM_GETCHECK, 0, 0)) == 0x001);
 157 #endif
 158 }
 159
 160 void wxToggleButton::Command(wxCommandEvent & event)
 161 {
 162    SetValue((event.GetInt() != 0));
 163    ProcessCommand(event);
 164 }
 165
 166 #endif // wxUSE_TOGGLEBTN