// Created: 17/09/98
// RCS-ID: $Id$
// Copyright: (c) Julian Smart
-// Licence: wxWindows licence
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
#ifdef __GNUG__
#include "wx/combobox.h"
-#if !USE_SHARED_LIBRARY
-IMPLEMENT_DYNAMIC_CLASS(wxComboBox, wxControl)
+#if wxUSE_COMBOBOX
+
+#ifdef __VMS__
+#pragma message disable nosimpint
+#endif
+#include <Xm/Xm.h>
+#ifdef __VMS__
+#pragma message enable nosimpint
#endif
+#include "xmcombo/xmcombo.h"
+
+void wxComboBoxCallback (Widget w, XtPointer clientData,
+ XmComboBoxSelectionCallbackStruct * cbs);
+
+IMPLEMENT_DYNAMIC_CLASS(wxComboBox, wxControl)
bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
- const wxString& value,
- const wxPoint& pos,
- const wxSize& size,
- int n, const wxString choices[],
- long style,
- const wxValidator& validator,
- const wxString& name)
+ const wxString& value,
+ const wxPoint& pos,
+ const wxSize& size,
+ int n, const wxString choices[],
+ long style,
+ const wxValidator& validator,
+ const wxString& name)
{
SetName(name);
SetValidator(validator);
m_noStrings = n;
m_windowStyle = style;
+ // m_backgroundColour = parent->GetBackgroundColour();
+ m_backgroundColour = * wxWHITE;
+ m_foregroundColour = parent->GetForegroundColour();
if (parent) parent->AddChild(this);
if ( id == -1 )
- m_windowId = (int)NewControlId();
+ m_windowId = (int)NewControlId();
else
- m_windowId = id;
+ m_windowId = id;
+
+ Widget parentWidget = (Widget) parent->GetClientWidget();
+
+ Widget buttonWidget = XtVaCreateManagedWidget(name.c_str(),
+ xmComboBoxWidgetClass, parentWidget,
+ XmNmarginHeight, 0,
+ XmNmarginWidth, 0,
+ XmNshowLabel, False,
+ XmNeditable, ((style & wxCB_READONLY) != wxCB_READONLY),
+ XmNsorted, ((style & wxCB_SORT) == wxCB_SORT),
+ XmNstaticList, ((style & wxCB_SIMPLE) == wxCB_SIMPLE),
+ NULL);
+
+ int i;
+ for (i = 0; i < n; i++)
+ {
+ XmString str = XmStringCreateLtoR((char*) (const char*) choices[i], XmSTRING_DEFAULT_CHARSET);
+ XmComboBoxAddItem(buttonWidget, str, 0);
+ XmStringFree(str);
+ m_stringList.Add(choices[i]);
+ }
+ m_noStrings = n;
+
+ m_mainWidget = (Widget) buttonWidget;
- // TODO: create combobox control
+ XtManageChild (buttonWidget);
+
+ SetValue(value);
+
+ m_font = parent->GetFont();
+ ChangeFont(FALSE);
+
+ XtAddCallback (buttonWidget, XmNselectionCallback, (XtCallbackProc) wxComboBoxCallback,
+ (XtPointer) this);
+ XtAddCallback (buttonWidget, XmNvalueChangedCallback, (XtCallbackProc) wxComboBoxCallback,
+ (XtPointer) this);
+
+ SetCanAddEventHandler(TRUE);
+ AttachWidget (parent, m_mainWidget, (WXWidget) NULL, pos.x, pos.y, size.x, size.y);
+
+ ChangeBackgroundColour();
return TRUE;
}
+wxComboBox::~wxComboBox()
+{
+ DetachWidget((Widget) m_mainWidget); // Removes event handlers
+ XtDestroyWidget((Widget) m_mainWidget);
+ m_mainWidget = (WXWidget) 0;
+}
+
+void wxComboBox::DoSetSize(int x, int y, int width, int height, int sizeFlags)
+{
+ // Necessary so it doesn't call wxChoice::SetSize
+ wxWindow::DoSetSize(x, y, width, height, sizeFlags);
+}
+
wxString wxComboBox::GetValue() const
{
- // TODO
- return wxString("");
+ char *s = XmComboBoxGetString ((Widget) m_mainWidget);
+ if (s)
+ {
+ wxString str(s);
+ XtFree (s);
+ return str;
+ }
+ else
+ return wxEmptyString;
}
void wxComboBox::SetValue(const wxString& value)
{
- // TODO
+ m_inSetValue = TRUE;
+ if (!value.IsNull())
+ XmComboBoxSetString ((Widget) m_mainWidget, (char*) (const char*) value);
+ m_inSetValue = FALSE;
+}
+
+void wxComboBox::Append(const wxString& item)
+{
+ XmString str = XmStringCreateLtoR((char*) (const char*) item, XmSTRING_DEFAULT_CHARSET);
+ XmComboBoxAddItem((Widget) m_mainWidget, str, 0);
+ m_stringList.Add(item);
+ XmStringFree(str);
+ m_noStrings ++;
+}
+
+void wxComboBox::Delete(int n)
+{
+ XmComboBoxDeletePos((Widget) m_mainWidget, n-1);
+ wxNode *node = m_stringList.Nth(n);
+ if (node)
+ {
+ delete[] (char *)node->Data();
+ delete node;
+ }
+ node = m_clientList.Nth( n );
+ if (node)
+ {
+ if ( HasClientObjectData() )
+ {
+ delete (wxClientData *)node->Data();
+ }
+ delete node;
+ }
+
+ m_noStrings--;
+}
+
+void wxComboBox::Clear()
+{
+ XmComboBoxDeleteAllItems((Widget) m_mainWidget);
+ m_stringList.Clear();
+
+ if ( HasClientObjectData() )
+ {
+ // destroy the data (due to Robert's idea of using wxList<wxObject>
+ // and not wxList<wxClientData> we can't just say
+ // m_clientList.DeleteContents(TRUE) - this would crash!
+ wxNode *node = m_clientList.First();
+ while ( node )
+ {
+ delete (wxClientData *)node->Data();
+ node = node->Next();
+ }
+ }
+ m_clientList.Clear();
+ m_noStrings = 0;
+}
+
+void wxComboBox::SetSelection (int n)
+{
+ XmComboBoxSelectPos((Widget) m_mainWidget, n+1, False);
+}
+
+int wxComboBox::GetSelection (void) const
+{
+ int sel = XmComboBoxGetSelectedPos((Widget) m_mainWidget);
+ if (sel == 0)
+ return -1;
+ else
+ return sel - 1;
+}
+
+wxString wxComboBox::GetString(int n) const
+{
+ wxNode *node = m_stringList.Nth (n);
+ if (node)
+ return wxString((char *) node->Data ());
+ else
+ return wxEmptyString;
+}
+
+wxString wxComboBox::GetStringSelection() const
+{
+ int sel = GetSelection();
+ if (sel == -1)
+ return wxEmptyString;
+ else
+ return GetString(sel);
+}
+
+bool wxComboBox::SetStringSelection(const wxString& sel)
+{
+ int n = FindString(sel);
+ if (n == -1)
+ return FALSE;
+ else
+ {
+ SetSelection(n);
+ return TRUE;
+ }
+}
+
+int wxComboBox::FindString(const wxString& s) const
+{
+ int *pos_list = NULL;
+ int count = 0;
+ XmString text = XmStringCreateSimple ((char*) (const char*) s);
+ bool found = (XmComboBoxGetMatchPos((Widget) m_mainWidget,
+ text, &pos_list, &count) != 0);
+
+ XmStringFree(text);
+
+ if (found && count > 0)
+ {
+ int pos = pos_list[0] - 1;
+ free(pos_list);
+ return pos;
+ }
+
+ return -1;
}
// Clipboard operations
void wxComboBox::Copy()
{
- // TODO
+ XmComboBoxCopy((Widget) m_mainWidget, CurrentTime);
}
void wxComboBox::Cut()
{
- // TODO
+ XmComboBoxCut((Widget) m_mainWidget, CurrentTime);
}
void wxComboBox::Paste()
{
- // TODO
+ XmComboBoxPaste((Widget) m_mainWidget);
}
-void wxComboBox::SetEditable(bool editable)
+void wxComboBox::SetEditable(bool WXUNUSED(editable))
{
// TODO
}
void wxComboBox::SetInsertionPoint(long pos)
{
- // TODO
+ XmComboBoxSetInsertionPosition ((Widget) m_mainWidget, (XmTextPosition) pos);
}
void wxComboBox::SetInsertionPointEnd()
{
- // TODO
+ XmTextPosition pos = XmComboBoxGetLastPosition ((Widget) m_mainWidget);
+ XmComboBoxSetInsertionPosition ((Widget) m_mainWidget, (XmTextPosition) (pos + 1));
}
long wxComboBox::GetInsertionPoint() const
{
- // TODO
- return 0;
+ return (long) XmComboBoxGetInsertionPosition ((Widget) m_mainWidget);
}
long wxComboBox::GetLastPosition() const
{
- // TODO
- return 0;
+ return (long) XmComboBoxGetLastPosition ((Widget) m_mainWidget);
}
void wxComboBox::Replace(long from, long to, const wxString& value)
{
- // TODO
+ XmComboBoxReplace ((Widget) m_mainWidget, (XmTextPosition) from, (XmTextPosition) to,
+ (char*) (const char*) value);
}
void wxComboBox::Remove(long from, long to)
{
- // TODO
+ XmComboBoxSetSelection ((Widget) m_mainWidget, (XmTextPosition) from, (XmTextPosition) to,
+ (Time) 0);
+ XmComboBoxRemove ((Widget) m_mainWidget);
}
void wxComboBox::SetSelection(long from, long to)
{
- // TODO
+ XmComboBoxSetSelection ((Widget) m_mainWidget, (XmTextPosition) from, (XmTextPosition) to,
+ (Time) 0);
}
+void wxComboBoxCallback (Widget WXUNUSED(w), XtPointer clientData,
+ XmComboBoxSelectionCallbackStruct * cbs)
+{
+ wxComboBox *item = (wxComboBox *) clientData;
+
+ switch (cbs->reason)
+ {
+ case XmCR_SINGLE_SELECT:
+ case XmCR_BROWSE_SELECT:
+ {
+ wxCommandEvent event (wxEVT_COMMAND_COMBOBOX_SELECTED, item->GetId());
+ event.m_commandInt = cbs->index - 1;
+ // event.m_commandString = item->GetString (event.m_commandInt);
+ event.m_extraLong = TRUE;
+ event.SetEventObject(item);
+ item->ProcessCommand (event);
+ break;
+ }
+ case XmCR_VALUE_CHANGED:
+ {
+ wxCommandEvent event (wxEVT_COMMAND_TEXT_UPDATED, item->GetId());
+ event.m_commandInt = -1;
+ // event.m_commandString = item->GetValue();
+ event.m_extraLong = TRUE;
+ event.SetEventObject(item);
+ item->ProcessCommand (event);
+ break;
+ }
+ default:
+ break;
+ }
+}
+
+void wxComboBox::ChangeFont(bool keepOriginalSize)
+{
+ // Don't use the base class wxChoice's ChangeFont
+ wxWindow::ChangeFont(keepOriginalSize);
+}
+
+void wxComboBox::ChangeBackgroundColour()
+{
+ wxWindow::ChangeBackgroundColour();
+}
+
+void wxComboBox::ChangeForegroundColour()
+{
+ wxWindow::ChangeBackgroundColour();
+}
+
+#endif
+