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/log.h"
  33 #include "wx/statusbr.h"
  34
  35 #include "wx/msw/private.h"
  36 #include <windowsx.h>
  37
  38 #if !defined(__GNUWIN32__) || defined(__TWIN32__) || defined(wxUSE_NORLANDER_HEADERS)
  39 #include <commctrl.h>
  40 #endif
  41
  42 // ----------------------------------------------------------------------------
  43 // wxWindows macros
  44 // ----------------------------------------------------------------------------
  45
  46 IMPLEMENT_DYNAMIC_CLASS(wxStatusBar95, wxWindow);
  47 IMPLEMENT_DYNAMIC_CLASS(wxStatusBar, wxStatusBar95)
  48
  49 BEGIN_EVENT_TABLE(wxStatusBar95, wxWindow)
  50     EVT_SIZE(wxStatusBar95::OnSize)
  51 END_EVENT_TABLE()
  52
  53 // ----------------------------------------------------------------------------
  54 // macros
  55 // ----------------------------------------------------------------------------
  56
  57 // windowsx.h and commctrl.h don't define those, so we do it here
  58 #define StatusBar_SetParts(h, n, w) SendMessage(h, SB_SETPARTS, (WPARAM)n, (LPARAM)w)
  59 #define StatusBar_SetText(h, n, t)  SendMessage(h, SB_SETTEXT, (WPARAM)n, (LPARAM)(LPCTSTR)t)
  60 #define StatusBar_GetTextLen(h, n)  LOWORD(SendMessage(h, SB_GETTEXTLENGTH, (WPARAM)n, 0))
  61 #define StatusBar_GetText(h, n, s)  LOWORD(SendMessage(h, SB_GETTEXT, (WPARAM)n, (LPARAM)(LPTSTR)s))
  62
  63 // ----------------------------------------------------------------------------
  64 //
  65 // ----------------------------------------------------------------------------
  66
  67 static WNDPROC gs_wndprocStatBar = NULL;
  68
  69 LRESULT APIENTRY wxStatusBarProc(HWND hwnd,
  70                                  UINT message,
  71                                  WPARAM wParam,
  72                                  LPARAM lParam)
  73 {
  74     if ( message == WM_COMMAND )
  75     {
  76         wxStatusBar95 *sb = (wxStatusBar95 *)GetWindowLong(hwnd, GWL_USERDATA);
  77         sb->MSWWindowProc(message, wParam, lParam);
  78     }
  79
  80     return ::CallWindowProc(gs_wndprocStatBar, hwnd, message, wParam, lParam);
  81 }
  82
  83 // ============================================================================
  84 // implementation
  85 // ============================================================================
  86
  87 // ----------------------------------------------------------------------------
  88 // wxStatusBar95 class
  89 // ----------------------------------------------------------------------------
  90
  91 wxStatusBar95::wxStatusBar95()
  92 {
  93   SetParent(NULL);
  94   m_hWnd = 0;
  95   m_windowId = 0;
  96 }
  97
  98 bool wxStatusBar95::Create(wxWindow *parent,
  99                            wxWindowID id,
 100                            long style,
 101                            const wxString& name)
 102 {
 103     SetName(name);
 104     SetParent(parent);
 105
 106     if (id == -1)
 107         m_windowId = NewControlId();
 108     else
 109         m_windowId = id;
 110
 111     DWORD wstyle = WS_CHILD | WS_VISIBLE;
 112     if ( style & wxST_SIZEGRIP )
 113         wstyle |= SBARS_SIZEGRIP;
 114
 115     m_hWnd = (WXHWND)CreateStatusWindow(wstyle,
 116                                         wxEmptyString,
 117                                         GetHwndOf(parent),
 118                                         m_windowId);
 119     if ( m_hWnd == 0 )
 120     {
 121         wxLogSysError(_("Failed to create a status bar."));
 122
 123         return FALSE;
 124     }
 125
 126     // for some reason, subclassing in the usual way doesn't work at all - many
 127     // strange things start happening (status bar is not positioned correctly,
 128     // all methods fail...)
 129     //  SubclassWin(m_hWnd);
 130
 131     // but we want to process the messages from it still, so must subclass it
 132     gs_wndprocStatBar = (WNDPROC)GetWindowLong(GetHwnd(), GWL_WNDPROC);
 133     SetWindowLong(GetHwnd(), GWL_WNDPROC, (LONG)wxStatusBarProc);
 134     SetWindowLong(GetHwnd(), GWL_USERDATA, (LONG)this);
 135
 136     return TRUE;
 137 }
 138
 139 wxStatusBar95::~wxStatusBar95()
 140 {
 141     delete [] m_statusWidths;
 142 }
 143
 144 void wxStatusBar95::CopyFieldsWidth(const int widths[])
 145 {
 146   if (widths && !m_statusWidths)
 147     m_statusWidths = new int[m_nFields];
 148
 149   if ( widths != NULL ) {
 150     for ( int i = 0; i < m_nFields; i++ )
 151       m_statusWidths[i] = widths[i];
 152   }
 153   else {
 154     delete [] m_statusWidths;
 155     m_statusWidths = NULL;
 156   }
 157 }
 158
 159 void wxStatusBar95::SetFieldsCount(int nFields, const int widths[])
 160 {
 161   // this is Windows limitation
 162   wxASSERT_MSG( (nFields > 0) && (nFields < 255), _T("too many fields") );
 163
 164   m_nFields = nFields;
 165
 166   CopyFieldsWidth(widths);
 167   SetFieldsWidth();
 168 }
 169
 170 void wxStatusBar95::SetStatusWidths(int n, const int widths[])
 171 {
 172   wxASSERT_MSG( n == m_nFields, _T("field number mismatch") );
 173
 174   CopyFieldsWidth(widths);
 175   SetFieldsWidth();
 176 }
 177
 178 void wxStatusBar95::SetFieldsWidth()
 179 {
 180     if ( !m_nFields )
 181         return;
 182
 183     int aBorders[3];
 184     SendMessage(GetHwnd(), SB_GETBORDERS, 0, (LPARAM)aBorders);
 185
 186     int extraWidth = aBorders[2]; // space between fields
 187
 188     int *pWidths = new int[m_nFields];
 189
 190     int nWindowWidth, y;
 191     GetClientSize(&nWindowWidth, &y);
 192
 193     if ( m_statusWidths == NULL ) {
 194         // default: all fields have the same width
 195         int nWidth = nWindowWidth / m_nFields;
 196         for ( int i = 0; i < m_nFields; i++ )
 197             pWidths[i] = (i + 1) * nWidth;
 198     }
 199     else {
 200         // -1 doesn't mean the same thing for wxWindows and Win32, recalc
 201         int nTotalWidth = 0,
 202         nVarCount = 0,
 203         i;
 204         for ( i = 0; i < m_nFields; i++ ) {
 205             if ( m_statusWidths[i] == -1 )
 206                 nVarCount++;
 207             else
 208                 nTotalWidth += m_statusWidths[i] + extraWidth;
 209         }
 210
 211         if ( nVarCount == 0 ) {
 212             wxFAIL_MSG( _T("at least one field must be of variable width") );
 213
 214             nVarCount++;
 215         }
 216
 217         int nVarWidth = (nWindowWidth - nTotalWidth) / nVarCount;
 218
 219         // do fill the array
 220         int nCurPos = 0;
 221         for ( i = 0; i < m_nFields; i++ ) {
 222             if ( m_statusWidths[i] == -1 )
 223                 nCurPos += nVarWidth;
 224             else
 225                 nCurPos += m_statusWidths[i] + extraWidth;
 226             pWidths[i] = nCurPos;
 227         }
 228     }
 229
 230     if ( !StatusBar_SetParts(GetHwnd(), m_nFields, pWidths) ) {
 231         wxLogLastError(wxT("StatusBar_SetParts"));
 232     }
 233
 234     delete [] pWidths;
 235 }
 236
 237 void wxStatusBar95::SetStatusText(const wxString& strText, int nField)
 238 {
 239     wxCHECK_RET( (nField >= 0) && (nField < m_nFields),
 240                  _T("invalid statusbar field index") );
 241
 242   if ( !StatusBar_SetText(GetHwnd(), nField, strText) ) {
 243     wxLogLastError(wxT("StatusBar_SetText"));
 244   }
 245 }
 246
 247 wxString wxStatusBar95::GetStatusText(int nField) const
 248 {
 249     wxCHECK_MSG( (nField >= 0) && (nField < m_nFields), wxEmptyString,
 250                  _T("invalid statusbar field index") );
 251
 252   wxString str;
 253   int len = StatusBar_GetTextLen(GetHwnd(), nField);
 254   if (len > 0)
 255   {
 256     StatusBar_GetText(GetHwnd(), nField, str.GetWriteBuf(len));
 257     str.UngetWriteBuf();
 258   }
 259   return str;
 260 }
 261
 262 int wxStatusBar95::GetBorderX() const
 263 {
 264     int aBorders[3];
 265     SendMessage(GetHwnd(), SB_GETBORDERS, 0, (LPARAM)aBorders);
 266
 267     return aBorders[0];
 268 }
 269
 270 int wxStatusBar95::GetBorderY() const
 271 {
 272     int aBorders[3];
 273     SendMessage(GetHwnd(), SB_GETBORDERS, 0, (LPARAM)aBorders);
 274
 275     return aBorders[1];
 276 }
 277
 278 void wxStatusBar95::SetMinHeight(int height)
 279 {
 280     SendMessage(GetHwnd(), SB_SETMINHEIGHT, height + 2*GetBorderY(), 0);
 281
 282     // have to send a (dummy) WM_SIZE to redraw it now
 283     SendMessage(GetHwnd(), WM_SIZE, 0, 0);
 284 }
 285
 286 bool wxStatusBar95::GetFieldRect(int i, wxRect& rect) const
 287 {
 288     wxCHECK_MSG( (i >= 0) && (i < m_nFields), FALSE,
 289                  _T("invalid statusbar field index") );
 290
 291     RECT r;
 292     if ( !::SendMessage(GetHwnd(), SB_GETRECT, i, (LPARAM)&r) )
 293     {
 294         wxLogLastError("SendMessage(SB_GETRECT)");
 295     }
 296
 297     wxCopyRECTToRect(r, rect);
 298
 299     return TRUE;
 300 }
 301
 302 void wxStatusBar95::OnSize(wxSizeEvent& event)
 303 {
 304   FORWARD_WM_SIZE(GetHwnd(), SIZE_RESTORED,
 305                   event.GetSize().x, event.GetSize().y,
 306                   SendMessage);
 307
 308   // adjust fields widths to the new size
 309   SetFieldsWidth();
 310 }
 311
 312 #endif // __WIN95__ && wxUSE_NATIVE_STATUSBAR
 313