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