]> git.saurik.com Git - wxWidgets.git/blobdiff - src/mac/carbon/slider.cpp
switched to MacOS 8.5+ implementation for submenus
[wxWidgets.git] / src / mac / carbon / slider.cpp
index 936ccddb477dfede68c3a6e1bb809583925c08cf..aa4e68609a744ecf0c9fed507c912309db24dc41 100644 (file)
@@ -23,6 +23,20 @@ BEGIN_EVENT_TABLE(wxSlider, wxControl)
 END_EVENT_TABLE()
 #endif
 
+ // The dimensions of the different styles of sliders (From Aqua document)
+ #define wxSLIDER_DIMENSIONACROSS 15
+ #define wxSLIDER_DIMENSIONACROSS_WITHTICKMARKS 24
+ #define wxSLIDER_DIMENSIONACROSS_ARROW 18
+ // Distance between slider and text
+ #define wxSLIDER_BORDERTEXT 5
+ /* NB!  The default orientation for a slider is horizontal however if the user specifies
+  * some slider styles but dosen't specify the orientation we have to assume he wants a
+  * horizontal one.  Therefore in this file when testing for the sliders orientation
+  * vertical is tested for if this is not set then we use the horizontal one
+  * eg.  if(GetWindowStyle() & wxSL_VERTICAL) {}  else { horizontal case }>  
+  */
 
 
 // Slider
