]> git.saurik.com Git - wxWidgets.git/blob - src/xrc/xh_slidr.cpp
centralized the handling of border styles; added borders support for wxListBox and...
[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 // For compilers that support precompilation, includes "wx.h".
12 #include "wx/wxprec.h"
13
14 #ifdef __BORLANDC__
15 #pragma hdrstop
16 #endif
17
18 #if wxUSE_XRC && wxUSE_SLIDER
19
20 #include "wx/xrc/xh_slidr.h"
21 #include "wx/slider.h"
22
23 IMPLEMENT_DYNAMIC_CLASS(wxSliderXmlHandler, wxXmlResourceHandler)
24
25 wxSliderXmlHandler::wxSliderXmlHandler()
26 : wxXmlResourceHandler()
27 {
28 XRC_ADD_STYLE(wxSL_HORIZONTAL);
29 XRC_ADD_STYLE(wxSL_VERTICAL);
30 XRC_ADD_STYLE(wxSL_AUTOTICKS);
31 XRC_ADD_STYLE(wxSL_LABELS);
32 XRC_ADD_STYLE(wxSL_LEFT);
33 XRC_ADD_STYLE(wxSL_TOP);
34 XRC_ADD_STYLE(wxSL_RIGHT);
35 XRC_ADD_STYLE(wxSL_BOTTOM);
36 XRC_ADD_STYLE(wxSL_BOTH);
37 XRC_ADD_STYLE(wxSL_SELRANGE);
38 XRC_ADD_STYLE(wxSL_INVERSE);
39 AddWindowStyles();
40 }
41
42 wxObject *wxSliderXmlHandler::DoCreateResource()
43 {
44 XRC_MAKE_INSTANCE(control, wxSlider)
45
46 control->Create(m_parentAsWindow,
47 GetID(),
48 GetLong(wxT("value"), wxSL_DEFAULT_VALUE),
49 GetLong(wxT("min"), wxSL_DEFAULT_MIN),
50 GetLong(wxT("max"), wxSL_DEFAULT_MAX),
51 GetPosition(), GetSize(),
52 GetStyle(),
53 wxDefaultValidator,
54 GetName());
55
56 if( HasParam(wxT("tickfreq")))
57 {
58 control->SetTickFreq(GetLong(wxT("tickfreq")), 0);
59 }
60 if( HasParam(wxT("pagesize")))
61 {
62 control->SetPageSize(GetLong(wxT("pagesize")));
63 }
64 if( HasParam(wxT("linesize")))
65 {
66 control->SetLineSize(GetLong(wxT("linesize")));
67 }
68 if( HasParam(wxT("thumb")))
69 {
70 control->SetThumbLength(GetLong(wxT("thumb")));
71 }
72 if( HasParam(wxT("tick")))
73 {
74 control->SetTick(GetLong(wxT("tick")));
75 }
76 if( HasParam(wxT("selmin")) && HasParam(wxT("selmax")))
77 {
78 control->SetSelection(GetLong(wxT("selmin")), GetLong(wxT("selmax")));
79 }
80
81 SetupWindow(control);
82
83 return control;
84 }
85
86 bool wxSliderXmlHandler::CanHandle(wxXmlNode *node)
87 {
88 return IsOfClass(node, wxT("wxSlider"));
89 }
90
91 #endif // wxUSE_XRC && wxUSE_SLIDER