]> git.saurik.com Git - wxWidgets.git/blame - src/mac/carbon/choice.cpp
applied patch for compilation with gcc 3.0
[wxWidgets.git] / src / mac / carbon / choice.cpp
CommitLineData
e9576ca5
SC
1/////////////////////////////////////////////////////////////////////////////
2// Name: choice.cpp
3// Purpose: wxChoice
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 "choice.h"
14#endif
15
16// For compilers that support precompilation, includes "wx.h".
17#include "wx/choice.h"
03e11df5 18#include "wx/menu.h"
519cb848 19#include "wx/mac/uma.h"
e9576ca5 20
2f1ae414 21#if !USE_SHARED_LIBRARY
e9576ca5 22IMPLEMENT_DYNAMIC_CLASS(wxChoice, wxControl)
2f1ae414 23#endif
e9576ca5 24
5b781a67
SC
25short nextMenuId = 100 ; // wxMenu takes the lower ids
26
27wxChoice::~wxChoice()
28{
29 // DeleteMenu( m_macPopUpMenuId ) ;
e7b596fb 30 // DisposeMenu( m_macPopUpMenuHandle ) ;
5b781a67
SC
31}
32
e9576ca5
SC
33bool wxChoice::Create(wxWindow *parent, wxWindowID id,
34 const wxPoint& pos,
35 const wxSize& size,
03e11df5
GD
36 int n, const wxString choices[],
37 long style,
e9576ca5
SC
38 const wxValidator& validator,
39 const wxString& name)
40{
e9576ca5 41
519cb848
SC
42 Rect bounds ;
43 Str255 title ;
44
45 MacPreControlCreate( parent , id , "" , pos , size ,style, validator , name , &bounds , title ) ;
2f1ae414 46
fdaf613a 47 m_macControl = UMANewControl( parent->GetMacRootWindow() , &bounds , title , false , 0 , -12345 , 0 ,
8208e181 48 kControlPopupButtonProc + kControlPopupFixedWidthVariant , (long) this ) ;
519cb848
SC
49
50 m_macPopUpMenuHandle = NewMenu( 1 , "\pPopUp Menu" ) ;
51 SetControlData( m_macControl , kControlNoPart , kControlPopupButtonMenuHandleTag , sizeof( MenuHandle ) , (char*) &m_macPopUpMenuHandle) ;
b668a735
SC
52 SetControlMinimum( m_macControl , 0 ) ;
53 SetControlMaximum( m_macControl , 0) ;
2f1ae414
SC
54 if ( n > 0 )
55 SetControlValue( m_macControl , 1 ) ;
519cb848
SC
56
57 MacPostControlCreate() ;
58
b668a735
SC
59 for ( int i = 0; i < n; i++ )
60 {
61 Append(choices[i]);
62 }
519cb848 63 return TRUE;
e9576ca5
SC
64}
65
b668a735
SC
66// ----------------------------------------------------------------------------
67// adding/deleting items to/from the list
68// ----------------------------------------------------------------------------
69
2597135a 70int wxChoice::DoAppend(const wxString& item)
e9576ca5 71{
2f1ae414
SC
72 Str255 label;
73 wxMenuItem::MacBuildMenuString( label , NULL , NULL , item ,false);
74 AppendMenu( m_macPopUpMenuHandle , label ) ;
75 m_strings.Add( item ) ;
b668a735
SC
76 m_datas.Add( NULL ) ;
77 int index = m_strings.GetCount() - 1 ;
78 DoSetItemClientData( index , NULL ) ;
79 SetControlMaximum( m_macControl , Number()) ;
80 return index ;
2597135a
SC
81}
82
b668a735 83void wxChoice::Delete(int n)
2597135a 84{
b668a735 85 wxCHECK_RET( n < GetCount(), wxT("invalid item index in wxChoice::Delete") );
e9576ca5 86
b668a735 87 if ( HasClientObjectData() )
2597135a 88 {
b668a735 89 delete GetClientObject(n);
2597135a 90 }
03e11df5 91
519cb848 92 ::DeleteMenuItem( m_macPopUpMenuHandle , n + 1) ;
2f1ae414 93 m_strings.Remove( n ) ;
b668a735 94 SetControlMaximum( m_macControl , Number()) ;
e9576ca5
SC
95}
96
97void wxChoice::Clear()
98{
b668a735
SC
99 Free();
100
101 for ( int i = 0 ; i < GetCount() ; i++ )
519cb848
SC
102 {
103 ::DeleteMenuItem( m_macPopUpMenuHandle , 1 ) ;
b668a735
SC
104 }
105 m_strings.Empty() ;
106 m_datas.Empty() ;
107 SetControlMaximum( m_macControl , 0 ) ;
e9576ca5
SC
108}
109
b668a735
SC
110void wxChoice::Free()
111{
112 if ( HasClientObjectData() )
113 {
114 size_t count = GetCount();
115 for ( size_t n = 0; n < count; n++ )
116 {
117 delete GetClientObject(n);
118 }
119 }
120}
121
122// ----------------------------------------------------------------------------
123// selection
124// ----------------------------------------------------------------------------
125
e9576ca5
SC
126int wxChoice::GetSelection() const
127{
519cb848 128 return GetControlValue( m_macControl ) -1 ;
e9576ca5
SC
129}
130
b668a735 131void wxChoice::SetSelection(int n)
519cb848 132{
b668a735 133 SetControlValue( m_macControl , n + 1 ) ;
519cb848
SC
134}
135
b668a735
SC
136// ----------------------------------------------------------------------------
137// string list functions
138// ----------------------------------------------------------------------------
519cb848 139
b668a735 140int wxChoice::GetCount() const
e9576ca5 141{
b668a735 142 return m_strings.GetCount() ;
e9576ca5
SC
143}
144
145int wxChoice::FindString(const wxString& s) const
146{
b668a735 147 for( int i = 0 ; i < GetCount() ; i++ )
519cb848 148 {
b668a735 149 if ( GetString( i ).IsSameAs(s, FALSE) )
519cb848
SC
150 return i ;
151 }
b668a735
SC
152 return wxNOT_FOUND ;
153}
154
155void wxChoice::SetString(int n, const wxString& s)
156{
157 wxFAIL_MSG(wxT("not implemented"));
158
159#if 0 // should do this, but no Insert() so far
160 Delete(n);
161 Insert(n + 1, s);
162#endif
e9576ca5
SC
163}
164
b668a735 165
e9576ca5
SC
166wxString wxChoice::GetString(int n) const
167{
2f1ae414 168 return m_strings[n] ;
e9576ca5
SC
169}
170
b668a735
SC
171// ----------------------------------------------------------------------------
172// client data
173// ----------------------------------------------------------------------------
174
175void wxChoice::DoSetItemClientData( int n, void* clientData )
176{
177 wxCHECK_RET( n >= 0 && n < m_datas.GetCount(),
178 "invalid index in wxChoice::SetClientData" );
179 wxASSERT_MSG( m_datas.GetCount() >= n , "invalid client_data array" ) ;
180
181 if ( m_datas.GetCount() > n )
182 {
183 m_datas[n] = (char*) clientData ;
184 }
185 else
186 {
187 m_datas.Add( (char*) clientData ) ;
188 }
189}
190
191void *wxChoice::DoGetItemClientData(int N) const
192{
193 wxCHECK_MSG( N >= 0 && N < m_datas.GetCount(), NULL,
194 "invalid index in wxChoice::GetClientData" );
195
196 return (void *)m_datas[N];
197}
198
199void wxChoice::DoSetItemClientObject( int n, wxClientData* clientData )
200{
201 DoSetItemClientData(n, clientData);
202}
203
204wxClientData* wxChoice::DoGetItemClientObject( int n ) const
e9576ca5 205{
b668a735 206 return (wxClientData *)DoGetItemClientData(n);
e9576ca5
SC
207}
208
b668a735
SC
209void wxChoice::MacHandleControlClick( ControlHandle control , SInt16 controlpart )
210{
211 wxCommandEvent event(wxEVT_COMMAND_CHOICE_SELECTED, m_windowId );
212 event.SetInt(GetSelection());
213 event.SetEventObject(this);
214 event.SetString(GetStringSelection());
215 ProcessCommand(event);
216}
217/*
218void wxChoice::Command(wxCommandEvent & event)
219{
220 SetSelection (event.GetInt());
221 ProcessCommand (event);
222}
223*/