@@ -44,92 +58,67 @@ bool wxSlider::Create(wxWindow *parent, wxWindowID id,
            const wxValidator& validator,
            const wxString& name)
 {
-       Rect bounds ;
-       Str255 title ;
-       
-       MacPreControlCreate( parent , id ,  "" , pos , size ,style, validator , name , &bounds , title ) ;
-
-       m_macMinimumStatic = NULL ;
-
-  m_lineSize = 1;
-  m_tickFreq = 0;
-
-  m_rangeMax = maxValue;
-  m_rangeMin = minValue;
-
-  m_pageSize = (int)((maxValue-minValue)/10);
-       if ( m_width == -1 )
-       {
-               m_width = 20 ;
-               if ( style & wxSL_LABELS && style & wxSL_VERTICAL )
-                       m_width += 24 ;
-               bounds.right = bounds.left + m_width ;
-       }
-       if ( m_height == -1 )
-       {
-               m_height = 20 ;
-               if ( style & wxSL_LABELS && style & wxSL_HORIZONTAL )
-                       m_height += 24 ;
-               bounds.bottom = bounds.top + m_height ;
-       }
-       
-       if ( style & wxSL_LABELS && style & wxSL_HORIZONTAL )
-       {
-               bounds.top += 12 ; 
-               bounds.right -= 24 ;
-       }
-                       
-       if ( style & wxSL_LABELS && style & wxSL_VERTICAL )
-       {
-               bounds.left += 24 ;
-               bounds.top += 12 ;
-       }
-                       
-       m_macControl = UMANewControl( parent->GetMacRootWindow() , &bounds , title , true ,  value , minValue , maxValue, 
-                       kControlSliderProc +  kControlSliderLiveFeedback + ( ( style & wxSL_AUTOTICKS ) ? kControlSliderHasTickMarks : 0 ) , (long) this ) ;
-       
-       wxASSERT_MSG( m_macControl != NULL , "No valid mac control" ) ;
-
-       ::SetControlAction( m_macControl , wxMacLiveScrollbarActionUPP ) ;
-
-       MacPostControlCreate() ;
-
-       if ( style & wxSL_LABELS )
-       {
-               if ( style & wxSL_HORIZONTAL )
-               {
-                       wxSize size( 24 , 12 ) ;
-                       wxPoint leftpos( 0 , 0 ) ;
-                       wxPoint rightpos( m_width - 2 * 12 , 0 ) ;
-                       wxPoint valuepos( m_width - 12 , 20 ) ;
-                       wxString valuestring ;
-                       
-                       valuestring.Printf( "%d" , minValue ) ;                         
-                       m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , leftpos , size ) ;
-                       valuestring.Printf( "%d" , maxValue ) ;                         
-                       m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , rightpos , size ) ;
-                       valuestring.Printf( "%d" , value ) ;                            
-                       m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , valuepos , size ) ;
-               }
-               else
-               {
-                       wxSize size( 24 , 12 ) ;
-                       wxPoint toppos( 0 , 12 ) ;
-                       wxPoint bottompos( 0 , m_height - 12 ) ;
-                       wxPoint valuepos( 20 , 0 ) ;
-                       wxString valuestring ;
-                       
-                       valuestring.Printf( "%d" , minValue ) ;                         
-                       m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , bottompos , size ) ;
-                       valuestring.Printf( "%d" , maxValue ) ;                         
-                       m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , toppos , size ) ;
-                       valuestring.Printf( "%d" , value ) ;                            
-                       m_macMinimumStatic = new wxStaticText( this , -1 , valuestring , valuepos , size ) ;
-               }
-       }
-
-  return TRUE;
-
+     Rect bounds ;
+     Str255 title ;
+     SInt16 procID;
+
+     m_macMinimumStatic = NULL ;
+     m_macMaximumStatic = NULL ;
+     m_macValueStatic = NULL ;
+
+
+     m_lineSize = 1;
+     m_tickFreq = 0;
+     m_rangeMax = maxValue;
+     m_rangeMin = minValue;
+     m_pageSize = (int)((maxValue-minValue)/10);
+     MacPreControlCreate( parent, id, "", pos, size, style,
+                          validator, name, &bounds, title );
+     procID = kControlSliderProc + kControlSliderLiveFeedback;
+     if(style & wxSL_AUTOTICKS) {
+         procID += kControlSliderHasTickMarks;
+    }
+  
+
+     m_macControl = ::NewControl( MAC_WXHWND(parent->MacGetRootWindow()), &bounds, title, false,
+                                   value, minValue, maxValue, procID, (long) this);
+     wxASSERT_MSG( (ControlHandle) m_macControl != NULL , "No valid mac control" ) ;
+     ::SetControlAction( (ControlHandle) m_macControl , wxMacLiveScrollbarActionUPP ) ;
+     if(style & wxSL_LABELS)
+     {
+         m_macMinimumStatic = new wxStaticText( this, -1, "" );
+         m_macMaximumStatic = new wxStaticText( this, -1, "" );
+         m_macValueStatic = new wxStaticText( this, -1, "" );
+         SetRange(minValue, maxValue);
+         SetValue(value);
+    }
+  
+     else {
+         m_macMinimumStatic = NULL ;
+         m_macMaximumStatic = NULL ;
+         m_macValueStatic = NULL ;
+     }
+     if(style & wxSL_VERTICAL) {
+         SetSizeHints(10, -1, 10, -1);  // Forces SetSize to use the proper width
+     }
+     else {
+         SetSizeHints(-1, 10, -1, 10);  // Forces SetSize to use the proper height
+     }
+     // NB!  SetSizeHints is overloaded by wxSlider and will substitute 10 with the
+     // proper dimensions, it also means other people cannot bugger the slider with
+     // other values
+     MacPostControlCreate() ;
+     return true;
 }
 
 wxSlider::~wxSlider()
@@ -138,24 +127,37 @@ wxSlider::~wxSlider()
 
 int wxSlider::GetValue() const
 {
-       return GetControlValue( m_macControl) ;
+       return GetControl32BitValue( (ControlHandle) m_macControl) ;
 }
 
 void wxSlider::SetValue(int value)
 {
        wxString valuestring ;
        valuestring.Printf( "%d" , value ) ;    
-       if ( m_macMinimumStatic )                       
-               m_macMinimumStatic->SetLabel( valuestring ) ;
-       SetControlValue( m_macControl , value ) ;
+       if ( m_macValueStatic )
+               m_macValueStatic->SetLabel( valuestring ) ;
+       SetControl32BitValue( (ControlHandle) m_macControl , value ) ;
 }
 
 void wxSlider::SetRange(int minValue, int maxValue)
 {
-    m_rangeMin = minValue;
-    m_rangeMax = maxValue;
+  wxString value;
 
-    // TODO
+  m_rangeMin = minValue;
+  m_rangeMax = maxValue;
+
+  SetControl32BitMinimum( (ControlHandle) m_macControl, m_rangeMin);
+  SetControl32BitMaximum( (ControlHandle) m_macControl, m_rangeMax);
+  
+  if(m_macMinimumStatic) {
+    value.Printf("%d", m_rangeMin);
+    m_macMinimumStatic->SetLabel(value);
+  }
+  if(m_macMaximumStatic) {
+    value.Printf("%d", m_rangeMax);
+    m_macMaximumStatic->SetLabel(value);
+  }
+  SetValue(m_rangeMin);
 }
 
 // For trackbars only
