1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: wxComboBox class
4 // Author: Julian Smart
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
13 #pragma implementation "combobox.h"
20 #include "wx/combobox.h"
21 #include "wx/arrstr.h"
24 #pragma message disable nosimpint
28 #pragma message enable nosimpint
31 // use the old, GPL'd combobox
32 #if (XmVersion < 2000)
34 #include "xmcombo/xmcombo.h"
36 #include "wx/motif/private.h"
38 void wxComboBoxCallback (Widget w
, XtPointer clientData
,
39 XmComboBoxSelectionCallbackStruct
* cbs
);
41 IMPLEMENT_DYNAMIC_CLASS(wxComboBox
, wxControl
)
43 bool wxComboBox
::Create(wxWindow
*parent
, wxWindowID id
,
44 const wxString
& value
,
47 int n
, const wxString choices
[],
49 const wxValidator
& validator
,
52 if( !CreateControl( parent
, id
, pos
, size
, style
, validator
, name
) )
57 Widget parentWidget
= (Widget
) parent
->GetClientWidget();
59 Widget buttonWidget
= XtVaCreateManagedWidget(name
.c_str(),
60 xmComboBoxWidgetClass
, parentWidget
,
64 XmNeditable
, ((style
& wxCB_READONLY
) != wxCB_READONLY
),
65 XmNsorted
, ((style
& wxCB_SORT
) == wxCB_SORT
),
66 XmNstaticList
, ((style
& wxCB_SIMPLE
) == wxCB_SIMPLE
),
70 for (i
= 0; i
< n
; i
++)
72 wxXmString
str( choices
[i
] );
73 XmComboBoxAddItem(buttonWidget
, str(), 0);
74 m_stringList
.Add(choices
[i
]);
77 m_mainWidget
= (Widget
) buttonWidget
;
79 XtManageChild (buttonWidget
);
85 XtAddCallback (buttonWidget
, XmNselectionCallback
, (XtCallbackProc
) wxComboBoxCallback
,
87 XtAddCallback (buttonWidget
, XmNvalueChangedCallback
, (XtCallbackProc
) wxComboBoxCallback
,
90 AttachWidget (parent
, m_mainWidget
, (WXWidget
) NULL
, pos
.x
, pos
.y
, size
.x
, size
.y
);
92 ChangeBackgroundColour();
97 bool wxComboBox
::Create(wxWindow
*parent
, wxWindowID id
,
98 const wxString
& value
,
101 const wxArrayString
& choices
,
103 const wxValidator
& validator
,
104 const wxString
& name
)
106 wxCArrayString
chs(choices
);
107 return Create(parent
, id
, value
, pos
, size
, chs
.GetCount(),
108 chs
.GetStrings(), style
, validator
, name
);
111 wxComboBox
::~wxComboBox()
113 DetachWidget((Widget
) m_mainWidget
); // Removes event handlers
114 XtDestroyWidget((Widget
) m_mainWidget
);
115 m_mainWidget
= (WXWidget
) 0;
116 if ( HasClientObjectData() )
117 m_clientDataDict
.DestroyData();
120 void wxComboBox
::DoSetSize(int x
, int y
, int width
, int height
, int sizeFlags
)
122 // Necessary so it doesn't call wxChoice::SetSize
123 wxWindow
::DoSetSize(x
, y
, width
, DoGetBestSize().y
, sizeFlags
);
126 wxString wxComboBox
::GetValue() const
128 char *s
= XmComboBoxGetString ((Widget
) m_mainWidget
);
136 return wxEmptyString
;
139 void wxComboBox
::SetValue(const wxString
& value
)
143 XmComboBoxSetString( (Widget
)m_mainWidget
,
144 wxConstCast(value
.c_str(), char) );
145 m_inSetValue
= FALSE
;
148 void wxComboBox
::SetString(int n
, const wxString
& s
)
150 wxFAIL_MSG( wxT("wxComboBox::SetString only implemented for Motif 2.0") );
153 int wxComboBox
::DoAppend(const wxString
& item
)
155 wxXmString
str( item
.c_str() );
156 XmComboBoxAddItem((Widget
) m_mainWidget
, str(), 0);
157 m_stringList
.Add(item
);
160 return GetCount() - 1;
163 int wxComboBox
::DoInsert(const wxString
& item
, int pos
)
165 wxCHECK_MSG(!(GetWindowStyle() & wxCB_SORT
), -1, wxT("can't insert into sorted list"));
166 wxCHECK_MSG((pos
>=0) && (pos
<=GetCount()), -1, wxT("invalid index"));
168 if (pos
== GetCount())
169 return DoAppend(item
);
171 wxXmString
str( item
.c_str() );
172 XmComboBoxAddItem((Widget
) m_mainWidget
, str(), pos
+1);
173 wxChar
* copy
= wxStrcpy(new wxChar
[item
.length() + 1], item
.c_str());
174 m_stringList
.Insert(pos
, copy
);
180 void wxComboBox
::Delete(int n
)
182 XmComboBoxDeletePos((Widget
) m_mainWidget
, n
+1);
183 wxStringList
::Node
*node
= m_stringList
.Item(n
);
186 delete[] node
->GetData();
189 m_clientDataDict
.Delete(n
, HasClientObjectData());
193 void wxComboBox
::Clear()
195 XmComboBoxDeleteAllItems((Widget
) m_mainWidget
);
196 m_stringList
.Clear();
198 if ( HasClientObjectData() )
199 m_clientDataDict
.DestroyData();
203 void wxComboBox
::SetSelection (int n
)
205 XmComboBoxSelectPos((Widget
) m_mainWidget
, n
+1, False
);
208 int wxComboBox
::GetSelection (void) const
210 int sel
= XmComboBoxGetSelectedPos((Widget
) m_mainWidget
);
217 wxString wxComboBox
::GetString(int n
) const
219 wxStringList
::Node
*node
= m_stringList
.Item(n
);
221 return wxString(node
->GetData ());
223 return wxEmptyString
;
226 int wxComboBox
::FindString(const wxString
& s
) const
228 int *pos_list
= NULL
;
230 wxXmString
text( s
);
231 bool found
= (XmComboBoxGetMatchPos((Widget
) m_mainWidget
,
232 text(), &pos_list
, &count
) != 0);
234 if (found
&& count
> 0)
236 int pos
= pos_list
[0] - 1;
244 // Clipboard operations
245 void wxComboBox
::Copy()
247 XmComboBoxCopy((Widget
) m_mainWidget
, CurrentTime
);
250 void wxComboBox
::Cut()
252 XmComboBoxCut((Widget
) m_mainWidget
, CurrentTime
);
255 void wxComboBox
::Paste()
257 XmComboBoxPaste((Widget
) m_mainWidget
);
260 void wxComboBox
::SetEditable(bool WXUNUSED(editable
))
265 void wxComboBox
::SetInsertionPoint(long pos
)
267 XmComboBoxSetInsertionPosition ((Widget
) m_mainWidget
, (XmTextPosition
) pos
);
270 void wxComboBox
::SetInsertionPointEnd()
272 XmTextPosition pos
= XmComboBoxGetLastPosition ((Widget
) m_mainWidget
);
273 XmComboBoxSetInsertionPosition ((Widget
) m_mainWidget
, (XmTextPosition
) (pos
+ 1));
276 long wxComboBox
::GetInsertionPoint() const
278 return (long) XmComboBoxGetInsertionPosition ((Widget
) m_mainWidget
);
281 long wxComboBox
::GetLastPosition() const
283 return (long) XmComboBoxGetLastPosition ((Widget
) m_mainWidget
);
286 void wxComboBox
::Replace(long from
, long to
, const wxString
& value
)
288 XmComboBoxReplace ((Widget
) m_mainWidget
, (XmTextPosition
) from
,
290 wxConstCast(value
.c_str(), char));
293 void wxComboBox
::Remove(long from
, long to
)
295 XmComboBoxSetSelection ((Widget
) m_mainWidget
, (XmTextPosition
) from
, (XmTextPosition
) to
,
297 XmComboBoxRemove ((Widget
) m_mainWidget
);
300 void wxComboBox
::SetSelection(long from
, long to
)
302 XmComboBoxSetSelection ((Widget
) m_mainWidget
, (XmTextPosition
) from
, (XmTextPosition
) to
,
306 void wxComboBoxCallback (Widget
WXUNUSED(w
), XtPointer clientData
,
307 XmComboBoxSelectionCallbackStruct
* cbs
)
309 wxComboBox
*item
= (wxComboBox
*) clientData
;
313 case XmCR_SINGLE_SELECT
:
314 case XmCR_BROWSE_SELECT
:
316 wxCommandEvent
event (wxEVT_COMMAND_COMBOBOX_SELECTED
,
318 event
.m_commandInt
= cbs
->index
- 1;
319 event
.m_commandString
= item
->GetString (event
.m_commandInt
);
320 if ( item
->HasClientObjectData() )
321 event
.SetClientObject( item
->GetClientObject(cbs
->index
- 1) );
322 else if ( item
->HasClientUntypedData() )
323 event
.SetClientData( item
->GetClientData(cbs
->index
- 1) );
324 event
.m_extraLong
= TRUE
;
325 event
.SetEventObject(item
);
326 item
->ProcessCommand (event
);
329 case XmCR_VALUE_CHANGED
:
331 wxCommandEvent
event (wxEVT_COMMAND_TEXT_UPDATED
, item
->GetId());
332 event
.m_commandInt
= -1;
333 event
.m_commandString
= item
->GetValue();
334 event
.m_extraLong
= TRUE
;
335 event
.SetEventObject(item
);
336 item
->ProcessCommand (event
);
344 void wxComboBox
::ChangeFont(bool keepOriginalSize
)
346 // Don't use the base class wxChoice's ChangeFont
347 wxWindow
::ChangeFont(keepOriginalSize
);
350 void wxComboBox
::ChangeBackgroundColour()
352 wxWindow
::ChangeBackgroundColour();
355 void wxComboBox
::ChangeForegroundColour()
357 wxWindow
::ChangeForegroundColour();
360 wxSize wxComboBox
::DoGetBestSize() const
362 if( (GetWindowStyle() & wxCB_DROPDOWN
) == wxCB_DROPDOWN
||
363 (GetWindowStyle() & wxCB_READONLY
) == wxCB_READONLY
)
365 wxSize items
= GetItemsSize();
366 // FIXME arbitrary constants
367 return wxSize( ( items
.x ? items
.x
+ 50 : 120 ),
371 return wxWindow
::DoGetBestSize();
374 #endif // XmVersion < 2000
376 #endif // wxUSE_COMBOBOX