src/msw/statbr95.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        msw/statbr95.cpp
   3 // Purpose:     native implementation of wxStatusBar
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     04.04.98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
   9 // Licence:     wxWindows license
  10 ///////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation "statbr95.h"
  14 #endif
  15
  16 // for compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __BORLANDC__
  20   #pragma hdrstop
  21 #endif
  22
  23 #ifndef WX_PRECOMP
  24   #include "wx/setup.h"
  25   #include "wx/frame.h"
  26   #include "wx/settings.h"
  27   #include "wx/dcclient.h"
  28 #endif
  29
  30 #if defined(__WIN95__) && wxUSE_NATIVE_STATUSBAR
  31
  32 #include "wx/intl.h"
  33 #include "wx/log.h"
  34 #include "wx/statusbr.h"
  35
  36 #include "wx/msw/private.h"
  37 #include <windowsx.h>
  38
  39 #if defined(__WIN95__) && !((defined(__GNUWIN32_OLD__) || defined(__TWIN32__)) && !defined(__CYGWIN10__))
  40     #include <commctrl.h>
  41 #endif
  42
  43 // ----------------------------------------------------------------------------
  44 // wxWindows macros
  45 // ----------------------------------------------------------------------------
  46
  47 IMPLEMENT_DYNAMIC_CLASS(wxStatusBar95, wxWindow);
  48 IMPLEMENT_DYNAMIC_CLASS(wxStatusBar, wxStatusBar95)
  49
  50 // ----------------------------------------------------------------------------
  51 // macros
  52 // ----------------------------------------------------------------------------
  53
  54 // windowsx.h and commctrl.h don't define those, so we do it here
  55 #define StatusBar_SetParts(h, n, w) SendMessage(h, SB_SETPARTS, (WPARAM)n, (LPARAM)w)
  56 #define StatusBar_SetText(h, n, t)  SendMessage(h, SB_SETTEXT, (WPARAM)n, (LPARAM)(LPCTSTR)t)
  57 #define StatusBar_GetTextLen(h, n)  LOWORD(SendMessage(h, SB_GETTEXTLENGTH, (WPARAM)n, 0))
  58 #define StatusBar_GetText(h, n, s)  LOWORD(SendMessage(h, SB_GETTEXT, (WPARAM)n, (LPARAM)(LPTSTR)s))
  59
  60 // ----------------------------------------------------------------------------
  61 //
  62 // ----------------------------------------------------------------------------
  63
  64 // static WNDPROC gs_wndprocStatBar = NULL;
  65 static WXFARPROC gs_wndprocStatBar = (WXFARPROC) NULL;
  66
  67 LRESULT APIENTRY wxStatusBarProc(HWND hwnd,
  68                                  UINT message,
  69                                  WPARAM wParam,
  70                                  LPARAM lParam)
  71 {
  72     switch (message) {
  73         case WM_COMMAND:
  74         case WM_DRAWITEM:
  75         case WM_MEASUREITEM:
  76         case WM_SIZE:
  77         case WM_MOVE:
  78         case WM_MOUSEMOVE:
  79         case WM_LBUTTONUP:
  80         case WM_LBUTTONDBLCLK:
  81         case WM_RBUTTONDOWN:
  82         case WM_RBUTTONUP:
  83         case WM_RBUTTONDBLCLK:
  84         case WM_MBUTTONDOWN:
  85         case WM_MBUTTONUP:
  86         case WM_MBUTTONDBLCLK:
  87             wxStatusBar95 *sb = (wxStatusBar95 *)GetWindowLong(hwnd, GWL_USERDATA);
  88             sb->MSWWindowProc(message, wParam, lParam);
  89             break;
  90     }
  91
  92     return ::CallWindowProc(CASTWNDPROC gs_wndprocStatBar, hwnd, message, wParam, lParam);
  93 }
  94
  95 // ============================================================================
  96 // implementation
  97 // ============================================================================
  98
  99 // ----------------------------------------------------------------------------
 100 // wxStatusBar95 class
 101 // ----------------------------------------------------------------------------
 102
 103 wxStatusBar95::wxStatusBar95()
 104 {
 105   SetParent(NULL);
 106   m_hWnd = 0;
 107   m_windowId = 0;
 108 }
 109
 110 bool wxStatusBar95::Create(wxWindow *parent,
 111                            wxWindowID id,
 112                            long style,
 113                            const wxString& name)
 114 {
 115     wxCHECK_MSG( parent, FALSE, wxT("status bar must have a parent") );
 116
 117     SetName(name);
 118     SetWindowStyleFlag(style);
 119     SetParent(parent);
 120
 121     parent->AddChild(this);
 122
 123     m_windowId = id == -1 ? NewControlId() : id;
 124
 125     DWORD wstyle = WS_CHILD | WS_VISIBLE;
 126
 127     if ( style & wxCLIP_SIBLINGS )
 128         wstyle |= WS_CLIPSIBLINGS;
 129
 130
 131     // setting SBARS_SIZEGRIP is perfectly useless: it's always on by default
 132     // (at least in the version of comctl32.dll I'm using), and the only way to
 133     // turn it off is to use CCS_TOP style - as we position the status bar
 134     // manually anyhow (see DoMoveWindow), use CCS_TOP style if wxST_SIZEGRIP
 135     // is not given
 136     if ( !(style & wxST_SIZEGRIP) )
 137     {
 138         wstyle |= CCS_TOP;
 139     }
 140     else
 141     {
 142         // may be some versions of comctl32.dll do need it - anyhow, it won't
 143         // do any harm
 144         wstyle |= SBARS_SIZEGRIP;
 145     }
 146
 147     m_hWnd = (WXHWND)CreateStatusWindow(wstyle,
 148                                         wxEmptyString,
 149                                         GetHwndOf(parent),
 150                                         m_windowId);
 151     if ( m_hWnd == 0 )
 152     {
 153         wxLogSysError(_("Failed to create a status bar."));
 154
 155         return FALSE;
 156     }
 157
 158     SetFieldsCount(1);
 159
 160     // we can't subclass this window as usual because the status bar window
 161     // proc processes WM_SIZE and WM_PAINT specially
 162     //  SubclassWin(m_hWnd);
 163
 164     // but we want to process the messages from it still, so do custom
 165     // subclassing here
 166     gs_wndprocStatBar = (WXFARPROC)GetWindowLong(GetHwnd(), GWL_WNDPROC);
 167     SetWindowLong(GetHwnd(), GWL_WNDPROC, (LONG)wxStatusBarProc);
 168     SetWindowLong(GetHwnd(), GWL_USERDATA, (LONG)this);
 169
 170     return TRUE;
 171 }
 172
 173 wxStatusBar95::~wxStatusBar95()
 174 {
 175     delete [] m_statusWidths;
 176 }
 177
 178 void wxStatusBar95::CopyFieldsWidth(const int widths[])
 179 {
 180   if (widths && !m_statusWidths)
 181     m_statusWidths = new int[m_nFields];
 182
 183   if ( widths != NULL ) {
 184     for ( int i = 0; i < m_nFields; i++ )
 185       m_statusWidths[i] = widths[i];
 186   }
 187   else {
 188     delete [] m_statusWidths;
 189     m_statusWidths = NULL;
 190   }
 191 }
 192
 193 void wxStatusBar95::SetFieldsCount(int nFields, const int *widths)
 194 {
 195     // this is a Windows limitation
 196     wxASSERT_MSG( (nFields > 0) && (nFields < 255), _T("too many fields") );
 197
 198     m_nFields = nFields;
 199
 200     CopyFieldsWidth(widths);
 201     SetFieldsWidth();
 202 }
 203
 204 void wxStatusBar95::SetStatusWidths(int WXUNUSED_UNLESS_DEBUG(n), const int widths[])
 205 {
 206     wxASSERT_MSG( n == m_nFields, _T("field number mismatch") );
 207
 208     CopyFieldsWidth(widths);
 209     SetFieldsWidth();
 210 }
 211
 212 void wxStatusBar95::SetFieldsWidth()
 213 {
 214     if ( !m_nFields )
 215         return;
 216
 217     int aBorders[3];
 218     SendMessage(GetHwnd(), SB_GETBORDERS, 0, (LPARAM)aBorders);
 219
 220     int extraWidth = aBorders[2]; // space between fields
 221
 222     int *pWidths = new int[m_nFields];
 223
 224     int nWindowWidth, y;
 225     GetClientSize(&nWindowWidth, &y);
 226
 227     if ( m_statusWidths == NULL ) {
 228         // default: all fields have the same width
 229         int nWidth = nWindowWidth / m_nFields;
 230         for ( int i = 0; i < m_nFields; i++ )
 231             pWidths[i] = (i + 1) * nWidth;
 232     }
 233     else {
 234         // -1 doesn't mean the same thing for wxWindows and Win32, recalc
 235         int nTotalWidth = 0,
 236         nVarCount = 0,
 237         i;
 238         for ( i = 0; i < m_nFields; i++ ) {
 239             if ( m_statusWidths[i] == -1 )
 240                 nVarCount++;
 241             else
 242                 nTotalWidth += m_statusWidths[i] + extraWidth;
 243         }
 244
 245         if ( nVarCount == 0 ) {
 246             wxFAIL_MSG( _T("at least one field must be of variable width") );
 247
 248             nVarCount++;
 249         }
 250
 251         int nVarWidth = (nWindowWidth - nTotalWidth) / nVarCount;
 252
 253         // do fill the array
 254         int nCurPos = 0;
 255         for ( i = 0; i < m_nFields; i++ ) {
 256             if ( m_statusWidths[i] == -1 )
 257                 nCurPos += nVarWidth;
 258             else
 259                 nCurPos += m_statusWidths[i] + extraWidth;
 260             pWidths[i] = nCurPos;
 261         }
 262     }
 263
 264     if ( !StatusBar_SetParts(GetHwnd(), m_nFields, pWidths) ) {
 265         wxLogLastError(wxT("StatusBar_SetParts"));
 266     }
 267
 268     delete [] pWidths;
 269 }
 270
 271 void wxStatusBar95::SetStatusText(const wxString& strText, int nField)
 272 {
 273     wxCHECK_RET( (nField >= 0) && (nField < m_nFields),
 274                  _T("invalid statusbar field index") );
 275
 276   if ( !StatusBar_SetText(GetHwnd(), nField, strText) ) {
 277     wxLogLastError(wxT("StatusBar_SetText"));
 278   }
 279 }
 280
 281 wxString wxStatusBar95::GetStatusText(int nField) const
 282 {
 283     wxCHECK_MSG( (nField >= 0) && (nField < m_nFields), wxEmptyString,
 284                  _T("invalid statusbar field index") );
 285
 286   wxString str;
 287   int len = StatusBar_GetTextLen(GetHwnd(), nField);
 288   if (len > 0)
 289   {
 290     StatusBar_GetText(GetHwnd(), nField, str.GetWriteBuf(len));
 291     str.UngetWriteBuf();
 292   }
 293   return str;
 294 }
 295
 296 int wxStatusBar95::GetBorderX() const
 297 {
 298     int aBorders[3];
 299     SendMessage(GetHwnd(), SB_GETBORDERS, 0, (LPARAM)aBorders);
 300
 301     return aBorders[0];
 302 }
 303
 304 int wxStatusBar95::GetBorderY() const
 305 {
 306     int aBorders[3];
 307     SendMessage(GetHwnd(), SB_GETBORDERS, 0, (LPARAM)aBorders);
 308
 309     return aBorders[1];
 310 }
 311
 312 void wxStatusBar95::SetMinHeight(int height)
 313 {
 314     SendMessage(GetHwnd(), SB_SETMINHEIGHT, height + 2*GetBorderY(), 0);
 315
 316     // have to send a (dummy) WM_SIZE to redraw it now
 317     SendMessage(GetHwnd(), WM_SIZE, 0, 0);
 318 }
 319
 320 bool wxStatusBar95::GetFieldRect(int i, wxRect& rect) const
 321 {
 322     wxCHECK_MSG( (i >= 0) && (i < m_nFields), FALSE,
 323                  _T("invalid statusbar field index") );
 324
 325     RECT r;
 326     if ( !::SendMessage(GetHwnd(), SB_GETRECT, i, (LPARAM)&r) )
 327     {
 328         wxLogLastError(wxT("SendMessage(SB_GETRECT)"));
 329     }
 330
 331     wxCopyRECTToRect(r, rect);
 332
 333     return TRUE;
 334 }
 335
 336 void wxStatusBar95::DoMoveWindow(int x, int y, int width, int height)
 337 {
 338     // the status bar wnd proc must be forwarded the WM_SIZE message whenever
 339     // the stat bar position/size is changed because it normally positions the
 340     // control itself along bottom or top side of the parent window - failing
 341     // to do so will result in nasty visual effects
 342     FORWARD_WM_SIZE(GetHwnd(), SIZE_RESTORED, x, y, SendMessage);
 343
 344     // but now, when the standard status bar wnd proc did all it wanted to do,
 345     // move the status bar to its correct location - usually this call may be
 346     // omitted because for normal status bars (positioned along the bottom
 347     // edge) the position is already set correctly, but if the user wants to
 348     // position them in some exotic location, this is really needed
 349     wxWindow::DoMoveWindow(x, y, width, height);
 350
 351     // adjust fields widths to the new size
 352     SetFieldsWidth();
 353 }
 354
 355 #endif // __WIN95__ && wxUSE_NATIVE_STATUSBAR
 356