]> git.saurik.com Git - wxWidgets.git/blame - src/motif/combobox_native.cpp
Always link with expat in monolithic build.
[wxWidgets.git] / src / motif / combobox_native.cpp
CommitLineData
9b1bd0c6 1/////////////////////////////////////////////////////////////////////////////
11e62fe6 2// Name: src/motif/combobox_native.cpp
9b1bd0c6
MB
3// Purpose: wxComboBox class
4// Author: Julian Smart, Ian Brown
5// Modified by:
6// Created: 01/02/03
7// RCS-ID: $Id$
8// Copyright: (c) Julian Smart
65571936 9// Licence: wxWindows licence
9b1bd0c6
MB
10/////////////////////////////////////////////////////////////////////////////
11
1248b41f
MB
12// For compilers that support precompilation, includes "wx.h".
13#include "wx/wxprec.h"
14
9b1bd0c6
MB
15#if wxUSE_COMBOBOX
16
17#include "wx/combobox.h"
aaa6d89a
WS
18
19#ifndef WX_PRECOMP
20 #include "wx/arrstr.h"
21#endif
9b1bd0c6
MB
22
23#ifdef __VMS__
24#pragma message disable nosimpint
25#endif
26#include <Xm/Xm.h>
27#ifdef __VMS__
28#pragma message enable nosimpint
29#endif
30
31// use the new, shiny combobox for Motif 2.x
32#if (XmVersion >= 2000)
33
100f9289
MB
34#ifdef __VMS__
35#pragma message disable nosimpint
36#endif
9b1bd0c6
MB
37#include <Xm/ComboBox.h>
38#include <Xm/Text.h>
39#include <Xm/List.h>
100f9289
MB
40#ifdef __VMS__
41#pragma message enable nosimpint
42#endif
9b1bd0c6
MB
43
44#include "wx/motif/private.h"
45
46// utility
47static Widget GetXmList( const wxComboBox* cb )
48{
49 Widget ret;
50 XtVaGetValues( (Widget)cb->GetMainWidget(),
51 XmNlist, &ret,
52 NULL );
53
54 return ret;
55}
56
57static Widget GetXmText( const wxComboBox* cb )
58{
59 Widget ret;
60 XtVaGetValues( (Widget)cb->GetMainWidget(),
61 XmNtextField, &ret,
62 NULL );
63
64 return ret;
65}
66
67void wxComboBoxCallback (Widget w, XtPointer clientData,
68 XmComboBoxCallbackStruct * cbs);
69
70IMPLEMENT_DYNAMIC_CLASS(wxComboBox, wxControl)
71
72bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
73 const wxString& value,
74 const wxPoint& pos,
75 const wxSize& size,
76 int n, const wxString choices[],
77 long style,
78 const wxValidator& validator,
79 const wxString& name)
80{
81 if( !CreateControl( parent, id, pos, size, style, validator, name ) )
82 return false;
105fbe1f 83 PreCreation();
9b1bd0c6
MB
84
85 Widget parentWidget = (Widget) parent->GetClientWidget();
86
87 int cb_type = ( style & wxCB_SIMPLE ) ? XmCOMBO_BOX :
88 ( style & wxCB_READONLY ) ? XmDROP_DOWN_LIST :
89 ( style & wxCB_DROPDOWN ) ? XmDROP_DOWN_COMBO_BOX :
90 // default to wxCB_DROPDOWN
91 XmDROP_DOWN_COMBO_BOX;
e1aae528
MB
92 if( cb_type == XmDROP_DOWN_COMBO_BOX )
93 SetWindowStyle( style | wxCB_DROPDOWN );
9b1bd0c6
MB
94
95 Widget buttonWidget= XtVaCreateManagedWidget(name.c_str(),
96 xmComboBoxWidgetClass, parentWidget,
7d8268a1 97 XmNcomboBoxType, cb_type,
9b1bd0c6
MB
98 NULL);
99
100 m_mainWidget = (Widget) buttonWidget;
101
102 int i;
103 for ( i = 0; i < n; ++i)
104 Append( choices[i] );
105
106 XtManageChild (buttonWidget);
107
108 SetValue(value);
109
9b1bd0c6
MB
110 XtAddCallback (buttonWidget, XmNselectionCallback,
111 (XtCallbackProc) wxComboBoxCallback,
112 (XtPointer) this);
113 XtAddCallback (GetXmText(this), XmNvalueChangedCallback,
114 (XtCallbackProc) wxComboBoxCallback,
115 (XtPointer) this);
116
e1aae528 117 wxSize best = GetBestSize();
9b5f1895
WS
118 if( size.x != wxDefaultCoord ) best.x = size.x;
119 if( size.y != wxDefaultCoord ) best.y = size.y;
e1aae528 120
105fbe1f 121 PostCreation();
9b1bd0c6 122 AttachWidget (parent, m_mainWidget, (WXWidget) NULL,
e1aae528 123 pos.x, pos.y, best.x, best.y);
9b1bd0c6 124
9b1bd0c6
MB
125 return true;
126}
127
584ad2a3
MB
128bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
129 const wxString& value,
130 const wxPoint& pos,
131 const wxSize& size,
132 const wxArrayString& choices,
133 long style,
134 const wxValidator& validator,
135 const wxString& name)
136{
137 wxCArrayString chs(choices);
7d8268a1 138 return Create(parent, id, value, pos, size, chs.GetCount(),
584ad2a3
MB
139 chs.GetStrings(), style, validator, name);
140}
141
e1aae528
MB
142void wxComboBox::AdjustDropDownListSize()
143{
144 int newListCount = -1, itemCount = GetCount();
145 const int MAX = 12;
146
147 if( !itemCount )
148 newListCount = 1;
149 else if( itemCount < MAX )
150 newListCount = itemCount;
151 else
152 newListCount = MAX;
153
154 XtVaSetValues( GetXmList(this),
155 XmNvisibleItemCount, newListCount,
156 NULL );
157}
158
9b1bd0c6
MB
159wxComboBox::~wxComboBox()
160{
161 DetachWidget((Widget) m_mainWidget); // Removes event handlers
162 XtDestroyWidget((Widget) m_mainWidget);
163 m_mainWidget = (WXWidget) 0;
9b1bd0c6
MB
164}
165
55034339 166void wxComboBox::DoSetSize(int x, int y, int width, int WXUNUSED(height), int sizeFlags)
9b1bd0c6
MB
167{
168 // Necessary so it doesn't call wxChoice::SetSize
169 wxWindow::DoSetSize(x, y, width, DoGetBestSize().y, sizeFlags);
170}
171
aa61d352 172void wxComboBox::SetString(unsigned int n, const wxString& s)
9b1bd0c6
MB
173{
174 wxXmString text(s);
175 Widget listBox = GetXmList(this);
176
177 // delete the item and add it again.
178 // FIXME isn't there a way to change it in place?
179 XmListDeletePos (listBox, n+1);
180 XmListAddItem (listBox, text(), n+1);
181}
182
183void wxComboBox::SetValue(const wxString& value)
184{
185 m_inSetValue = true;
186
187 XtVaSetValues( GetXmText(this),
6991087b 188 XmNvalue, (const char*)value.mb_str(),
9b1bd0c6
MB
189 NULL);
190
191 m_inSetValue = false;
192}
193
a236aa20
VZ
194int wxComboBox::DoInsertItems(const wxArrayStringsAdapter & items,
195 unsigned int pos,
196 void **clientData, wxClientDataType type)
9b1bd0c6 197{
a236aa20 198 const unsigned int numItems = items.GetCount();
9b1bd0c6 199
a236aa20
VZ
200 AllocClientData(numItems);
201 for ( unsigned int i = 0; i < numItems; ++i, ++pos )
202 {
203 wxXmString str( items[i].c_str() );
204 XmComboBoxAddItem((Widget) m_mainWidget, str(),
205 GetMotifPosition(pos), False);
58045daa 206
a236aa20
VZ
207 InsertNewItemClientData(pos, clientData, i, type);
208 }
243dbf1a 209
243dbf1a
VZ
210 AdjustDropDownListSize();
211
a236aa20 212 return pos - 1;
243dbf1a
VZ
213}
214
a236aa20 215void wxComboBox::DoDeleteOneItem(unsigned int n)
9b1bd0c6
MB
216{
217#ifdef LESSTIF_VERSION
218 XmListDeletePos (GetXmList(this), n + 1);
219#else
220 XmComboBoxDeletePos((Widget) m_mainWidget, n+1);
221#endif
222
a236aa20 223 wxControlWithItems::DoDeleteOneItem(n);
58045daa 224 m_stringArray.RemoveAt(size_t(n));
e1aae528
MB
225
226 AdjustDropDownListSize();
9b1bd0c6
MB
227}
228
978c6e41 229void wxComboBox::Clear()
9b1bd0c6
MB
230{
231#ifdef LESSTIF_VERSION
232 XmListDeleteAllItems (GetXmList(this));
233#else
58045daa
FM
234 size_t n = m_stringArray.GetCount();
235 while(n > 0)
9b1bd0c6 236 {
58045daa 237 XmComboBoxDeletePos((Widget) m_mainWidget, n--);
9b1bd0c6 238 }
e1aae528 239#endif
9b1bd0c6 240
58045daa 241 m_stringArray.Clear();
e1aae528 242 AdjustDropDownListSize();
978c6e41
VZ
243
244 wxTextEntry::Clear();
9b1bd0c6
MB
245}
246
247void wxComboBox::SetSelection (int n)
248{
d8d18184
MB
249 m_inSetSelection = true;
250
d40708e2 251#if wxCHECK_LESSTIF()
9b1bd0c6
MB
252 XmListSelectPos (GetXmList(this), n + 1, false);
253 SetValue(GetString(n));
254#else
d40708e2 255#if 0
aa61d352 256 wxXmString str(GetString(n).c_str());
9b1bd0c6 257 XmComboBoxSelectItem((Widget) m_mainWidget, str());
d40708e2 258#endif
9b1bd0c6 259 XtVaSetValues( (Widget)m_mainWidget,
d40708e2 260 XmNselectedPosition, n,
9b1bd0c6
MB
261 NULL );
262#endif
d8d18184
MB
263
264 m_inSetSelection = false;
9b1bd0c6
MB
265}
266
978c6e41 267int wxComboBox::GetSelection() const
9b1bd0c6
MB
268{
269 return wxDoGetSelectionInList( GetXmList( this ) );
270}
271
aa61d352 272wxString wxComboBox::GetString(unsigned int n) const
9b1bd0c6 273{
e1aae528 274 return wxDoGetStringInList( GetXmList(this), n );
9b1bd0c6
MB
275}
276
55034339 277int wxComboBox::FindString(const wxString& s, bool WXUNUSED(bCase)) const
9b1bd0c6 278{
11e62fe6
WS
279 // FIXME: back to base class for not supported value of bCase
280
9b1bd0c6
MB
281 return wxDoFindStringInList( GetXmList( this ), s );
282}
283
9b1bd0c6
MB
284void wxComboBoxCallback (Widget WXUNUSED(w), XtPointer clientData,
285 XmComboBoxCallbackStruct * cbs)
286{
287 wxComboBox *item = (wxComboBox *) clientData;
288
d8d18184
MB
289 if( item->m_inSetSelection ) return;
290
9b1bd0c6
MB
291 switch (cbs->reason)
292 {
293 case XmCR_SELECT:
294#if 0
295 case XmCR_SINGLE_SELECT:
296 case XmCR_BROWSE_SELECT:
297#endif
298 {
299 wxCommandEvent event (wxEVT_COMMAND_COMBOBOX_SELECTED,
300 item->GetId());
d8d18184 301 int idx = cbs->item_position;
687706f5
KH
302 event.SetInt(idx);
303 event.SetString( item->GetString (idx) );
9b1bd0c6
MB
304 if ( item->HasClientObjectData() )
305 event.SetClientObject( item->GetClientObject(idx) );
306 else if ( item->HasClientUntypedData() )
307 event.SetClientData( item->GetClientData(idx) );
687706f5 308 event.SetExtraLong(true);
9b1bd0c6 309 event.SetEventObject(item);
937013e0 310 item->HandleWindowEvent(event);
9b1bd0c6
MB
311 break;
312 }
313 case XmCR_VALUE_CHANGED:
314 {
315 wxCommandEvent event (wxEVT_COMMAND_TEXT_UPDATED, item->GetId());
687706f5
KH
316 event.SetInt(-1);
317 event.SetString( item->GetValue() );
318 event.SetExtraLong(true);
9b1bd0c6 319 event.SetEventObject(item);
937013e0 320 item->HandleWindowEvent(event);
9b1bd0c6
MB
321 break;
322 }
323 default:
324 break;
325 }
326}
327
328void wxComboBox::ChangeFont(bool keepOriginalSize)
329{
a1b806b9 330 if( m_font.IsOk() && m_mainWidget != NULL )
e1aae528
MB
331 {
332 wxDoChangeFont( GetXmText(this), m_font );
333 wxDoChangeFont( GetXmList(this), m_font );
334 }
335
9b1bd0c6
MB
336 // Don't use the base class wxChoice's ChangeFont
337 wxWindow::ChangeFont(keepOriginalSize);
338}
339
340void wxComboBox::ChangeBackgroundColour()
341{
342 wxWindow::ChangeBackgroundColour();
343}
344
345void wxComboBox::ChangeForegroundColour()
346{
347 wxWindow::ChangeForegroundColour();
348}
349
350wxSize wxComboBox::DoGetBestSize() const
351{
e1aae528
MB
352 if( (GetWindowStyle() & wxCB_DROPDOWN) == wxCB_DROPDOWN ||
353 (GetWindowStyle() & wxCB_READONLY) == wxCB_READONLY )
354 {
355 Dimension arrowW, arrowS, highlight, xmargin, ymargin, shadow;
356
357 XtVaGetValues( (Widget)m_mainWidget,
358 XmNarrowSize, &arrowW,
359 XmNarrowSpacing, &arrowS,
360 XmNhighlightThickness, &highlight,
361 XmNmarginWidth, &xmargin,
362 XmNmarginHeight, &ymargin,
363 XmNshadowThickness, &shadow,
364 NULL );
365
366 wxSize listSize = wxDoGetListBoxBestSize( GetXmList(this), this );
367 wxSize textSize = wxDoGetSingleTextCtrlBestSize( GetXmText(this),
368 this );
369
370 // FIXME arbitrary constants
371 return wxSize( listSize.x + arrowW + arrowS + 2 * highlight
372 + 2 * shadow + 2 * xmargin ,
373 textSize.y + 2 * highlight + 2 * ymargin + 2 * shadow );
374 }
375 else
376 return wxWindow::DoGetBestSize();
9b1bd0c6
MB
377}
378
89954433
VZ
379WXWidget wxComboBox::GetTextWidget() const
380{
381 return (WXWidget)GetXmText(this);
382}
383
9b1bd0c6
MB
384#endif // XmVersion >= 2000
385
386#endif // wxUSE_COMBOBOX