]> git.saurik.com Git - wxWidgets.git/blob - src/msw/frame.cpp
workarounded false memory leak report
[wxWidgets.git] / src / msw / frame.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: msw/frame.cpp
3 // Purpose: wxFrame
4 // Author: Julian Smart
5 // Modified by:
6 // Created: 01/02/97
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart and Markus Holzem
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ============================================================================
13 // declarations
14 // ============================================================================
15
16 // ----------------------------------------------------------------------------
17 // headers
18 // ----------------------------------------------------------------------------
19
20 #ifdef __GNUG__
21 #pragma implementation "frame.h"
22 #endif
23
24 // For compilers that support precompilation, includes "wx.h".
25 #include "wx/wxprec.h"
26
27 #ifdef __BORLANDC__
28 #pragma hdrstop
29 #endif
30
31 #ifndef WX_PRECOMP
32 #include "wx/setup.h"
33 #include "wx/frame.h"
34 #include "wx/menu.h"
35 #include "wx/app.h"
36 #include "wx/utils.h"
37 #include "wx/dialog.h"
38 #include "wx/settings.h"
39 #include "wx/dcclient.h"
40 #include "wx/mdi.h"
41 #include "wx/panel.h"
42 #endif // WX_PRECOMP
43
44 #include "wx/msw/private.h"
45
46 #if wxUSE_STATUSBAR
47 #include "wx/statusbr.h"
48 #include "wx/generic/statusbr.h"
49 #endif // wxUSE_STATUSBAR
50
51 #if wxUSE_TOOLBAR
52 #include "wx/toolbar.h"
53 #endif // wxUSE_TOOLBAR
54
55 #include "wx/menuitem.h"
56 #include "wx/log.h"
57
58 // ----------------------------------------------------------------------------
59 // globals
60 // ----------------------------------------------------------------------------
61
62 extern wxWindowList wxModelessWindows;
63 extern wxList WXDLLEXPORT wxPendingDelete;
64 extern const wxChar *wxFrameClassName;
65 extern wxMenu *wxCurrentPopupMenu;
66
67 // ----------------------------------------------------------------------------
68 // event tables
69 // ----------------------------------------------------------------------------
70
71 BEGIN_EVENT_TABLE(wxFrame, wxFrameBase)
72 EVT_ACTIVATE(wxFrame::OnActivate)
73 EVT_SYS_COLOUR_CHANGED(wxFrame::OnSysColourChanged)
74 END_EVENT_TABLE()
75
76 IMPLEMENT_DYNAMIC_CLASS(wxFrame, wxWindow)
77
78 // ============================================================================
79 // implementation
80 // ============================================================================
81
82 // ----------------------------------------------------------------------------
83 // static class members
84 // ----------------------------------------------------------------------------
85
86 #if wxUSE_NATIVE_STATUSBAR
87 bool wxFrame::m_useNativeStatusBar = TRUE;
88 #else
89 bool wxFrame::m_useNativeStatusBar = FALSE;
90 #endif
91
92 // ----------------------------------------------------------------------------
93 // creation/destruction
94 // ----------------------------------------------------------------------------
95
96 void wxFrame::Init()
97 {
98 m_iconized = FALSE;
99
100 #if wxUSE_TOOLTIPS
101 m_hwndToolTip = 0;
102 #endif
103
104 // Data to save/restore when calling ShowFullScreen
105 m_fsStyle = 0;
106 m_fsOldWindowStyle = 0;
107 m_fsStatusBarFields = 0;
108 m_fsStatusBarHeight = 0;
109 m_fsToolBarHeight = 0;
110 // m_fsMenu = 0;
111 m_fsIsMaximized = FALSE;
112 m_fsIsShowing = FALSE;
113
114 m_winLastFocused = (wxWindow *)NULL;
115
116 // unlike (almost?) all other windows, frames are created hidden
117 m_isShown = FALSE;
118 }
119
120 bool wxFrame::Create(wxWindow *parent,
121 wxWindowID id,
122 const wxString& title,
123 const wxPoint& pos,
124 const wxSize& size,
125 long style,
126 const wxString& name)
127 {
128 SetName(name);
129 m_windowStyle = style;
130 m_frameMenuBar = NULL;
131 m_frameToolBar = NULL;
132 m_frameStatusBar = NULL;
133
134 SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_APPWORKSPACE));
135
136 if ( id > -1 )
137 m_windowId = id;
138 else
139 m_windowId = (int)NewControlId();
140
141 if (parent) parent->AddChild(this);
142
143 int x = pos.x;
144 int y = pos.y;
145 int width = size.x;
146 int height = size.y;
147
148 m_iconized = FALSE;
149
150 wxTopLevelWindows.Append(this);
151
152 MSWCreate(m_windowId, parent, wxFrameClassName, this, title,
153 x, y, width, height, style);
154
155 wxModelessWindows.Append(this);
156
157 return TRUE;
158 }
159
160 wxFrame::~wxFrame()
161 {
162 m_isBeingDeleted = TRUE;
163 wxTopLevelWindows.DeleteObject(this);
164
165 // the ~wxToolBar() code relies on the previous line to be executed before
166 // this one, i.e. the frame should remove itself from wxTopLevelWindows
167 // before destorying its toolbar
168 DeleteAllBars();
169
170 if (wxTheApp && (wxTopLevelWindows.Number() == 0))
171 {
172 wxTheApp->SetTopWindow(NULL);
173
174 if (wxTheApp->GetExitOnFrameDelete())
175 {
176 PostQuitMessage(0);
177 }
178 }
179
180 wxModelessWindows.DeleteObject(this);
181
182 // For some reason, wxWindows can activate another task altogether
183 // when a frame is destroyed after a modal dialog has been invoked.
184 // Try to bring the parent to the top.
185 // MT:Only do this if this frame is currently the active window, else weird
186 // things start to happen
187 if ( wxGetActiveWindow() == this )
188 if (GetParent() && GetParent()->GetHWND())
189 ::BringWindowToTop((HWND) GetParent()->GetHWND());
190 }
191
192 // Get size *available for subwindows* i.e. excluding menu bar, toolbar etc.
193 void wxFrame::DoGetClientSize(int *x, int *y) const
194 {
195 RECT rect;
196 ::GetClientRect(GetHwnd(), &rect);
197
198 #if wxUSE_STATUSBAR
199 if ( GetStatusBar() && GetStatusBar()->IsShown() )
200 {
201 int statusX, statusY;
202 GetStatusBar()->GetClientSize(&statusX, &statusY);
203 rect.bottom -= statusY;
204 }
205 #endif // wxUSE_STATUSBAR
206
207 wxPoint pt(GetClientAreaOrigin());
208 rect.bottom -= pt.y;
209 rect.right -= pt.x;
210
211 if ( x )
212 *x = rect.right;
213 if ( y )
214 *y = rect.bottom;
215 }
216
217 // Set the client size (i.e. leave the calculation of borders etc.
218 // to wxWindows)
219 void wxFrame::DoSetClientSize(int width, int height)
220 {
221 HWND hWnd = GetHwnd();
222
223 RECT rect;
224 ::GetClientRect(hWnd, &rect);
225
226 RECT rect2;
227 GetWindowRect(hWnd, &rect2);
228
229 // Find the difference between the entire window (title bar and all)
230 // and the client area; add this to the new client size to move the
231 // window
232 int actual_width = rect2.right - rect2.left - rect.right + width;
233 int actual_height = rect2.bottom - rect2.top - rect.bottom + height;
234
235 #if wxUSE_STATUSBAR
236 if ( GetStatusBar() && GetStatusBar()->IsShown())
237 {
238 int statusX, statusY;
239 GetStatusBar()->GetClientSize(&statusX, &statusY);
240 actual_height += statusY;
241 }
242 #endif // wxUSE_STATUSBAR
243
244 wxPoint pt(GetClientAreaOrigin());
245 actual_width += pt.y;
246 actual_height += pt.x;
247
248 POINT point;
249 point.x = rect2.left;
250 point.y = rect2.top;
251
252 MoveWindow(hWnd, point.x, point.y, actual_width, actual_height, (BOOL)TRUE);
253
254 wxSizeEvent event(wxSize(width, height), m_windowId);
255 event.SetEventObject( this );
256 GetEventHandler()->ProcessEvent(event);
257 }
258
259 void wxFrame::DoGetSize(int *width, int *height) const
260 {
261 RECT rect;
262 GetWindowRect(GetHwnd(), &rect);
263 *width = rect.right - rect.left;
264 *height = rect.bottom - rect.top;
265 }
266
267 void wxFrame::DoGetPosition(int *x, int *y) const
268 {
269 RECT rect;
270 GetWindowRect(GetHwnd(), &rect);
271 POINT point;
272 point.x = rect.left;
273 point.y = rect.top;
274
275 *x = point.x;
276 *y = point.y;
277 }
278
279 // ----------------------------------------------------------------------------
280 // variations around ::ShowWindow()
281 // ----------------------------------------------------------------------------
282
283 void wxFrame::DoShowWindow(int nShowCmd)
284 {
285 ::ShowWindow(GetHwnd(), nShowCmd);
286
287 m_iconized = nShowCmd == SW_MINIMIZE;
288 }
289
290 bool wxFrame::Show(bool show)
291 {
292 // don't use wxWindow version as we want to call DoShowWindow()
293 if ( !wxWindowBase::Show(show) )
294 return FALSE;
295
296 DoShowWindow(show ? SW_SHOW : SW_HIDE);
297
298 if ( show )
299 {
300 ::BringWindowToTop(GetHwnd());
301
302 wxActivateEvent event(wxEVT_ACTIVATE, TRUE, m_windowId);
303 event.SetEventObject( this );
304 GetEventHandler()->ProcessEvent(event);
305 }
306 else
307 {
308 // Try to highlight the correct window (the parent)
309 if ( GetParent() )
310 {
311 HWND hWndParent = GetHwndOf(GetParent());
312 if (hWndParent)
313 ::BringWindowToTop(hWndParent);
314 }
315 }
316
317 return TRUE;
318 }
319
320 void wxFrame::Iconize(bool iconize)
321 {
322 DoShowWindow(iconize ? SW_MINIMIZE : SW_RESTORE);
323 }
324
325 void wxFrame::Maximize(bool maximize)
326 {
327 DoShowWindow(maximize ? SW_MAXIMIZE : SW_RESTORE);
328 }
329
330 void wxFrame::Restore()
331 {
332 DoShowWindow(SW_RESTORE);
333 }
334
335 bool wxFrame::IsIconized() const
336 {
337 ((wxFrame *)this)->m_iconized = (::IsIconic(GetHwnd()) != 0);
338 return m_iconized;
339 }
340
341 // Is it maximized?
342 bool wxFrame::IsMaximized() const
343 {
344 return (::IsZoomed(GetHwnd()) != 0);
345 }
346
347 void wxFrame::SetIcon(const wxIcon& icon)
348 {
349 wxFrameBase::SetIcon(icon);
350
351 #if defined(__WIN95__)
352 if ( m_icon.Ok() )
353 {
354 SendMessage(GetHwnd(), WM_SETICON,
355 (WPARAM)TRUE, (LPARAM)(HICON) m_icon.GetHICON());
356 }
357 #endif // __WIN95__
358 }
359
360 #if wxUSE_STATUSBAR
361 wxStatusBar *wxFrame::OnCreateStatusBar(int number,
362 long style,
363 wxWindowID id,
364 const wxString& name)
365 {
366 wxStatusBar *statusBar = NULL;
367
368 #if wxUSE_NATIVE_STATUSBAR
369 if ( !UsesNativeStatusBar() )
370 {
371 statusBar = (wxStatusBar *)new wxStatusBarGeneric(this, id, style);
372 }
373 else
374 #endif
375 {
376 statusBar = new wxStatusBar(this, id, style, name);
377 }
378
379 // Set the height according to the font and the border size
380 wxClientDC dc(statusBar);
381 dc.SetFont(statusBar->GetFont());
382
383 wxCoord y;
384 dc.GetTextExtent(_T("X"), NULL, &y );
385
386 int height = (int)( (11*y)/10 + 2*statusBar->GetBorderY());
387
388 statusBar->SetSize(-1, -1, -1, height);
389
390 statusBar->SetFieldsCount(number);
391
392 return statusBar;
393 }
394
395 void wxFrame::PositionStatusBar()
396 {
397 if ( !m_frameStatusBar )
398 return;
399
400 int w, h;
401 GetClientSize(&w, &h);
402 int sw, sh;
403 m_frameStatusBar->GetSize(&sw, &sh);
404
405 // Since we wish the status bar to be directly under the client area,
406 // we use the adjusted sizes without using wxSIZE_NO_ADJUSTMENTS.
407 m_frameStatusBar->SetSize(0, h, w, sh);
408 }
409 #endif // wxUSE_STATUSBAR
410
411 void wxFrame::DetachMenuBar()
412 {
413 if ( m_frameMenuBar )
414 {
415 m_frameMenuBar->Detach();
416 m_frameMenuBar = NULL;
417 }
418 }
419
420 void wxFrame::SetMenuBar(wxMenuBar *menubar)
421 {
422 if ( !menubar )
423 {
424 DetachMenuBar();
425
426 // actually remove the menu from the frame
427 m_hMenu = (WXHMENU)0;
428 InternalSetMenuBar();
429 }
430 else // set new non NULL menu bar
431 {
432 m_frameMenuBar = NULL;
433
434 // Can set a menubar several times.
435 // TODO: how to prevent a memory leak if you have a currently-unattached
436 // menubar? wxWindows assumes that the frame will delete the menu (otherwise
437 // there are problems for MDI).
438 if ( menubar->GetHMenu() )
439 {
440 m_hMenu = menubar->GetHMenu();
441 }
442 else
443 {
444 menubar->Detach();
445
446 m_hMenu = menubar->Create();
447
448 if ( !m_hMenu )
449 return;
450 }
451
452 InternalSetMenuBar();
453
454 m_frameMenuBar = menubar;
455 menubar->Attach(this);
456 }
457 }
458
459 void wxFrame::InternalSetMenuBar()
460 {
461 if ( !::SetMenu(GetHwnd(), (HMENU)m_hMenu) )
462 {
463 wxLogLastError(wxT("SetMenu"));
464 }
465 }
466
467 // Responds to colour changes, and passes event on to children.
468 void wxFrame::OnSysColourChanged(wxSysColourChangedEvent& event)
469 {
470 SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_APPWORKSPACE));
471 Refresh();
472
473 if ( m_frameStatusBar )
474 {
475 wxSysColourChangedEvent event2;
476 event2.SetEventObject( m_frameStatusBar );
477 m_frameStatusBar->GetEventHandler()->ProcessEvent(event2);
478 }
479
480 // Propagate the event to the non-top-level children
481 wxWindow::OnSysColourChanged(event);
482 }
483
484 // Pass TRUE to show full screen, FALSE to restore.
485 bool wxFrame::ShowFullScreen(bool show, long style)
486 {
487 if (show)
488 {
489 if (IsFullScreen())
490 return FALSE;
491
492 m_fsIsShowing = TRUE;
493 m_fsStyle = style;
494
495 wxToolBar *theToolBar = GetToolBar();
496 wxStatusBar *theStatusBar = GetStatusBar();
497
498 int dummyWidth;
499
500 if (theToolBar)
501 theToolBar->GetSize(&dummyWidth, &m_fsToolBarHeight);
502 if (theStatusBar)
503 theStatusBar->GetSize(&dummyWidth, &m_fsStatusBarHeight);
504
505 // zap the toolbar, menubar, and statusbar
506
507 if ((style & wxFULLSCREEN_NOTOOLBAR) && theToolBar)
508 {
509 theToolBar->SetSize(-1,0);
510 theToolBar->Show(FALSE);
511 }
512
513 if (style & wxFULLSCREEN_NOMENUBAR)
514 SetMenu((HWND)GetHWND(), (HMENU) NULL);
515
516 // Save the number of fields in the statusbar
517 if ((style & wxFULLSCREEN_NOSTATUSBAR) && theStatusBar)
518 {
519 //m_fsStatusBarFields = theStatusBar->GetFieldsCount();
520 //SetStatusBar((wxStatusBar*) NULL);
521 //delete theStatusBar;
522 theStatusBar->Show(FALSE);
523 }
524 else
525 m_fsStatusBarFields = 0;
526
527 // zap the frame borders
528
529 // save the 'normal' window style
530 m_fsOldWindowStyle = GetWindowLong((HWND)GetHWND(), GWL_STYLE);
531
532 // save the old position, width & height, maximize state
533 m_fsOldSize = GetRect();
534 m_fsIsMaximized = IsMaximized();
535
536 // decide which window style flags to turn off
537 LONG newStyle = m_fsOldWindowStyle;
538 LONG offFlags = 0;
539
540 if (style & wxFULLSCREEN_NOBORDER)
541 offFlags |= WS_BORDER;
542 if (style & wxFULLSCREEN_NOCAPTION)
543 offFlags |= (WS_CAPTION | WS_SYSMENU);
544
545 newStyle &= (~offFlags);
546
547 // change our window style to be compatible with full-screen mode
548 SetWindowLong((HWND)GetHWND(), GWL_STYLE, newStyle);
549
550 // resize to the size of the desktop
551 int width, height;
552
553 RECT rect;
554 ::GetWindowRect(GetDesktopWindow(), &rect);
555 width = rect.right - rect.left;
556 height = rect.bottom - rect.top;
557
558 SetSize(width, height);
559
560 // now flush the window style cache and actually go full-screen
561 SetWindowPos((HWND)GetHWND(), HWND_TOP, 0, 0, width, height, SWP_FRAMECHANGED);
562
563 wxSizeEvent event(wxSize(width, height), GetId());
564 GetEventHandler()->ProcessEvent(event);
565
566 return TRUE;
567 }
568 else
569 {
570 if (!IsFullScreen())
571 return FALSE;
572
573 m_fsIsShowing = FALSE;
574
575 wxToolBar *theToolBar = GetToolBar();
576
577 // restore the toolbar, menubar, and statusbar
578 if (theToolBar && (m_fsStyle & wxFULLSCREEN_NOTOOLBAR))
579 {
580 theToolBar->SetSize(-1, m_fsToolBarHeight);
581 theToolBar->Show(TRUE);
582 }
583
584 if ((m_fsStyle & wxFULLSCREEN_NOSTATUSBAR)) // && (m_fsStatusBarFields > 0))
585 {
586 //CreateStatusBar(m_fsStatusBarFields);
587 if (GetStatusBar())
588 {
589 GetStatusBar()->Show(TRUE);
590 PositionStatusBar();
591 }
592 }
593
594 if ((m_fsStyle & wxFULLSCREEN_NOMENUBAR) && (m_hMenu != 0))
595 SetMenu((HWND)GetHWND(), (HMENU)m_hMenu);
596
597 Maximize(m_fsIsMaximized);
598 SetWindowLong((HWND)GetHWND(),GWL_STYLE, m_fsOldWindowStyle);
599 SetWindowPos((HWND)GetHWND(),HWND_TOP,m_fsOldSize.x, m_fsOldSize.y,
600 m_fsOldSize.width, m_fsOldSize.height, SWP_FRAMECHANGED);
601
602 return TRUE;
603 }
604 }
605
606 /*
607 * Frame window
608 *
609 */
610
611 bool wxFrame::MSWCreate(int id, wxWindow *parent, const wxChar *wclass, wxWindow *wx_win, const wxChar *title,
612 int x, int y, int width, int height, long style)
613
614 {
615 m_defaultIcon = (WXHICON) (wxSTD_FRAME_ICON ? wxSTD_FRAME_ICON : wxDEFAULT_FRAME_ICON);
616
617 // If child windows aren't properly drawn initially, WS_CLIPCHILDREN
618 // could be the culprit. But without it, you can get a lot of flicker.
619
620 DWORD msflags = 0;
621 if ( style & wxCAPTION )
622 {
623 if ( style & wxFRAME_TOOL_WINDOW )
624 msflags |= WS_POPUPWINDOW;
625 else
626 msflags |= WS_OVERLAPPED;
627 }
628 else
629 {
630 msflags |= WS_POPUP;
631 }
632
633 if (style & wxMINIMIZE_BOX)
634 msflags |= WS_MINIMIZEBOX;
635 if (style & wxMAXIMIZE_BOX)
636 msflags |= WS_MAXIMIZEBOX;
637 if (style & wxTHICK_FRAME)
638 msflags |= WS_THICKFRAME;
639 if (style & wxSYSTEM_MENU)
640 msflags |= WS_SYSMENU;
641 if ( style & wxMINIMIZE )
642 msflags |= WS_MINIMIZE;
643 if (style & wxMAXIMIZE)
644 msflags |= WS_MAXIMIZE;
645 if (style & wxCAPTION)
646 msflags |= WS_CAPTION;
647 if (style & wxCLIP_CHILDREN)
648 msflags |= WS_CLIPCHILDREN;
649
650 // Keep this in wxFrame because it saves recoding this function
651 // in wxTinyFrame
652 #if wxUSE_ITSY_BITSY && !defined(__WIN32__)
653 if (style & wxTINY_CAPTION_VERT)
654 msflags |= IBS_VERTCAPTION;
655 if (style & wxTINY_CAPTION_HORIZ)
656 msflags |= IBS_HORZCAPTION;
657 #else
658 if (style & wxTINY_CAPTION_VERT)
659 msflags |= WS_CAPTION;
660 if (style & wxTINY_CAPTION_HORIZ)
661 msflags |= WS_CAPTION;
662 #endif
663 if ((style & wxTHICK_FRAME) == 0)
664 msflags |= WS_BORDER;
665
666 WXDWORD extendedStyle = MakeExtendedStyle(style);
667
668 // make all frames appear in the win9x shell taskbar unless
669 // wxFRAME_TOOL_WINDOW or wxFRAME_NO_TASKBAR is given - without giving them
670 // WS_EX_APPWINDOW style, the child (i.e. owned) frames wouldn't appear in it
671 #if !defined(__WIN16__) && !defined(__SC__)
672 if ( style & wxFRAME_TOOL_WINDOW )
673 extendedStyle |= WS_EX_TOOLWINDOW;
674 else if ( !(style & wxFRAME_NO_TASKBAR) )
675 extendedStyle |= WS_EX_APPWINDOW;
676 #endif
677
678 if (style & wxSTAY_ON_TOP)
679 extendedStyle |= WS_EX_TOPMOST;
680
681 #ifndef __WIN16__
682 if (m_exStyle & wxFRAME_EX_CONTEXTHELP)
683 extendedStyle |= WS_EX_CONTEXTHELP;
684 #endif
685
686 m_iconized = FALSE;
687 if ( !wxWindow::MSWCreate(id, parent, wclass, wx_win, title, x, y, width, height,
688 msflags, NULL, extendedStyle) )
689 return FALSE;
690
691 // Seems to be necessary if we use WS_POPUP
692 // style instead of WS_OVERLAPPED
693 if (width > -1 && height > -1)
694 ::PostMessage(GetHwnd(), WM_SIZE, SIZE_RESTORED, MAKELPARAM(width, height));
695
696 return TRUE;
697 }
698
699 // Default activation behaviour - set the focus for the first child
700 // subwindow found.
701 void wxFrame::OnActivate(wxActivateEvent& event)
702 {
703 if ( event.GetActive() )
704 {
705 // restore focus to the child which was last focused
706 wxLogTrace(_T("focus"), _T("wxFrame %08x activated."), m_hWnd);
707
708 wxSetFocusToChild(this, &m_winLastFocused);
709 }
710 else
711 {
712 // remember the last focused child
713 m_winLastFocused = FindFocus();
714 while ( m_winLastFocused )
715 {
716 if ( GetChildren().Find(m_winLastFocused) )
717 break;
718
719 m_winLastFocused = m_winLastFocused->GetParent();
720 }
721
722 wxLogTrace(_T("focus"),
723 _T("wxFrame %08x deactivated, last focused: %08x."),
724 m_hWnd,
725 m_winLastFocused ? GetHwndOf(m_winLastFocused)
726 : NULL);
727
728 event.Skip();
729 }
730 }
731
732 // ----------------------------------------------------------------------------
733 // tool/status bar stuff
734 // ----------------------------------------------------------------------------
735
736 #if wxUSE_TOOLBAR
737
738 wxToolBar* wxFrame::CreateToolBar(long style, wxWindowID id, const wxString& name)
739 {
740 if ( wxFrameBase::CreateToolBar(style, id, name) )
741 {
742 PositionToolBar();
743 }
744
745 return m_frameToolBar;
746 }
747
748 void wxFrame::PositionToolBar()
749 {
750 RECT rect;
751 ::GetClientRect(GetHwnd(), &rect);
752
753 #if wxUSE_STATUSBAR
754 if ( GetStatusBar() )
755 {
756 int statusX, statusY;
757 GetStatusBar()->GetClientSize(&statusX, &statusY);
758 rect.bottom -= statusY;
759 }
760 #endif // wxUSE_STATUSBAR
761
762 if ( GetToolBar() && GetToolBar()->IsShown() )
763 {
764 int tw, th;
765 GetToolBar()->GetSize(&tw, &th);
766
767 if ( GetToolBar()->GetWindowStyleFlag() & wxTB_VERTICAL )
768 {
769 th = rect.bottom;
770 }
771 else
772 {
773 tw = rect.right;
774 }
775
776 // Use the 'real' MSW position here
777 GetToolBar()->SetSize(0, 0, tw, th, wxSIZE_NO_ADJUSTMENTS);
778 }
779 }
780 #endif // wxUSE_TOOLBAR
781
782 // ----------------------------------------------------------------------------
783 // frame state (iconized/maximized/...)
784 // ----------------------------------------------------------------------------
785
786 // propagate our state change to all child frames: this allows us to emulate X
787 // Windows behaviour where child frames float independently of the parent one
788 // on the desktop, but are iconized/restored with it
789 void wxFrame::IconizeChildFrames(bool bIconize)
790 {
791 for ( wxWindowList::Node *node = GetChildren().GetFirst();
792 node;
793 node = node->GetNext() )
794 {
795 wxWindow *win = node->GetData();
796
797 // iconizing the frames with this style under Win95 shell puts them at
798 // the bottom of the screen (as the MDI children) instead of making
799 // them appear in the taskbar because they are, by virtue of this
800 // style, not managed by the taskbar - instead leave Windows take care
801 // of them
802 #ifdef __WIN95__
803 if ( win->GetWindowStyle() & wxFRAME_TOOL_WINDOW )
804 continue;
805 #endif // Win95
806
807 // the child MDI frames are a special case and should not be touched by
808 // the parent frame - instead, they are managed by the user
809 wxFrame *frame = wxDynamicCast(win, wxFrame);
810 if ( frame && !wxDynamicCast(frame, wxMDIChildFrame) )
811 {
812 frame->Iconize(bIconize);
813 }
814 }
815 }
816
817 // ===========================================================================
818 // message processing
819 // ===========================================================================
820
821 // ---------------------------------------------------------------------------
822 // preprocessing
823 // ---------------------------------------------------------------------------
824
825 bool wxFrame::MSWTranslateMessage(WXMSG* pMsg)
826 {
827 if ( wxWindow::MSWTranslateMessage(pMsg) )
828 return TRUE;
829
830 // try the menu bar accels
831 wxMenuBar *menuBar = GetMenuBar();
832 if ( !menuBar )
833 return FALSE;
834
835 const wxAcceleratorTable& acceleratorTable = menuBar->GetAccelTable();
836 return acceleratorTable.Translate(this, pMsg);
837 }
838
839 // ---------------------------------------------------------------------------
840 // our private (non virtual) message handlers
841 // ---------------------------------------------------------------------------
842
843 bool wxFrame::HandlePaint()
844 {
845 RECT rect;
846 if ( GetUpdateRect(GetHwnd(), &rect, FALSE) )
847 {
848 if ( m_iconized )
849 {
850 HICON hIcon = m_icon.Ok() ? GetHiconOf(m_icon)
851 : (HICON)m_defaultIcon;
852
853 // Hold a pointer to the dc so long as the OnPaint() message
854 // is being processed
855 PAINTSTRUCT ps;
856 HDC hdc = ::BeginPaint(GetHwnd(), &ps);
857
858 // Erase background before painting or we get white background
859 MSWDefWindowProc(WM_ICONERASEBKGND, (WORD)(LONG)ps.hdc, 0L);
860
861 if ( hIcon )
862 {
863 RECT rect;
864 ::GetClientRect(GetHwnd(), &rect);
865
866 // FIXME: why hardcoded?
867 static const int icon_width = 32;
868 static const int icon_height = 32;
869
870 int icon_x = (int)((rect.right - icon_width)/2);
871 int icon_y = (int)((rect.bottom - icon_height)/2);
872
873 ::DrawIcon(hdc, icon_x, icon_y, hIcon);
874 }
875
876 ::EndPaint(GetHwnd(), &ps);
877
878 return TRUE;
879 }
880 else
881 {
882 return wxWindow::HandlePaint();
883 }
884 }
885 else
886 {
887 // nothing to paint - processed
888 return TRUE;
889 }
890 }
891
892 bool wxFrame::HandleSize(int x, int y, WXUINT id)
893 {
894 bool processed = FALSE;
895
896 switch ( id )
897 {
898 case SIZENORMAL:
899 // only do it it if we were iconized before, otherwise resizing the
900 // parent frame has a curious side effect of bringing it under it's
901 // children
902 if ( !m_iconized )
903 break;
904
905 // restore all child frames too
906 IconizeChildFrames(FALSE);
907
908 // fall through
909
910 case SIZEFULLSCREEN:
911 m_iconized = FALSE;
912 break;
913
914 case SIZEICONIC:
915 // iconize all child frames too
916 IconizeChildFrames(TRUE);
917
918 m_iconized = TRUE;
919 break;
920 }
921
922 if ( !m_iconized )
923 {
924 PositionStatusBar();
925 PositionToolBar();
926
927 wxSizeEvent event(wxSize(x, y), m_windowId);
928 event.SetEventObject( this );
929 processed = GetEventHandler()->ProcessEvent(event);
930 }
931
932 return processed;
933 }
934
935 bool wxFrame::HandleCommand(WXWORD id, WXWORD cmd, WXHWND control)
936 {
937 if ( control )
938 {
939 // In case it's e.g. a toolbar.
940 wxWindow *win = wxFindWinFromHandle(control);
941 if ( win )
942 return win->MSWCommand(cmd, id);
943 }
944
945 // handle here commands from menus and accelerators
946 if ( cmd == 0 || cmd == 1 )
947 {
948 if ( wxCurrentPopupMenu )
949 {
950 wxMenu *popupMenu = wxCurrentPopupMenu;
951 wxCurrentPopupMenu = NULL;
952
953 return popupMenu->MSWCommand(cmd, id);
954 }
955
956 if ( ProcessCommand(id) )
957 {
958 return TRUE;
959 }
960 }
961
962 return FALSE;
963 }
964
965 bool wxFrame::HandleMenuSelect(WXWORD nItem, WXWORD flags, WXHMENU hMenu)
966 {
967 int item;
968 if ( flags == 0xFFFF && hMenu == 0 )
969 {
970 // menu was removed from screen
971 item = -1;
972 }
973 else if ( !(flags & MF_POPUP) && !(flags & MF_SEPARATOR) )
974 {
975 item = nItem;
976 }
977 else
978 {
979 // don't give hints for separators (doesn't make sense) nor for the
980 // items opening popup menus (they don't have them anyhow) but do clear
981 // the status line - otherwise, we would be left with the help message
982 // for the previous item which doesn't apply any more
983 wxStatusBar *statbar = GetStatusBar();
984 if ( statbar )
985 {
986 statbar->SetStatusText(wxEmptyString);
987 }
988
989 return FALSE;
990 }
991
992 wxMenuEvent event(wxEVT_MENU_HIGHLIGHT, item);
993 event.SetEventObject( this );
994
995 return GetEventHandler()->ProcessEvent(event);
996 }
997
998 // ---------------------------------------------------------------------------
999 // the window proc for wxFrame
1000 // ---------------------------------------------------------------------------
1001
1002 long wxFrame::MSWWindowProc(WXUINT message, WXWPARAM wParam, WXLPARAM lParam)
1003 {
1004 long rc = 0;
1005 bool processed = FALSE;
1006
1007 switch ( message )
1008 {
1009 case WM_CLOSE:
1010 // if we can't close, tell the system that we processed the
1011 // message - otherwise it would close us
1012 processed = !Close();
1013 break;
1014
1015 case WM_COMMAND:
1016 {
1017 WORD id, cmd;
1018 WXHWND hwnd;
1019 UnpackCommand((WXWPARAM)wParam, (WXLPARAM)lParam,
1020 &id, &hwnd, &cmd);
1021
1022 processed = HandleCommand(id, cmd, (WXHWND)hwnd);
1023 }
1024 break;
1025
1026 case WM_MENUSELECT:
1027 {
1028 WXWORD item, flags;
1029 WXHMENU hmenu;
1030 UnpackMenuSelect(wParam, lParam, &item, &flags, &hmenu);
1031
1032 processed = HandleMenuSelect(item, flags, hmenu);
1033 }
1034 break;
1035
1036 case WM_PAINT:
1037 processed = HandlePaint();
1038 break;
1039
1040 case WM_QUERYDRAGICON:
1041 {
1042 HICON hIcon = m_icon.Ok() ? GetHiconOf(m_icon)
1043 : (HICON)(m_defaultIcon);
1044 rc = (long)hIcon;
1045 processed = rc != 0;
1046 }
1047 break;
1048
1049 case WM_SIZE:
1050 processed = HandleSize(LOWORD(lParam), HIWORD(lParam), wParam);
1051 break;
1052 }
1053
1054 if ( !processed )
1055 rc = wxWindow::MSWWindowProc(message, wParam, lParam);
1056
1057 return rc;
1058 }
1059