]> git.saurik.com Git - wxWidgets.git/blame - src/mac/statbox.cpp
fatal bug in wxSplitPath fixed
[wxWidgets.git] / src / mac / statbox.cpp
CommitLineData
e9576ca5
SC
1/////////////////////////////////////////////////////////////////////////////
2// Name: statbox.cpp
3// Purpose: wxStaticBox
4// Author: AUTHOR
5// Modified by:
6// Created: ??/??/98
7// RCS-ID: $Id$
8// Copyright: (c) AUTHOR
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "statbox.h"
14#endif
15
16#include "wx/statbox.h"
519cb848 17#include "wx/mac/uma.h"
e9576ca5 18
e9576ca5
SC
19IMPLEMENT_DYNAMIC_CLASS(wxStaticBox, wxControl)
20
21BEGIN_EVENT_TABLE(wxStaticBox, wxControl)
22 EVT_ERASE_BACKGROUND(wxStaticBox::OnEraseBackground)
23END_EVENT_TABLE()
24
e9576ca5
SC
25
26/*
27 * Static box
28 */
29
30bool wxStaticBox::Create(wxWindow *parent, wxWindowID id,
31 const wxString& label,
32 const wxPoint& pos,
33 const wxSize& size,
34 long style,
35 const wxString& name)
36{
519cb848
SC
37 Rect bounds ;
38 Str255 title ;
39
40 MacPreControlCreate( parent , id , label , pos , size ,style, *((wxValidator*)NULL) , name , &bounds , title ) ;
e9576ca5 41
519cb848
SC
42 m_macControl = UMANewControl( parent->GetMacRootWindow() , &bounds , title , true , 0 , 0 , 1,
43 kControlGroupBoxTextTitleProc , (long) this ) ;
44
45 MacPostControlCreate() ;
e9576ca5 46
519cb848 47 return TRUE;
e9576ca5 48}