wxFont can now raelly use the native fonts

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

diff --git a/src/mac/tabctrl.cpp b/src/mac/tabctrl.cpp
index b3b45a72d12a038b60322fd7c374ac7ca3108551..9231ea3d41fb0f9402443e4635741b0d42a981f4 100644 (file)
--- a/src/mac/tabctrl.cpp
+++ b/src/mac/tabctrl.cpp
@@ -13,8 +13,11 @@
 #pragma implementation "tabctrl.h"
 #endif
 
+#include "wx/defs.h"
+
 #include "wx/control.h"
 #include "wx/tabctrl.h"
+#include "wx/mac/uma.h"
 
 #if !USE_SHARED_LIBRARY
 IMPLEMENT_DYNAMIC_CLASS(wxTabCtrl, wxControl)
@@ -31,20 +34,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 = ::NewControl( parent->MacGetRootWindow() , &bounds , title , false , 0 , 0 , 1, 
+               kControlTabSmallProc , (long) this ) ;
+       
+       MacPostControlCreate() ;
+       return TRUE ;
 }
 
 wxTabCtrl::~wxTabCtrl()