]> git.saurik.com Git - wxWidgets.git/blob - src/osx/carbon/slider.cpp
new file added
[wxWidgets.git] / src / osx / carbon / slider.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/osx/carbon/slider.cpp
3 // Purpose: wxSlider
4 // Author: Stefan Csomor
5 // Modified by:
6 // Created: 1998-01-01
7 // RCS-ID: $Id$
8 // Copyright: (c) Stefan Csomor
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 #include "wx/wxprec.h"
13
14 #if wxUSE_SLIDER
15
16 #include "wx/slider.h"
17 #include "wx/osx/private.h"
18
19 class wxMacSliderCarbonControl : public wxMacControl
20 {
21 public :
22 wxMacSliderCarbonControl( wxWindowMac* peer ) : wxMacControl( peer )
23 {
24 }
25
26 // work around an OSX bug : if the control is having the keyboard focus it cannot
27 // be set to the full max/min values by dragging
28 virtual bool CanFocus() const
29 {
30 return false;
31 }
32 };
33
34
35 wxWidgetImplType* wxWidgetImpl::CreateSlider( wxWindowMac* wxpeer,
36 wxWindowMac* parent,
37 wxWindowID WXUNUSED(id),
38 wxInt32 value,
39 wxInt32 minimum,
40 wxInt32 maximum,
41 const wxPoint& pos,
42 const wxSize& size,
43 long style,
44 long WXUNUSED(extraStyle))
45 {
46 Rect bounds = wxMacGetBoundsForControl( wxpeer, pos, size );
47 int tickMarks = 0;
48 if ( style & wxSL_AUTOTICKS )
49 tickMarks = (maximum - minimum) + 1; // +1 for the 0 value
50
51 // keep the number of tickmarks from becoming unwieldly, therefore below it is ok to cast
52 // it to a UInt16
53 while (tickMarks > 20)
54 tickMarks /= 5;
55
56
57 wxMacControl* peer = new wxMacSliderCarbonControl( wxpeer );
58 OSStatus err = CreateSliderControl(
59 MAC_WXHWND(parent->MacGetTopLevelWindowRef()), &bounds,
60 value, minimum, maximum,
61 kControlSliderPointsDownOrRight,
62 (UInt16) tickMarks, true /* liveTracking */,
63 GetwxMacLiveScrollbarActionProc(),
64 peer->GetControlRefAddr() );
65 verify_noerr( err );
66
67 return peer;
68 }
69
70 #endif // wxUSE_SLIDER