@@ -237,32 +239,186 @@ void wxSlider::Command (wxCommandEvent & event)
   ProcessCommand (event);
 }
 
-bool wxSlider::Show( bool show ) 
+void wxSlider::MacHandleControlClick( WXWidget control , wxInt16 controlpart ) 
 {
-       return wxWindow::Show( show ) ;
-}
-
-void wxSlider::MacHandleControlClick( ControlHandle control , SInt16 controlpart ) 
-{
-       SInt16 value = ::GetControlValue( m_macControl ) ;
+       SInt16 value = ::GetControl32BitValue( (ControlHandle) m_macControl ) ;
        
        SetValue( value ) ;             
        
        wxScrollEvent event(wxEVT_SCROLL_THUMBTRACK, m_windowId);
-       event.SetPosition(GetControlValue( m_macControl) );
+       event.SetPosition(value);
        event.SetEventObject( this );
+       GetEventHandler()->ProcessEvent(event);
 
-#if WXWIN_COMPATIBILITY
+  wxCommandEvent cevent( wxEVT_COMMAND_SLIDER_UPDATED, m_windowId );
+  cevent.SetInt( value );
+  cevent.SetEventObject( this );
 
-    wxEventType oldEvent = event.GetEventType();
-    event.SetEventType( wxEVT_COMMAND_SLIDER_UPDATED );
-    if ( !GetEventHandler()->ProcessEvent(event) )
-    {
-        event.SetEventType( oldEvent );
-        if (!GetParent()->GetEventHandler()->ProcessEvent(event))
-            event.Skip();
-    }
-#else
-       GetEventHandler()->ProcessEvent(event);
-#endif
+  GetEventHandler()->ProcessEvent( cevent );
 }
