use a programmer-friendly macro for subclassing
[wxWidgets.git] / src / xrc / xh_slidr.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: xh_slidr.cpp
3 // Purpose: XRC resource for wxSlider
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_slidr.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_slidr.h"
23 #include "wx/slider.h"
24
25 #if wxUSE_SLIDER
26
27 wxSliderXmlHandler::wxSliderXmlHandler()
28 : wxXmlResourceHandler()
29 {
30 XRC_ADD_STYLE(wxSL_HORIZONTAL);
31 XRC_ADD_STYLE(wxSL_VERTICAL);
32 XRC_ADD_STYLE(wxSL_AUTOTICKS);
33 XRC_ADD_STYLE(wxSL_LABELS);
34 XRC_ADD_STYLE(wxSL_LEFT);
35 XRC_ADD_STYLE(wxSL_TOP);
36 XRC_ADD_STYLE(wxSL_RIGHT);
37 XRC_ADD_STYLE(wxSL_BOTTOM);
38 XRC_ADD_STYLE(wxSL_BOTH);
39 XRC_ADD_STYLE(wxSL_SELRANGE);
40 AddWindowStyles();
41 }
42
43 wxObject *wxSliderXmlHandler::DoCreateResource()
44 {
45 XRC_MAKE_INSTANCE(control, wxSlider)
46
47 control->Create(m_parentAsWindow,
48 GetID(),
49 GetLong(wxT("value"), wxSL_DEFAULT_VALUE),
50 GetLong(wxT("min"), wxSL_DEFAULT_MIN),
51 GetLong(wxT("max"), wxSL_DEFAULT_MAX),
52 GetPosition(), GetSize(),
53 GetStyle(),
54 wxDefaultValidator,
55 GetName());
56
57 if( HasParam(wxT("tickfreq")))
58 {
59 control->SetTickFreq(GetLong(wxT("tickfreq")), 0);
60 }
61 if( HasParam(wxT("pagesize")))
62 {
63 control->SetPageSize(GetLong(wxT("pagesize")));
64 }
65 if( HasParam(wxT("linesize")))
66 {
67 control->SetLineSize(GetLong(wxT("linesize")));
68 }
69 if( HasParam(wxT("thumb")))
70 {
71 control->SetThumbLength(GetLong(wxT("thumb")));
72 }
73 if( HasParam(wxT("tick")))
74 {
75 control->SetTick(GetLong(wxT("tick")));
76 }
77 if( HasParam(wxT("selmin")) && HasParam(wxT("selmax")))
78 {
79 control->SetSelection(GetLong(wxT("selmin")), GetLong(wxT("selmax")));
80 }
81
82 SetupWindow(control);
83
84 return control;
85 }
86
87 bool wxSliderXmlHandler::CanHandle(wxXmlNode *node)
88 {
89 return IsOfClass(node, wxT("wxSlider"));
90 }
91
92 #endif