]> git.saurik.com Git - wxWidgets.git/blob - src/mac/classic/statlmac.cpp
Now works when derived from wxTextCtrlBase, using wxScrollHelper.
[wxWidgets.git] / src / mac / classic / statlmac.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: generic/statline.cpp
3 // Purpose: a generic wxStaticLine class
4 // Author: Vadim Zeitlin
5 // Created: 28.06.99
6 // Version: $Id$
7 // Copyright: (c) 1998 Vadim Zeitlin
8 // Licence: wxWindows licence
9 /////////////////////////////////////////////////////////////////////////////
10
11 // ============================================================================
12 // declarations
13 // ============================================================================
14
15 // ----------------------------------------------------------------------------
16 // headers
17 // ----------------------------------------------------------------------------
18
19 // For compilers that support precompilation, includes "wx.h".
20 #include "wx/wxprec.h"
21
22 #ifdef __BORLANDC__
23 #pragma hdrstop
24 #endif
25
26 #include "wx/statline.h"
27 #include "wx/statbox.h"
28
29 #include "wx/mac/uma.h"
30
31 // ============================================================================
32 // implementation
33 // ============================================================================
34
35 IMPLEMENT_DYNAMIC_CLASS(wxStaticLine, wxControl)
36
37 // ----------------------------------------------------------------------------
38 // wxStaticLine
39 // ----------------------------------------------------------------------------
40
41 bool wxStaticLine::Create( wxWindow *parent,
42 wxWindowID id,
43 const wxPoint &pos,
44 const wxSize &size,
45 long style,
46 const wxString &name)
47 {
48 if ( !wxStaticLineBase::Create(parent, id, pos, size,
49 style, wxDefaultValidator, name) )
50 return false;
51
52 Rect bounds ;
53 Str255 title ;
54
55 MacPreControlCreate( parent , id , wxEmptyString , pos , size ,style, wxDefaultValidator , name , &bounds , title ) ;
56
57 m_macControl = (WXWidget) ::NewControl( MAC_WXHWND(parent->MacGetRootWindow()) , &bounds , title , false , 0 , 0 , 1,
58 kControlSeparatorLineProc , (long) this ) ;
59
60 MacPostControlCreate() ;
61
62 return TRUE;
63 }