+
+ /* This is overloaded in wxSlider so that the proper width/height will always be used
+  * for the slider different values would cause redrawing and mouse detection problems */
+ void wxSlider::SetSizeHints( int minW, int minH,
+                              int maxW , int maxH ,
+                              int incW , int incH )
+ {
+     wxSize size = GetBestSize();
+     if(GetWindowStyle() & wxSL_VERTICAL) {
+         wxWindow::SetSizeHints(size.x, minH, size.x, maxH, incW, incH);
+     }
+     else {
+         wxWindow::SetSizeHints(minW, size.y, maxW, size.y, incW, incH);
+     }
+ }
+ wxSize wxSlider::DoGetBestSize() const
+ {
+     wxSize size;
+     int textwidth, textheight;
+     if(GetWindowStyle() & wxSL_LABELS)
+     {
+         wxString text;
+         int ht, wd;
+         // Get maximum text label width and height
+         text.Printf("%d", m_rangeMin);
+         GetTextExtent(text, &textwidth, &textheight);
+         text.Printf("%d", m_rangeMax);
+         GetTextExtent(text, &wd, &ht);
+         if(ht > textheight) {
+             textheight = ht;
+         }
+         if (wd > textwidth) {
+             textwidth = wd;
+         }
+     }
+     if(GetWindowStyle() & wxSL_VERTICAL)
+     {
+         if(GetWindowStyle() & wxSL_AUTOTICKS) {
+             size.x = wxSLIDER_DIMENSIONACROSS_WITHTICKMARKS;
+         }
+         else {
+             size.x = wxSLIDER_DIMENSIONACROSS_ARROW;
+         }
+         if(GetWindowStyle() & wxSL_LABELS) {
+             size.x += textwidth + wxSLIDER_BORDERTEXT;
+         }
+         size.y = 150;
+     }
+     else
+     {
+         if(GetWindowStyle() & wxSL_AUTOTICKS) {
+             size.y = wxSLIDER_DIMENSIONACROSS_WITHTICKMARKS;
+         }
+         else {
+             size.y = wxSLIDER_DIMENSIONACROSS_ARROW;
+         }
+         if(GetWindowStyle() & wxSL_LABELS) {
+             size.y += textheight + wxSLIDER_BORDERTEXT;
+         }
+         size.x = 150;
+     }
+     return size;
+ }
+ void wxSlider::DoSetSize(int x, int y, int width, int height, int sizeFlags)
+ {
+    wxControl::DoSetSize( x, y , width , height ,sizeFlags ) ;
+ }
+ void wxSlider::MacUpdateDimensions() 
+{
+       // actually in the current systems this should never be possible, but later reparenting
+       // may become a reality
+       
+       if ( (ControlHandle) m_macControl == NULL )
+               return ;
+               
+       if ( GetParent() == NULL )
+               return ;
+               
+    WindowRef rootwindow = (WindowRef) MacGetRootWindow() ;
+    if ( rootwindow == NULL )
+       return ;
+       
+     int  xborder, yborder;
+     int  minValWidth, maxValWidth, textwidth, textheight;
+     int  sliderBreadth;
+     xborder = yborder = 0;
+
+     if (GetWindowStyle() & wxSL_LABELS)
+     {
+         wxString text;
+         int ht;
+         // Get maximum text label width and height
+         text.Printf("%d", m_rangeMin);
+         GetTextExtent(text, &minValWidth, &textheight);
+         text.Printf("%d", m_rangeMax);
+         GetTextExtent(text, &maxValWidth, &ht);
+         if(ht > textheight) {
+             textheight = ht;
+         }
+         textwidth = (minValWidth > maxValWidth ? minValWidth : maxValWidth);
+         xborder = textwidth + wxSLIDER_BORDERTEXT;
+         yborder = textheight + wxSLIDER_BORDERTEXT;
+         // Get slider breadth
+         if(GetWindowStyle() & wxSL_AUTOTICKS) {
+             sliderBreadth = wxSLIDER_DIMENSIONACROSS_WITHTICKMARKS;
+         }
+         else {
+             sliderBreadth = wxSLIDER_DIMENSIONACROSS_ARROW;
+         }
+         if(GetWindowStyle() & wxSL_VERTICAL)
+         {
+             m_macMinimumStatic->Move(sliderBreadth + wxSLIDER_BORDERTEXT,
+                                      m_height - yborder - textheight);
+             m_macMaximumStatic->Move(sliderBreadth + wxSLIDER_BORDERTEXT, 0);
+             m_macValueStatic->Move(0, m_height - textheight);
+         }
+         else
+         {
+             m_macMinimumStatic->Move(0, sliderBreadth + wxSLIDER_BORDERTEXT);
+             m_macMaximumStatic->Move(m_width - xborder - maxValWidth / 2,
+                                      sliderBreadth + wxSLIDER_BORDERTEXT);
+             m_macValueStatic->Move(m_width - textwidth, 0);
+         }
+     }
+
+    Rect oldBounds ;       
+    GetControlBounds( (ControlHandle) m_macControl , &oldBounds ) ; 
+    
+    int new_x = m_x + MacGetLeftBorderSize() + m_macHorizontalBorder ;
+    int new_y = m_y + MacGetTopBorderSize() + m_macVerticalBorder ;
+    int new_width = m_width - MacGetLeftBorderSize() - MacGetRightBorderSize() - 2 * m_macHorizontalBorder - xborder ;
+    int new_height = m_height - MacGetTopBorderSize() - MacGetBottomBorderSize() - 2 * m_macVerticalBorder - yborder ;
+    
+    GetParent()->MacWindowToRootWindow( & new_x , & new_y ) ;
+    bool doMove = new_x != oldBounds.left || new_y != oldBounds.top ;
+    bool doResize =  ( oldBounds.right - oldBounds.left ) != new_width || (oldBounds.bottom - oldBounds.top ) != new_height ;
+       if ( doMove || doResize )
+       {
+               InvalWindowRect( rootwindow, &oldBounds ) ;
+               if ( doMove )
+               {
+                       UMAMoveControl( (ControlHandle) m_macControl , new_x , new_y ) ;
+               }
+               if ( doResize )
+               {
+                       UMASizeControl( (ControlHandle) m_macControl , new_width , new_height ) ;
+               }
+       }
+}
+
+ void wxSlider::DoMoveWindow(int x, int y, int width, int height)
+ {
+    wxControl::DoMoveWindow(x,y,width,height) ;
+}
\ No newline at end of file