Ran make -f build/autogen.mk
[wxWidgets.git] / samples / mfc / mfctest.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: mfctest.cpp
3 // Purpose: Sample to demonstrate mixing MFC and wxWidgets code
4 // Author: Julian Smart
5 // Id: $Id$
6 // Copyright: (c) Julian Smart
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
9
10 // This sample pops up an initial wxWidgets frame, with a menu item
11 // that allows a new MFC window to be created. Note that CDummyWindow
12 // is a class that allows a wxWidgets window to be seen as a CWnd
13 // for the purposes of specifying a valid main window to the
14 // MFC initialisation.
15 //
16 // You can easily modify this code so that an MFC window pops up
17 // initially as the main frame, and allows wxWidgets frames to be
18 // created subsequently.
19 //
20 // (1) Make MyApp::OnInit not create a main window.
21 // (2) Make MFC's InitInstance create a main window, and remove
22 // creation of CDummyWindow.
23 //
24 // This can be accomplished by setting START_WITH_MFC_WINDOW to 1 below.
25
26 #define START_WITH_MFC_WINDOW 0
27
28 //
29 // IMPORTANT NOTES:
30 //
31 // (1) You may need to set wxUSE_MFC to 1 in include/wx/msw/setup.h but
32 // normally this shouldn't be needed any longer, i.e. it works without
33 // it for me (VZ)
34 //
35 // (2) You should link with MFC DLL, not static libraries: or, to use static
36 // run-time libraries, use this command for both building wxWidgets and
37 // the sample:
38 //
39 // nmake -f makefile.vc BUILD=debug SHARED=0 DEBUG_RUNTIME_LIBS=0 RUNTIME_LIBS=static all
40 //
41 // Unless the run-time library settings match for wxWidgets and MFC, you will get
42 // link errors for symbols such as __mbctype, __argc, and __argv
43
44 #include "stdafx.h"
45
46 // For compilers that support precompilation, includes "wx/wx.h".
47 #include "wx/wxprec.h"
48
49 #ifdef __BORLANDC__
50 #pragma hdrstop
51 #endif
52
53 #ifndef WX_PRECOMP
54 #include "wx/wx.h"
55 #endif
56
57 #include "wx/evtloop.h"
58
59 #include "resource.h"
60
61 #include "mfctest.h"
62
63 /////////////////////////////////////////////////////////////////////////////
64
65 // theApp:
66 // Just creating this application object runs the whole application.
67 //
68 CTheApp theApp;
69
70 // wxWidgets elements
71
72 // Define a new application type
73 class MyApp: public wxApp
74 {
75 public:
76 virtual bool OnInit();
77
78 wxFrame *CreateFrame();
79 };
80
81 class MyCanvas: public wxScrolledWindow
82 {
83 public:
84 MyCanvas(wxWindow *parent, const wxPoint& pos, const wxSize& size);
85 void OnPaint(wxPaintEvent& event);
86 void OnMouseEvent(wxMouseEvent& event);
87 DECLARE_EVENT_TABLE()
88 };
89
90 class MyChild: public wxFrame
91 {
92 public:
93 MyChild(wxFrame *frame, const wxString& title, const wxPoint& pos, const wxSize& size, const long style);
94 virtual ~MyChild();
95
96 void OnQuit(wxCommandEvent& event);
97 void OnNew(wxCommandEvent& event);
98 void OnActivate(wxActivateEvent& event);
99
100 MyCanvas *canvas;
101
102 DECLARE_EVENT_TABLE()
103 };
104
105 // ID for the menu quit command
106 #define HELLO_QUIT 1
107 #define HELLO_NEW 2
108
109 DECLARE_APP(MyApp)
110
111 // notice use of IMPLEMENT_APP_NO_MAIN() instead of the usual IMPLEMENT_APP!
112 IMPLEMENT_APP_NO_MAIN(MyApp)
113
114 CMainWindow::CMainWindow()
115 {
116 LoadAccelTable( "MainAccelTable" );
117 Create( NULL, "Hello Foundation Application",
118 WS_OVERLAPPEDWINDOW, rectDefault, NULL, "MainMenu" );
119 }
120
121 void CMainWindow::OnPaint()
122 {
123 CString s = "Hello, Windows!";
124 CPaintDC dc( this );
125 CRect rect;
126
127 GetClientRect( rect );
128 dc.SetTextAlign( TA_BASELINE | TA_CENTER );
129 dc.SetTextColor( ::GetSysColor( COLOR_WINDOWTEXT ) );
130 dc.SetBkMode(TRANSPARENT);
131 dc.TextOut( ( rect.right / 2 ), ( rect.bottom / 2 ),
132 s, s.GetLength() );
133 }
134
135 void CMainWindow::OnAbout()
136 {
137 CDialog about( "AboutBox", this );
138 about.DoModal();
139 }
140
141 void CMainWindow::OnTest()
142 {
143 wxMessageBox("This is a wxWidgets message box.\nWe're about to create a new wxWidgets frame.", "wxWidgets", wxOK);
144 wxGetApp().CreateFrame();
145 }
146
147 // CMainWindow message map:
148 // Associate messages with member functions.
149 //
150 // It is implied that the ON_WM_PAINT macro expects a member function
151 // "void OnPaint()".
152 //
153 // It is implied that members connected with the ON_COMMAND macro
154 // receive no arguments and are void of return type, e.g., "void OnAbout()".
155 //
156 BEGIN_MESSAGE_MAP( CMainWindow, CFrameWnd )
157 //{{AFX_MSG_MAP( CMainWindow )
158 ON_WM_PAINT()
159 ON_COMMAND( IDM_ABOUT, OnAbout )
160 ON_COMMAND( IDM_TEST, OnTest )
161 //}}AFX_MSG_MAP
162 END_MESSAGE_MAP()
163
164 BOOL CTheApp::InitInstance()
165 {
166 if ( !CWinApp::InitInstance() )
167 return FALSE;
168
169 // TODO: cmd line parsing
170 WXDLLIMPEXP_BASE void wxSetInstance(HINSTANCE hInst);
171 wxSetInstance(m_hInstance);
172 wxApp::m_nCmdShow = m_nCmdShow;
173 int argc = 0;
174 char **argv = NULL;
175 wxEntryStart(argc, argv);
176 if ( !wxTheApp || !wxTheApp->CallOnInit() )
177 return FALSE;
178
179 #if START_WITH_MFC_WINDOW
180 // Demonstrate creation of an initial MFC main window.
181 m_pMainWnd = new CMainWindow();
182 m_pMainWnd->ShowWindow( m_nCmdShow );
183 m_pMainWnd->UpdateWindow();
184 #else
185 // Demonstrate creation of an initial wxWidgets main window.
186 // Wrap wxWidgets window in a dummy MFC window and
187 // make the main window.
188 if (wxTheApp && wxTheApp->GetTopWindow())
189 {
190 m_pMainWnd = new CDummyWindow((HWND) wxTheApp->GetTopWindow()->GetHWND());
191 }
192 #endif
193
194 return TRUE;
195 }
196
197 int CTheApp::ExitInstance()
198 {
199 #if !START_WITH_MFC_WINDOW
200 delete m_pMainWnd;
201 #endif
202
203 if ( wxTheApp )
204 wxTheApp->OnExit();
205 wxEntryCleanup();
206
207 return CWinApp::ExitInstance();
208 }
209
210 // Override this to provide wxWidgets message loop compatibility
211 BOOL CTheApp::PreTranslateMessage(MSG *msg)
212 {
213 wxEventLoop *evtLoop = wxEventLoop::GetActive();
214 if ( evtLoop && evtLoop->PreProcessMessage(msg) )
215 return TRUE;
216
217 return CWinApp::PreTranslateMessage(msg);
218 }
219
220 BOOL CTheApp::OnIdle(LONG WXUNUSED(lCount))
221 {
222 return wxTheApp && wxTheApp->ProcessIdle();
223 }
224
225 /*********************************************************************
226 * wxWidgets elements
227 ********************************************************************/
228
229 bool MyApp::OnInit()
230 {
231 #if !START_WITH_MFC_WINDOW
232
233 // Exit app when the top level frame is deleted
234 SetExitOnFrameDelete(TRUE);
235
236 (void) CreateFrame();
237 #endif
238
239 return TRUE;
240 }
241
242 wxFrame *MyApp::CreateFrame()
243 {
244 MyChild *subframe = new MyChild(NULL, "Canvas Frame", wxPoint(10, 10), wxSize(300, 300),
245 wxDEFAULT_FRAME_STYLE);
246
247 subframe->SetTitle("wxWidgets canvas frame");
248
249 // Give it a status line
250 subframe->CreateStatusBar();
251
252 // Make a menubar
253 wxMenu *file_menu = new wxMenu;
254
255 file_menu->Append(HELLO_NEW, "&New MFC Window");
256 file_menu->Append(HELLO_QUIT, "&Close");
257
258 wxMenuBar *menu_bar = new wxMenuBar;
259
260 menu_bar->Append(file_menu, "&File");
261
262 // Associate the menu bar with the frame
263 subframe->SetMenuBar(menu_bar);
264
265 int width, height;
266 subframe->GetClientSize(&width, &height);
267
268 MyCanvas *canvas = new MyCanvas(subframe, wxPoint(0, 0), wxSize(width, height));
269 canvas->SetCursor(wxCursor(wxCURSOR_PENCIL));
270 subframe->canvas = canvas;
271 subframe->Show(TRUE);
272
273 // Return the main frame window
274 return subframe;
275 }
276
277 BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
278 EVT_PAINT(MyCanvas::OnPaint)
279 EVT_MOUSE_EVENTS(MyCanvas::OnMouseEvent)
280 END_EVENT_TABLE()
281
282 // Define a constructor for my canvas
283 MyCanvas::MyCanvas(wxWindow *parent, const wxPoint& pos, const wxSize& size)
284 : wxScrolledWindow(parent, -1, pos, size)
285 {
286 }
287
288 // Define the repainting behaviour
289 void MyCanvas::OnPaint(wxPaintEvent& WXUNUSED(event))
290 {
291 wxPaintDC dc(this);
292
293 dc.SetFont(* wxSWISS_FONT);
294 dc.SetPen(* wxGREEN_PEN);
295 dc.DrawLine(0, 0, 200, 200);
296 dc.DrawLine(200, 0, 0, 200);
297
298 dc.SetBrush(* wxCYAN_BRUSH);
299 dc.SetPen(* wxRED_PEN);
300 dc.DrawRectangle(100, 100, 100, 50);
301 dc.DrawRoundedRectangle(150, 150, 100, 50, 20);
302
303 dc.DrawEllipse(250, 250, 100, 50);
304 dc.DrawLine(50, 230, 200, 230);
305 dc.DrawText("This is a test string", 50, 230);
306 }
307
308 // This implements a tiny doodling program! Drag the mouse using
309 // the left button.
310 void MyCanvas::OnMouseEvent(wxMouseEvent& event)
311 {
312 static long s_xpos = -1;
313 static long s_ypos = -1;
314
315 wxClientDC dc(this);
316 dc.SetPen(* wxBLACK_PEN);
317 wxPoint pos = event.GetPosition();
318 if (s_xpos > -1 && s_ypos > -1 && event.Dragging())
319 {
320 dc.DrawLine(s_xpos, s_ypos, pos.x, pos.y);
321 }
322
323 s_xpos = pos.x;
324 s_ypos = pos.y;
325 }
326
327 BEGIN_EVENT_TABLE(MyChild, wxFrame)
328 EVT_MENU(HELLO_QUIT, MyChild::OnQuit)
329 EVT_MENU(HELLO_NEW, MyChild::OnNew)
330 EVT_ACTIVATE(MyChild::OnActivate)
331 END_EVENT_TABLE()
332
333 MyChild::MyChild(wxFrame *frame, const wxString& title, const wxPoint& pos, const wxSize& size, const long style)
334 : wxFrame(frame, -1, title, pos, size, style)
335 {
336 canvas = NULL;
337 }
338
339 MyChild::~MyChild()
340 {
341 if ( IsLastBeforeExit() )
342 PostQuitMessage(0);
343 }
344
345 void MyChild::OnQuit(wxCommandEvent& WXUNUSED(event))
346 {
347 Close(TRUE);
348 }
349
350 void MyChild::OnNew(wxCommandEvent& WXUNUSED(event))
351 {
352 CMainWindow *mainWin = new CMainWindow();
353 mainWin->ShowWindow( TRUE );
354 mainWin->UpdateWindow();
355 }
356
357 void MyChild::OnActivate(wxActivateEvent& event)
358 {
359 if (event.GetActive() && canvas)
360 canvas->SetFocus();
361 }
362
363 // Dummy MFC window for specifying a valid main window to MFC, using
364 // a wxWidgets HWND.
365 CDummyWindow::CDummyWindow(HWND hWnd)
366 {
367 Attach(hWnd);
368 }
369
370 // Don't let the CWnd destructor delete the HWND
371 CDummyWindow::~CDummyWindow()
372 {
373 Detach();
374 }
375