]> git.saurik.com Git - wxWidgets.git/blob - src/xrc/xh_frame.cpp
fix bug in Borland (bcc32 really hates ?)
[wxWidgets.git] / src / xrc / xh_frame.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: xh_frame.cpp
3 // Purpose: XRC resource for dialogs
4 // Author: Vaclav Slavik & Aleks.
5 // Created: 2000/03/05
6 // RCS-ID: $Id$
7 // Copyright: (c) 2000 Vaclav Slavik
8 // Licence: wxWindows licence
9 /////////////////////////////////////////////////////////////////////////////
10
11 #ifdef __GNUG__
12 #pragma implementation "xh_frame.h"
13 #endif
14
15 // For compilers that support precompilation, includes "wx.h".
16 #include "wx/wxprec.h"
17
18 #ifdef __BORLANDC__
19 #pragma hdrstop
20 #endif
21
22 #include "wx/xrc/xh_frame.h"
23 #include "wx/frame.h"
24 #include "wx/log.h"
25 #include "wx/intl.h"
26
27
28 wxFrameXmlHandler::wxFrameXmlHandler() : wxXmlResourceHandler()
29 {
30 XRC_ADD_STYLE(wxSTAY_ON_TOP);
31 XRC_ADD_STYLE(wxCAPTION);
32 XRC_ADD_STYLE(wxDEFAULT_DIALOG_STYLE);
33 XRC_ADD_STYLE(wxDEFAULT_FRAME_STYLE);
34 XRC_ADD_STYLE(wxTHICK_FRAME);
35 XRC_ADD_STYLE(wxSYSTEM_MENU);
36 XRC_ADD_STYLE(wxRESIZE_BORDER);
37 XRC_ADD_STYLE(wxRESIZE_BOX);
38 XRC_ADD_STYLE(wxCLOSE_BOX);
39
40 XRC_ADD_STYLE(wxFRAME_TOOL_WINDOW);
41 XRC_ADD_STYLE(wxFRAME_FLOAT_ON_PARENT);
42 XRC_ADD_STYLE(wxMAXIMIZE_BOX);
43 XRC_ADD_STYLE(wxMINIMIZE_BOX);
44 XRC_ADD_STYLE(wxSTAY_ON_TOP);
45
46 XRC_ADD_STYLE(wxNO_3D);
47 XRC_ADD_STYLE(wxTAB_TRAVERSAL);
48 XRC_ADD_STYLE(wxWS_EX_VALIDATE_RECURSIVELY);
49 XRC_ADD_STYLE(wxCLIP_CHILDREN);
50
51 AddWindowStyles();
52 }
53
54 wxObject *wxFrameXmlHandler::DoCreateResource()
55 {
56 XRC_MAKE_INSTANCE(frame, wxFrame);
57
58 frame->Create(m_parentAsWindow,
59 GetID(),
60 GetText(wxT("title")),
61 wxDefaultPosition, wxDefaultSize,
62 GetStyle(wxT("style"), wxDEFAULT_FRAME_STYLE),
63 GetName());
64
65 if (HasParam(wxT("size")))
66 frame->SetClientSize(GetSize());
67 if (HasParam(wxT("pos")))
68 frame->Move(GetPosition());
69
70 SetupWindow(frame);
71
72 CreateChildren(frame);
73
74 if (GetBool(wxT("centered"), FALSE))
75 frame->Centre();
76
77 return frame;
78 }
79
80 bool wxFrameXmlHandler::CanHandle(wxXmlNode *node)
81 {
82 return IsOfClass(node, wxT("wxFrame"));
83 }