]> git.saurik.com Git - wxWidgets.git/blame - src/motif/combobox_native.cpp
Do not derive wxCursor from wxBitmap, plus misc cleanup.
[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
MB
117 SetCanAddEventHandler(true);
118 AttachWidget (parent, m_mainWidget, (WXWidget) NULL,
e1aae528 119 pos.x, pos.y, best.x, best.y);
9b1bd0c6
MB
120
121 ChangeBackgroundColour();
122
123 return true;
124}
125
e1aae528
MB
126void wxComboBox::AdjustDropDownListSize()
127{
128 int newListCount = -1, itemCount = GetCount();
129 const int MAX = 12;
130
131 if( !itemCount )
132 newListCount = 1;
133 else if( itemCount < MAX )
134 newListCount = itemCount;
135 else
136 newListCount = MAX;
137
138 XtVaSetValues( GetXmList(this),
139 XmNvisibleItemCount, newListCount,
140 NULL );
141}
142
9b1bd0c6
MB
143wxComboBox::~wxComboBox()
144{
145 DetachWidget((Widget) m_mainWidget); // Removes event handlers
146 XtDestroyWidget((Widget) m_mainWidget);
147 m_mainWidget = (WXWidget) 0;
148 if ( HasClientObjectData() )
149 m_clientDataDict.DestroyData();
150}
151
152void wxComboBox::DoSetSize(int x, int y, int width, int height, int sizeFlags)
153{
154 // Necessary so it doesn't call wxChoice::SetSize
155 wxWindow::DoSetSize(x, y, width, DoGetBestSize().y, sizeFlags);
156}
157
158wxString wxComboBox::GetValue() const
159{
160 char* s = XmTextGetString (GetXmText (this));
161 wxString str(s);
162 if (s)
163 XtFree (s);
164 return str;
165}
166
167void wxComboBox::SetString(int n, const wxString& s)
168{
169 wxXmString text(s);
170 Widget listBox = GetXmList(this);
171
172 // delete the item and add it again.
173 // FIXME isn't there a way to change it in place?
174 XmListDeletePos (listBox, n+1);
175 XmListAddItem (listBox, text(), n+1);
176}
177
178void wxComboBox::SetValue(const wxString& value)
179{
180 m_inSetValue = true;
181
182 XtVaSetValues( GetXmText(this),
d3a80c92 183 XmNvalue, wxConstCast(value.c_str(), char),
9b1bd0c6
MB
184 NULL);
185
186 m_inSetValue = false;
187}
188
189int wxComboBox::DoAppend(const wxString& item)
190{
191 wxXmString str( item.c_str() );
192 XmComboBoxAddItem((Widget) m_mainWidget, str(), 0, False);
9b1bd0c6 193 m_noStrings ++;
e1aae528 194 AdjustDropDownListSize();
9b1bd0c6
MB
195
196 return GetCount() - 1;
197}
198
199void wxComboBox::Delete(int n)
200{
201#ifdef LESSTIF_VERSION
202 XmListDeletePos (GetXmList(this), n + 1);
203#else
204 XmComboBoxDeletePos((Widget) m_mainWidget, n+1);
205#endif
206
9b1bd0c6
MB
207 m_clientDataDict.Delete(n, HasClientObjectData());
208 m_noStrings--;
e1aae528
MB
209
210 AdjustDropDownListSize();
9b1bd0c6
MB
211}
212
213void wxComboBox::Clear()
214{
215#ifdef LESSTIF_VERSION
216 XmListDeleteAllItems (GetXmList(this));
217#else
218 while(m_noStrings > 0)
219 {
220 XmComboBoxDeletePos((Widget) m_mainWidget, m_noStrings--);
221 }
e1aae528 222#endif
9b1bd0c6
MB
223
224 if ( HasClientObjectData() )
225 m_clientDataDict.DestroyData();
226 m_noStrings = 0;
e1aae528 227 AdjustDropDownListSize();
9b1bd0c6
MB
228}
229
230void wxComboBox::SetSelection (int n)
231{
d40708e2 232#if wxCHECK_LESSTIF()
9b1bd0c6
MB
233 XmListSelectPos (GetXmList(this), n + 1, false);
234 SetValue(GetString(n));
235#else
d40708e2 236#if 0
9b1bd0c6
MB
237 wxXmString str( GetString(n).c_str() );
238 XmComboBoxSelectItem((Widget) m_mainWidget, str());
d40708e2 239#endif
9b1bd0c6 240 XtVaSetValues( (Widget)m_mainWidget,
d40708e2 241 XmNselectedPosition, n,
9b1bd0c6
MB
242 NULL );
243#endif
9b1bd0c6
MB
244}
245
246int wxComboBox::GetSelection (void) const
247{
248 return wxDoGetSelectionInList( GetXmList( this ) );
249}
250
251wxString wxComboBox::GetString(int n) const
252{
e1aae528 253 return wxDoGetStringInList( GetXmList(this), n );
9b1bd0c6
MB
254}
255
256int wxComboBox::FindString(const wxString& s) const
257{
258 return wxDoFindStringInList( GetXmList( this ), s );
259}
260
261// Clipboard operations
262void wxComboBox::Copy()
263{
100f9289 264 XmTextCopy( GetXmText(this), CurrentTime );
9b1bd0c6
MB
265}
266
267void wxComboBox::Cut()
268{
100f9289 269 XmTextCut( GetXmText(this), CurrentTime );
9b1bd0c6
MB
270}
271
272void wxComboBox::Paste()
273{
100f9289 274 XmTextPaste( GetXmText(this) );
9b1bd0c6
MB
275}
276
277void wxComboBox::SetEditable(bool WXUNUSED(editable))
278{
279 // TODO
280}
281
282void wxComboBox::SetInsertionPoint(long pos)
283{
100f9289 284 XmTextSetInsertionPosition( GetXmText(this), (XmTextPosition)pos );
9b1bd0c6
MB
285}
286
287void wxComboBox::SetInsertionPointEnd()
288{
100f9289 289 SetInsertionPoint( GetLastPosition() );
9b1bd0c6
MB
290}
291
292long wxComboBox::GetInsertionPoint() const
293{
100f9289 294 return (long)XmTextGetInsertionPosition( GetXmText(this) );
9b1bd0c6
MB
295}
296
297long wxComboBox::GetLastPosition() const
298{
100f9289
MB
299 XmTextPosition pos = XmTextGetLastPosition( GetXmText(this) );
300 return (long)pos;
9b1bd0c6
MB
301}
302
303void wxComboBox::Replace(long from, long to, const wxString& value)
100f9289
MB
304{
305 XmTextReplace( GetXmText(this), (XmTextPosition)from, (XmTextPosition)to,
d3a80c92 306 wxConstCast(value.c_str(), char) );
9b1bd0c6
MB
307}
308
309void wxComboBox::Remove(long from, long to)
310{
100f9289
MB
311 SetSelection( from, to );
312 XmTextRemove( GetXmText(this) );
9b1bd0c6
MB
313}
314
315void wxComboBox::SetSelection(long from, long to)
316{
100f9289
MB
317 if( to == -1 )
318 to = GetLastPosition();
319
320 XmTextSetSelection( GetXmText(this), (XmTextPosition)from,
321 (XmTextPosition)to, (Time)0 );
9b1bd0c6
MB
322}
323
324void wxComboBoxCallback (Widget WXUNUSED(w), XtPointer clientData,
325 XmComboBoxCallbackStruct * cbs)
326{
327 wxComboBox *item = (wxComboBox *) clientData;
328
329 switch (cbs->reason)
330 {
331 case XmCR_SELECT:
332#if 0
333 case XmCR_SINGLE_SELECT:
334 case XmCR_BROWSE_SELECT:
335#endif
336 {
337 wxCommandEvent event (wxEVT_COMMAND_COMBOBOX_SELECTED,
338 item->GetId());
339 int idx = cbs->item_position - 1;
340 event.m_commandInt = idx;
341 event.m_commandString = item->GetString (idx);
342 if ( item->HasClientObjectData() )
343 event.SetClientObject( item->GetClientObject(idx) );
344 else if ( item->HasClientUntypedData() )
345 event.SetClientData( item->GetClientData(idx) );
346 event.m_extraLong = true;
347 event.SetEventObject(item);
348 item->ProcessCommand (event);
349 break;
350 }
351 case XmCR_VALUE_CHANGED:
352 {
353 wxCommandEvent event (wxEVT_COMMAND_TEXT_UPDATED, item->GetId());
354 event.m_commandInt = -1;
355 event.m_commandString = item->GetValue();
356 event.m_extraLong = true;
357 event.SetEventObject(item);
358 item->ProcessCommand (event);
359 break;
360 }
361 default:
362 break;
363 }
364}
365
366void wxComboBox::ChangeFont(bool keepOriginalSize)
367{
e1aae528
MB
368 if( m_font.Ok() )
369 {
370 wxDoChangeFont( GetXmText(this), m_font );
371 wxDoChangeFont( GetXmList(this), m_font );
372 }
373
9b1bd0c6
MB
374 // Don't use the base class wxChoice's ChangeFont
375 wxWindow::ChangeFont(keepOriginalSize);
376}
377
378void wxComboBox::ChangeBackgroundColour()
379{
380 wxWindow::ChangeBackgroundColour();
381}
382
383void wxComboBox::ChangeForegroundColour()
384{
385 wxWindow::ChangeForegroundColour();
386}
387
388wxSize wxComboBox::DoGetBestSize() const
389{
e1aae528
MB
390 if( (GetWindowStyle() & wxCB_DROPDOWN) == wxCB_DROPDOWN ||
391 (GetWindowStyle() & wxCB_READONLY) == wxCB_READONLY )
392 {
393 Dimension arrowW, arrowS, highlight, xmargin, ymargin, shadow;
394
395 XtVaGetValues( (Widget)m_mainWidget,
396 XmNarrowSize, &arrowW,
397 XmNarrowSpacing, &arrowS,
398 XmNhighlightThickness, &highlight,
399 XmNmarginWidth, &xmargin,
400 XmNmarginHeight, &ymargin,
401 XmNshadowThickness, &shadow,
402 NULL );
403
404 wxSize listSize = wxDoGetListBoxBestSize( GetXmList(this), this );
405 wxSize textSize = wxDoGetSingleTextCtrlBestSize( GetXmText(this),
406 this );
407
408 // FIXME arbitrary constants
409 return wxSize( listSize.x + arrowW + arrowS + 2 * highlight
410 + 2 * shadow + 2 * xmargin ,
411 textSize.y + 2 * highlight + 2 * ymargin + 2 * shadow );
412 }
413 else
414 return wxWindow::DoGetBestSize();
9b1bd0c6
MB
415}
416
417#endif // XmVersion >= 2000
418
419#endif // wxUSE_COMBOBOX