fixed incorrect GetTextExtent for wxTELETYPE font

[wxWidgets.git] / src / mac / tabctrl.cpp

diff --git a/src/mac/tabctrl.cpp b/src/mac/tabctrl.cpp
index b3b45a72d12a038b60322fd7c374ac7ca3108551..54821412688f56487af8752ba8fe91edbe432c4c 100644 (file)
--- a/src/mac/tabctrl.cpp
+++ b/src/mac/tabctrl.cpp
@@ -15,6 +15,7 @@
 
 #include "wx/control.h"
 #include "wx/tabctrl.h"
+#include "wx/mac/uma.h"
 
 #if !USE_SHARED_LIBRARY
 IMPLEMENT_DYNAMIC_CLASS(wxTabCtrl, wxControl)
@@ -31,20 +32,18 @@ wxTabCtrl::wxTabCtrl()
 bool wxTabCtrl::Create(wxWindow *parent, wxWindowID id, const wxPoint& pos, const wxSize& size,
             long style, const wxString& name)
 {
-    m_imageList = NULL;
-
-    SetName(name);
-
-    m_windowStyle = style;
+       Rect bounds ;
+       Str255 title ;
 
-    SetParent(parent);
+  m_imageList = NULL;
+       
+       MacPreControlCreate( parent , id ,  "" , pos , size ,style, wxDefaultValidator , name , &bounds , title ) ;
 
-    m_windowId = (id < 0 ? NewControlId() : id);
-
-    if (parent) parent->AddChild(this);
-
-    // TODO: create tab control
-    return FALSE;
+       m_macControl = UMANewControl( parent->GetMacRootWindow() , &bounds , title , true , 0 , 0 , 1, 
+               kControlTabSmallProc , (long) this ) ;
+       
+       MacPostControlCreate() ;
+       return TRUE ;
 }
 
 wxTabCtrl::~wxTabCtrl()