]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/common/docmdi.cpp
Blob support fixes - still does not work, but getting there
[wxWidgets.git] / src / common / docmdi.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: docmdi.cpp
3// Purpose: Frame classes for MDI document/view applications
4// Author: Julian Smart
5// Modified by:
6// Created: 01/02/97
7// RCS-ID: $Id$
8// Copyright: (c) Julian Smart
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "docmdi.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#if wxUSE_MDI_ARCHITECTURE && wxUSE_DOC_VIEW_ARCHITECTURE
24
25#include "wx/docmdi.h"
26
27/*
28 * Docview MDI parent frame
29 */
30
31IMPLEMENT_CLASS(wxDocMDIParentFrame, wxMDIParentFrame)
32
33BEGIN_EVENT_TABLE(wxDocMDIParentFrame, wxMDIParentFrame)
34 EVT_MENU(wxID_EXIT, wxDocMDIParentFrame::OnExit)
35 EVT_MENU_RANGE(wxID_FILE1, wxID_FILE9, wxDocMDIParentFrame::OnMRUFile)
36 EVT_CLOSE(wxDocMDIParentFrame::OnCloseWindow)
37END_EVENT_TABLE()
38
39wxDocMDIParentFrame::wxDocMDIParentFrame(wxDocManager *manager, wxFrame *frame, wxWindowID id, const wxString& title,
40 const wxPoint& pos, const wxSize& size, long style, const wxString& name):
41 wxMDIParentFrame(frame, id, title, pos, size, style, name)
42{
43 m_docManager = manager;
44}
45
46void wxDocMDIParentFrame::OnExit(wxCommandEvent& WXUNUSED(event))
47{
48 Close();
49}
50
51void wxDocMDIParentFrame::OnMRUFile(wxCommandEvent& event)
52{
53 wxString f(m_docManager->GetHistoryFile(event.GetId() - wxID_FILE1));
54 if (f != wxT(""))
55 (void)m_docManager->CreateDocument(f, wxDOC_SILENT);
56}
57
58// Extend event processing to search the view's event table
59bool wxDocMDIParentFrame::ProcessEvent(wxEvent& event)
60{
61 // Try the document manager, then do default processing
62 if (!m_docManager || !m_docManager->ProcessEvent(event))
63 return wxEvtHandler::ProcessEvent(event);
64 else
65 return TRUE;
66}
67
68void wxDocMDIParentFrame::OnCloseWindow(wxCloseEvent& event)
69{
70 if (m_docManager->Clear(!event.CanVeto()))
71 {
72 this->Destroy();
73 }
74 else
75 event.Veto();
76}
77
78
79/*
80 * Default document child frame for MDI children
81 */
82
83IMPLEMENT_CLASS(wxDocMDIChildFrame, wxMDIChildFrame)
84
85BEGIN_EVENT_TABLE(wxDocMDIChildFrame, wxMDIChildFrame)
86 EVT_ACTIVATE(wxDocMDIChildFrame::OnActivate)
87 EVT_CLOSE(wxDocMDIChildFrame::OnCloseWindow)
88END_EVENT_TABLE()
89
90wxDocMDIChildFrame::wxDocMDIChildFrame(wxDocument *doc, wxView *view, wxMDIParentFrame *frame, wxWindowID id,
91 const wxString& title, const wxPoint& pos, const wxSize& size, long style, const wxString& name):
92 wxMDIChildFrame(frame, id, title, pos, size, style, name)
93{
94 m_childDocument = doc;
95 m_childView = view;
96 if (view)
97 view->SetFrame(this);
98}
99
100wxDocMDIChildFrame::~wxDocMDIChildFrame(void)
101{
102 m_childView = (wxView *) NULL;
103}
104
105// Extend event processing to search the view's event table
106bool wxDocMDIChildFrame::ProcessEvent(wxEvent& event)
107{
108 if ( !m_childView || ! m_childView->ProcessEvent(event) )
109 {
110 // Only hand up to the parent if it's a menu command
111 if (!event.IsKindOf(CLASSINFO(wxCommandEvent)) || !GetParent() || !GetParent()->ProcessEvent(event))
112 return wxEvtHandler::ProcessEvent(event);
113 else
114 return TRUE;
115 }
116 else
117 return TRUE;
118}
119
120void wxDocMDIChildFrame::OnActivate(wxActivateEvent& event)
121{
122 wxMDIChildFrame::OnActivate(event);
123
124 if (event.GetActive() && m_childView)
125 m_childView->Activate(event.GetActive());
126}
127
128void wxDocMDIChildFrame::OnCloseWindow(wxCloseEvent& event)
129{
130 // Close view but don't delete the frame while doing so!
131 // ...since it will be deleted by wxWindows if we return TRUE.
132 if (m_childView)
133 {
134 bool ans = FALSE;
135 if (!event.CanVeto())
136 ans = TRUE; // Must delete.
137 else
138 ans = m_childView->Close(FALSE); // FALSE means don't delete associated window
139
140 if (ans)
141 {
142 m_childView->Activate(FALSE);
143 delete m_childView;
144 m_childView = (wxView *) NULL;
145 m_childDocument = (wxDocument *) NULL;
146
147 this->Destroy();
148 }
149 else
150 event.Veto();
151 }
152 else
153 event.Veto();
154}
155
156#endif
157 // wxUSE_DOC_VIEW_ARCHITECTURE
158