]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/xrc/xh_html.cpp
Don't do the wx cleanup if wxPython didn't do the initialization.
[wxWidgets.git] / src / xrc / xh_html.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: xh_html.cpp
3// Purpose: XRC resource for wxHtmlWindow
4// Author: Bob Mitchell
5// Created: 2000/03/21
6// RCS-ID: $Id$
7// Copyright: (c) 2000 Bob Mitchell and Verant Interactive
8// Licence: wxWindows licence
9/////////////////////////////////////////////////////////////////////////////
10
11#ifdef __GNUG__
12#pragma implementation "xh_html.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_html.h"
23
24#if wxUSE_HTML
25
26#include "wx/html/htmlwin.h"
27#include "wx/filesys.h"
28
29
30wxHtmlWindowXmlHandler::wxHtmlWindowXmlHandler()
31: wxXmlResourceHandler()
32{
33 XRC_ADD_STYLE(wxHW_SCROLLBAR_NEVER);
34 XRC_ADD_STYLE(wxHW_SCROLLBAR_AUTO);
35 AddWindowStyles();
36}
37
38wxObject *wxHtmlWindowXmlHandler::DoCreateResource()
39{
40 XRC_MAKE_INSTANCE(control, wxHtmlWindow)
41
42 control->Create(m_parentAsWindow,
43 GetID(),
44 GetPosition(), GetSize(),
45 GetStyle(wxT("style"), wxHW_SCROLLBAR_AUTO),
46 GetName());
47
48 if (HasParam(wxT("borders")))
49 {
50 control->SetBorders(GetDimension(wxT("borders")));
51 }
52
53 if (HasParam(wxT("url")))
54 {
55 wxString url = GetParamValue(wxT("url"));
56 wxFileSystem& fsys = GetCurFileSystem();
57
58 wxFSFile *f = fsys.OpenFile(url);
59 if (f)
60 {
61 control->LoadPage(f->GetLocation());
62 delete f;
63 }
64 else
65 control->LoadPage(url);
66 }
67
68 else if (HasParam(wxT("htmlcode")))
69 {
70 control->SetPage(GetText(wxT("htmlcode")));
71 }
72
73 SetupWindow(control);
74
75 return control;
76}
77
78bool wxHtmlWindowXmlHandler::CanHandle(wxXmlNode *node)
79{
80 return IsOfClass(node, wxT("wxHtmlWindow"));
81}
82
83#endif // wxUSE_HTML