]> git.saurik.com Git - wxWidgets.git/blame - src/motif/combobox_native.cpp
scope added for keyboard handler
[wxWidgets.git] / src / motif / combobox_native.cpp
CommitLineData
9b1bd0c6
MB
1/////////////////////////////////////////////////////////////////////////////
2// Name: combobox_native.cpp
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
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
12#include "wx/setup.h"
13
14#if wxUSE_COMBOBOX
15
16#include "wx/combobox.h"
17
18#ifdef __VMS__
19#pragma message disable nosimpint
20#endif
21#include <Xm/Xm.h>
22#ifdef __VMS__
23#pragma message enable nosimpint
24#endif
25
26// use the new, shiny combobox for Motif 2.x
27#if (XmVersion >= 2000)
28
100f9289
MB
29#ifdef __VMS__
30#pragma message disable nosimpint
31#endif
9b1bd0c6
MB
32#include <Xm/ComboBox.h>
33#include <Xm/Text.h>
34#include <Xm/List.h>
100f9289
MB
35#ifdef __VMS__
36#pragma message enable nosimpint
37#endif
9b1bd0c6
MB
38
39#include "wx/motif/private.h"
40
41// utility
42static Widget GetXmList( const wxComboBox* cb )
43{
44 Widget ret;
45 XtVaGetValues( (Widget)cb->GetMainWidget(),
46 XmNlist, &ret,
47 NULL );
48
49 return ret;
50}
51
52static Widget GetXmText( const wxComboBox* cb )
53{
54 Widget ret;
55 XtVaGetValues( (Widget)cb->GetMainWidget(),
56 XmNtextField, &ret,
57 NULL );
58
59 return ret;
60}
61
62void wxComboBoxCallback (Widget w, XtPointer clientData,
63 XmComboBoxCallbackStruct * cbs);
64
65IMPLEMENT_DYNAMIC_CLASS(wxComboBox, wxControl)
66
67bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
68 const wxString& value,
69 const wxPoint& pos,
70 const wxSize& size,
71 int n, const wxString choices[],
72 long style,
73 const wxValidator& validator,
74 const wxString& name)
75{
76 if( !CreateControl( parent, id, pos, size, style, validator, name ) )
77 return false;
78
79 Widget parentWidget = (Widget) parent->GetClientWidget();
80
81 int cb_type = ( style & wxCB_SIMPLE ) ? XmCOMBO_BOX :
82 ( style & wxCB_READONLY ) ? XmDROP_DOWN_LIST :
83 ( style & wxCB_DROPDOWN ) ? XmDROP_DOWN_COMBO_BOX :
84 // default to wxCB_DROPDOWN
85 XmDROP_DOWN_COMBO_BOX;
e1aae528
MB
86 if( cb_type == XmDROP_DOWN_COMBO_BOX )
87 SetWindowStyle( style | wxCB_DROPDOWN );
9b1bd0c6
MB
88
89 Widget buttonWidget= XtVaCreateManagedWidget(name.c_str(),
90 xmComboBoxWidgetClass, parentWidget,
91 XmNcomboBoxType, cb_type,
92 NULL);
93
94 m_mainWidget = (Widget) buttonWidget;
95
96 int i;
97 for ( i = 0; i < n; ++i)
98 Append( choices[i] );
99
100 XtManageChild (buttonWidget);
101
102 SetValue(value);
103
104 ChangeFont(false);
105
106 XtAddCallback (buttonWidget, XmNselectionCallback,
107 (XtCallbackProc) wxComboBoxCallback,
108 (XtPointer) this);
109 XtAddCallback (GetXmText(this), XmNvalueChangedCallback,
110 (XtCallbackProc) wxComboBoxCallback,
111 (XtPointer) this);
112
e1aae528
MB
113 wxSize best = GetBestSize();
114 if( size.x != -1 ) best.x = size.x;
115 if( size.y != -1 ) best.y = size.y;
116
9b1bd0c6 117 AttachWidget (parent, m_mainWidget, (WXWidget) NULL,
e1aae528 118 pos.x, pos.y, best.x, best.y);
9b1bd0c6
MB
119
120 ChangeBackgroundColour();
121
122 return true;
123}
124
e1aae528
MB
125void wxComboBox::AdjustDropDownListSize()
126{
127 int newListCount = -1, itemCount = GetCount();
128 const int MAX = 12;
129
130 if( !itemCount )
131 newListCount = 1;
132 else if( itemCount < MAX )
133 newListCount = itemCount;
134 else
135 newListCount = MAX;
136
137 XtVaSetValues( GetXmList(this),
138 XmNvisibleItemCount, newListCount,
139 NULL );
140}
141
9b1bd0c6
MB
142wxComboBox::~wxComboBox()
143{
144 DetachWidget((Widget) m_mainWidget); // Removes event handlers
145 XtDestroyWidget((Widget) m_mainWidget);
146 m_mainWidget = (WXWidget) 0;
147 if ( HasClientObjectData() )
148 m_clientDataDict.DestroyData();
149}
150
151void wxComboBox::DoSetSize(int x, int y, int width, int height, int sizeFlags)
152{
153 // Necessary so it doesn't call wxChoice::SetSize
154 wxWindow::DoSetSize(x, y, width, DoGetBestSize().y, sizeFlags);
155}
156
157wxString wxComboBox::GetValue() const
158{
159 char* s = XmTextGetString (GetXmText (this));
160 wxString str(s);
161 if (s)
162 XtFree (s);
163 return str;
164}
165
166void wxComboBox::SetString(int n, const wxString& s)
167{
168 wxXmString text(s);
169 Widget listBox = GetXmList(this);
170
171 // delete the item and add it again.
172 // FIXME isn't there a way to change it in place?
173 XmListDeletePos (listBox, n+1);
174 XmListAddItem (listBox, text(), n+1);
175}
176
177void wxComboBox::SetValue(const wxString& value)
178{
179 m_inSetValue = true;
180
d8d18184
MB
181 // Fix crash; probably an OpenMotif bug
182 const char* val = value.c_str() ? value.c_str() : "";
9b1bd0c6 183 XtVaSetValues( GetXmText(this),
d8d18184 184 XmNvalue, wxConstCast(val, char),
9b1bd0c6
MB
185 NULL);
186
187 m_inSetValue = false;
188}
189
190int wxComboBox::DoAppend(const wxString& item)
191{
192 wxXmString str( item.c_str() );
193 XmComboBoxAddItem((Widget) m_mainWidget, str(), 0, False);
9b1bd0c6 194 m_noStrings ++;
e1aae528 195 AdjustDropDownListSize();
9b1bd0c6
MB
196
197 return GetCount() - 1;
198}
199
243dbf1a
VZ
200int wxComboBox::DoInsert(const wxString& item, int pos)
201{
202 wxCHECK_MSG(!(GetWindowStyle() & wxCB_SORT), -1, wxT("can't insert into sorted list"));
203 wxCHECK_MSG((pos>=0) && (pos<=GetCount()), -1, wxT("invalid index"));
204
205 if (pos == GetCount())
206 return DoAppend(item);
207
208 wxXmString str( item.c_str() );
209 XmComboBoxAddItem((Widget) m_mainWidget, str(), pos+1, False);
210 m_noStrings ++;
211 AdjustDropDownListSize();
212
213 return GetCount() - 1;
214}
215
9b1bd0c6
MB
216void wxComboBox::Delete(int n)
217{
218#ifdef LESSTIF_VERSION
219 XmListDeletePos (GetXmList(this), n + 1);
220#else
221 XmComboBoxDeletePos((Widget) m_mainWidget, n+1);
222#endif
223
9b1bd0c6
MB
224 m_clientDataDict.Delete(n, HasClientObjectData());
225 m_noStrings--;
e1aae528
MB
226
227 AdjustDropDownListSize();
9b1bd0c6
MB
228}
229
230void wxComboBox::Clear()
231{
232#ifdef LESSTIF_VERSION
233 XmListDeleteAllItems (GetXmList(this));
234#else
235 while(m_noStrings > 0)
236 {
237 XmComboBoxDeletePos((Widget) m_mainWidget, m_noStrings--);
238 }
e1aae528 239#endif
9b1bd0c6
MB
240
241 if ( HasClientObjectData() )
242 m_clientDataDict.DestroyData();
243 m_noStrings = 0;
e1aae528 244 AdjustDropDownListSize();
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
9b1bd0c6
MB
256 wxXmString str( GetString(n).c_str() );
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
267int wxComboBox::GetSelection (void) const
268{
269 return wxDoGetSelectionInList( GetXmList( this ) );
270}
271
272wxString wxComboBox::GetString(int n) const
273{
e1aae528 274 return wxDoGetStringInList( GetXmList(this), n );
9b1bd0c6
MB
275}
276
277int wxComboBox::FindString(const wxString& s) const
278{
279 return wxDoFindStringInList( GetXmList( this ), s );
280}
281
282// Clipboard operations
283void wxComboBox::Copy()
284{
100f9289 285 XmTextCopy( GetXmText(this), CurrentTime );
9b1bd0c6
MB
286}
287
288void wxComboBox::Cut()
289{
100f9289 290 XmTextCut( GetXmText(this), CurrentTime );
9b1bd0c6
MB
291}
292
293void wxComboBox::Paste()
294{
100f9289 295 XmTextPaste( GetXmText(this) );
9b1bd0c6
MB
296}
297
298void wxComboBox::SetEditable(bool WXUNUSED(editable))
299{
300 // TODO
301}
302
303void wxComboBox::SetInsertionPoint(long pos)
304{
100f9289 305 XmTextSetInsertionPosition( GetXmText(this), (XmTextPosition)pos );
9b1bd0c6
MB
306}
307
308void wxComboBox::SetInsertionPointEnd()
309{
100f9289 310 SetInsertionPoint( GetLastPosition() );
9b1bd0c6
MB
311}
312
313long wxComboBox::GetInsertionPoint() const
314{
100f9289 315 return (long)XmTextGetInsertionPosition( GetXmText(this) );
9b1bd0c6
MB
316}
317
318long wxComboBox::GetLastPosition() const
319{
100f9289
MB
320 XmTextPosition pos = XmTextGetLastPosition( GetXmText(this) );
321 return (long)pos;
9b1bd0c6
MB
322}
323
324void wxComboBox::Replace(long from, long to, const wxString& value)
100f9289
MB
325{
326 XmTextReplace( GetXmText(this), (XmTextPosition)from, (XmTextPosition)to,
d3a80c92 327 wxConstCast(value.c_str(), char) );
9b1bd0c6
MB
328}
329
330void wxComboBox::Remove(long from, long to)
331{
100f9289
MB
332 SetSelection( from, to );
333 XmTextRemove( GetXmText(this) );
9b1bd0c6
MB
334}
335
336void wxComboBox::SetSelection(long from, long to)
337{
100f9289
MB
338 if( to == -1 )
339 to = GetLastPosition();
340
341 XmTextSetSelection( GetXmText(this), (XmTextPosition)from,
342 (XmTextPosition)to, (Time)0 );
9b1bd0c6
MB
343}
344
345void wxComboBoxCallback (Widget WXUNUSED(w), XtPointer clientData,
346 XmComboBoxCallbackStruct * cbs)
347{
348 wxComboBox *item = (wxComboBox *) clientData;
349
d8d18184
MB
350 if( item->m_inSetSelection ) return;
351
9b1bd0c6
MB
352 switch (cbs->reason)
353 {
354 case XmCR_SELECT:
355#if 0
356 case XmCR_SINGLE_SELECT:
357 case XmCR_BROWSE_SELECT:
358#endif
359 {
360 wxCommandEvent event (wxEVT_COMMAND_COMBOBOX_SELECTED,
361 item->GetId());
d8d18184 362 int idx = cbs->item_position;
9b1bd0c6
MB
363 event.m_commandInt = idx;
364 event.m_commandString = item->GetString (idx);
365 if ( item->HasClientObjectData() )
366 event.SetClientObject( item->GetClientObject(idx) );
367 else if ( item->HasClientUntypedData() )
368 event.SetClientData( item->GetClientData(idx) );
369 event.m_extraLong = true;
370 event.SetEventObject(item);
d8d18184 371 item->GetEventHandler()->ProcessEvent(event);
9b1bd0c6
MB
372 break;
373 }
374 case XmCR_VALUE_CHANGED:
375 {
376 wxCommandEvent event (wxEVT_COMMAND_TEXT_UPDATED, item->GetId());
377 event.m_commandInt = -1;
378 event.m_commandString = item->GetValue();
379 event.m_extraLong = true;
380 event.SetEventObject(item);
d8d18184 381 item->GetEventHandler()->ProcessEvent(event);
9b1bd0c6
MB
382 break;
383 }
384 default:
385 break;
386 }
387}
388
389void wxComboBox::ChangeFont(bool keepOriginalSize)
390{
e1aae528
MB
391 if( m_font.Ok() )
392 {
393 wxDoChangeFont( GetXmText(this), m_font );
394 wxDoChangeFont( GetXmList(this), m_font );
395 }
396
9b1bd0c6
MB
397 // Don't use the base class wxChoice's ChangeFont
398 wxWindow::ChangeFont(keepOriginalSize);
399}
400
401void wxComboBox::ChangeBackgroundColour()
402{
403 wxWindow::ChangeBackgroundColour();
404}
405
406void wxComboBox::ChangeForegroundColour()
407{
408 wxWindow::ChangeForegroundColour();
409}
410
411wxSize wxComboBox::DoGetBestSize() const
412{
e1aae528
MB
413 if( (GetWindowStyle() & wxCB_DROPDOWN) == wxCB_DROPDOWN ||
414 (GetWindowStyle() & wxCB_READONLY) == wxCB_READONLY )
415 {
416 Dimension arrowW, arrowS, highlight, xmargin, ymargin, shadow;
417
418 XtVaGetValues( (Widget)m_mainWidget,
419 XmNarrowSize, &arrowW,
420 XmNarrowSpacing, &arrowS,
421 XmNhighlightThickness, &highlight,
422 XmNmarginWidth, &xmargin,
423 XmNmarginHeight, &ymargin,
424 XmNshadowThickness, &shadow,
425 NULL );
426
427 wxSize listSize = wxDoGetListBoxBestSize( GetXmList(this), this );
428 wxSize textSize = wxDoGetSingleTextCtrlBestSize( GetXmText(this),
429 this );
430
431 // FIXME arbitrary constants
432 return wxSize( listSize.x + arrowW + arrowS + 2 * highlight
433 + 2 * shadow + 2 * xmargin ,
434 textSize.y + 2 * highlight + 2 * ymargin + 2 * shadow );
435 }
436 else
437 return wxWindow::DoGetBestSize();
9b1bd0c6
MB
438}
439
440#endif // XmVersion >= 2000
441
442#endif // wxUSE_COMBOBOX