src/motif/combobox.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/motif/combobox.cpp
   3 // Purpose:     wxComboBox class
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     17/09/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #if wxUSE_COMBOBOX
  16
  17 #include "wx/combobox.h"
  18
  19 #ifndef WX_PRECOMP
  20     #include "wx/arrstr.h"
  21 #endif
  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 old, GPL'd combobox
  32 #if (XmVersion < 2000)
  33
  34 #include "xmcombo/xmcombo.h"
  35
  36 #include "wx/motif/private.h"
  37
  38 void  wxComboBoxCallback (Widget w, XtPointer clientData,
  39                           XmComboBoxSelectionCallbackStruct * cbs);
  40
  41 IMPLEMENT_DYNAMIC_CLASS(wxComboBox, wxControl)
  42
  43 bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
  44                         const wxString& value,
  45                         const wxPoint& pos,
  46                         const wxSize& size,
  47                         int n, const wxString choices[],
  48                         long style,
  49                         const wxValidator& validator,
  50                         const wxString& name)
  51 {
  52     if( !CreateControl( parent, id, pos, size, style, validator, name ) )
  53         return false;
  54     PreCreation();
  55
  56     m_noStrings = n;
  57
  58     Widget parentWidget = (Widget) parent->GetClientWidget();
  59
  60     Widget buttonWidget = XtVaCreateManagedWidget(name.c_str(),
  61         xmComboBoxWidgetClass, parentWidget,
  62         XmNmarginHeight, 0,
  63         XmNmarginWidth, 0,
  64         XmNshowLabel, False,
  65         XmNeditable, ((style & wxCB_READONLY) != wxCB_READONLY),
  66         XmNsorted, ((style & wxCB_SORT) == wxCB_SORT),
  67         XmNstaticList, ((style & wxCB_SIMPLE) == wxCB_SIMPLE),
  68         NULL);
  69
  70     int i;
  71     for (i = 0; i < n; i++)
  72     {
  73         wxXmString str( choices[i] );
  74         XmComboBoxAddItem(buttonWidget, str(), 0);
  75         m_stringList.Add(choices[i]);
  76     }
  77
  78     m_mainWidget = (Widget) buttonWidget;
  79
  80     XtManageChild (buttonWidget);
  81
  82     SetValue(value);
  83
  84     XtAddCallback (buttonWidget, XmNselectionCallback, (XtCallbackProc) wxComboBoxCallback,
  85         (XtPointer) this);
  86     XtAddCallback (buttonWidget, XmNvalueChangedCallback, (XtCallbackProc) wxComboBoxCallback,
  87         (XtPointer) this);
  88
  89     PostCreation();
  90     AttachWidget (parent, m_mainWidget, (WXWidget) NULL, pos.x, pos.y, size.x, size.y);
  91
  92     return true;
  93 }
  94
  95 bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
  96                         const wxString& value,
  97                         const wxPoint& pos,
  98                         const wxSize& size,
  99                         const wxArrayString& choices,
 100                         long style,
 101                         const wxValidator& validator,
 102                         const wxString& name)
 103 {
 104     wxCArrayString chs(choices);
 105     return Create(parent, id, value, pos, size, chs.GetCount(),
 106                   chs.GetStrings(), style, validator, name);
 107 }
 108
 109 wxComboBox::~wxComboBox()
 110 {
 111     DetachWidget((Widget) m_mainWidget); // Removes event handlers
 112     XtDestroyWidget((Widget) m_mainWidget);
 113     m_mainWidget = (WXWidget) 0;
 114 }
 115
 116 void wxComboBox::DoSetSize(int x, int y,
 117                            int width, int WXUNUSED(height),
 118                            int sizeFlags)
 119 {
 120     // Necessary so it doesn't call wxChoice::SetSize
 121     wxWindow::DoSetSize(x, y, width, DoGetBestSize().y, sizeFlags);
 122 }
 123
 124 wxString wxComboBox::GetValue() const
 125 {
 126     char *s = XmComboBoxGetString ((Widget) m_mainWidget);
 127     if (s)
 128     {
 129         wxString str(s);
 130         XtFree (s);
 131         return str;
 132     }
 133     else
 134         return wxEmptyString;
 135 }
 136
 137 void wxComboBox::SetValue(const wxString& value)
 138 {
 139     if( !value.empty() )
 140     {
 141         m_inSetValue = true;
 142         XmComboBoxSetString((Widget)m_mainWidget, value.char_str());
 143         m_inSetValue = false;
 144     }
 145 }
 146
 147 void wxComboBox::SetString(unsigned int WXUNUSED(n), const wxString& WXUNUSED(s))
 148 {
 149     wxFAIL_MSG( wxT("wxComboBox::SetString only implemented for Motif 2.0") );
 150 }
 151
 152 // TODO auto-sorting is not supported by the code
 153 int wxComboBox::DoInsertItems(const wxArrayStringsAdapter& items,
 154                               unsigned int pos,
 155                               void **clientData,
 156                               wxClientDataType type)
 157 {
 158     const unsigned int numItems = items.GetCount();
 159
 160     AllocClientData(numItems);
 161     for( unsigned int i = 0; i < numItems; ++i, ++pos )
 162     {
 163         wxXmString str( items[i].c_str() );
 164         XmComboBoxAddItem((Widget) m_mainWidget, str(), GetMotifPosition(pos));
 165         wxChar* copy = wxStrcpy(new wxChar[items[i].length() + 1], items[i].c_str());
 166         m_stringList.Insert(pos, copy);
 167         m_noStrings ++;
 168         InsertNewItemClientData(pos, clientData, i, type);
 169     }
 170
 171     return pos - 1;
 172 }
 173
 174 void wxComboBox::DoDeleteOneItem(unsigned int n)
 175 {
 176     XmComboBoxDeletePos((Widget) m_mainWidget, n+1);
 177     wxStringList::Node *node = m_stringList.Item(n);
 178     if (node)
 179     {
 180         delete[] node->GetData();
 181         delete node;
 182     }
 183     wxControlWithItems::DoDeleteOneItem(n);
 184     m_noStrings--;
 185 }
 186
 187 void wxComboBox::DoClear()
 188 {
 189     XmComboBoxDeleteAllItems((Widget) m_mainWidget);
 190     m_stringList.Clear();
 191
 192     wxControlWithItems::DoClear();
 193     m_noStrings = 0;
 194 }
 195
 196 void wxComboBox::SetSelection (int n)
 197 {
 198     XmComboBoxSelectPos((Widget) m_mainWidget, n+1, False);
 199 }
 200
 201 int wxComboBox::GetSelection (void) const
 202 {
 203     int sel = XmComboBoxGetSelectedPos((Widget) m_mainWidget);
 204     if (sel == 0)
 205         return -1;
 206     else
 207         return sel - 1;
 208 }
 209
 210 wxString wxComboBox::GetString(unsigned int n) const
 211 {
 212     wxStringList::Node *node = m_stringList.Item(n);
 213     if (node)
 214         return wxString(node->GetData ());
 215     else
 216         return wxEmptyString;
 217 }
 218
 219 int wxComboBox::FindString(const wxString& s, bool WXUNUSED(bCase)) const
 220 {
 221     // FIXME: back to base class for not supported value of bCase
 222
 223     int *pos_list = NULL;
 224     int count = 0;
 225     wxXmString text( s );
 226     bool found = (XmComboBoxGetMatchPos((Widget) m_mainWidget,
 227         text(), &pos_list, &count) != 0);
 228
 229     if (found && count > 0)
 230     {
 231         int pos = pos_list[0] - 1;
 232         free(pos_list);
 233         return pos;
 234     }
 235
 236     return wxNOT_FOUND;
 237 }
 238
 239 void  wxComboBoxCallback (Widget WXUNUSED(w), XtPointer clientData,
 240                           XmComboBoxSelectionCallbackStruct * cbs)
 241 {
 242     wxComboBox *item = (wxComboBox *) clientData;
 243
 244     switch (cbs->reason)
 245     {
 246     case XmCR_SINGLE_SELECT:
 247     case XmCR_BROWSE_SELECT:
 248         {
 249             wxCommandEvent event (wxEVT_COMMAND_COMBOBOX_SELECTED,
 250                                   item->GetId());
 251             event.SetInt(cbs->index - 1);
 252             event.SetString( item->GetString ( event.GetInt() ) );
 253             if ( item->HasClientObjectData() )
 254                 event.SetClientObject( item->GetClientObject(cbs->index - 1) );
 255             else if ( item->HasClientUntypedData() )
 256                 event.SetClientData( item->GetClientData(cbs->index - 1) );
 257             event.SetExtraLong(true);
 258             event.SetEventObject(item);
 259             item->ProcessCommand (event);
 260             break;
 261         }
 262     case XmCR_VALUE_CHANGED:
 263         {
 264             wxCommandEvent event (wxEVT_COMMAND_TEXT_UPDATED, item->GetId());
 265             event.SetInt(-1);
 266             event.SetString( item->GetValue() );
 267             event.SetExtraLong(true);
 268             event.SetEventObject(item);
 269             item->ProcessCommand (event);
 270             break;
 271         }
 272     default:
 273         break;
 274     }
 275 }
 276
 277 void wxComboBox::ChangeFont(bool keepOriginalSize)
 278 {
 279     // Don't use the base class wxChoice's ChangeFont
 280     wxWindow::ChangeFont(keepOriginalSize);
 281 }
 282
 283 void wxComboBox::ChangeBackgroundColour()
 284 {
 285     wxWindow::ChangeBackgroundColour();
 286 }
 287
 288 void wxComboBox::ChangeForegroundColour()
 289 {
 290     wxWindow::ChangeForegroundColour();
 291 }
 292
 293 wxSize wxComboBox::DoGetBestSize() const
 294 {
 295     if( (GetWindowStyle() & wxCB_DROPDOWN) == wxCB_DROPDOWN ||
 296         (GetWindowStyle() & wxCB_READONLY) == wxCB_READONLY )
 297     {
 298         wxSize items = GetItemsSize();
 299         // FIXME arbitrary constants
 300         return wxSize( ( items.x ? items.x + 50 : 120 ),
 301                          items.y + 10 );
 302     }
 303     else
 304         return wxWindow::DoGetBestSize();
 305 }
 306
 307 WXWidget wxComboBox::GetTextWidget() const
 308 {
 309     return (WXWidget)XmComboBoxGetEditWidget((Widget) m_mainWidget);
 310 }
 311
 312 #endif // XmVersion < 2000
 313
 314 #endif // wxUSE_COMBOBOX