]>
Commit | Line | Data |
---|---|---|
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 unwieldy, 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 |