src/motif/combobox.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        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 #ifdef __GNUG__
  13 #pragma implementation "combobox.h"
  14 #endif
  15
  16 #include "wx/setup.h"
  17
  18 #if wxUSE_COMBOBOX
  19
  20 #include "wx/combobox.h"
  21
  22 #ifdef __VMS__
  23 #pragma message disable nosimpint
  24 #endif
  25 #include <Xm/Xm.h>
  26 #ifdef __VMS__
  27 #pragma message enable nosimpint
  28 #endif
  29
  30 // use the old, GPL'd combobox
  31 #if (XmVersion < 2000)
  32
  33 #include "xmcombo/xmcombo.h"
  34
  35 #include "wx/motif/private.h"
  36
  37 void  wxComboBoxCallback (Widget w, XtPointer clientData,
  38                           XmComboBoxSelectionCallbackStruct * cbs);
  39
  40 IMPLEMENT_DYNAMIC_CLASS(wxComboBox, wxControl)
  41
  42 bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
  43                         const wxString& value,
  44                         const wxPoint& pos,
  45                         const wxSize& size,
  46                         int n, const wxString choices[],
  47                         long style,
  48                         const wxValidator& validator,
  49                         const wxString& name)
  50 {
  51     if( !CreateControl( parent, id, pos, size, style, validator, name ) )
  52         return FALSE;
  53
  54     m_noStrings = n;
  55
  56     Widget parentWidget = (Widget) parent->GetClientWidget();
  57
  58     Widget buttonWidget = XtVaCreateManagedWidget(name.c_str(),
  59         xmComboBoxWidgetClass, parentWidget,
  60         XmNmarginHeight, 0,
  61         XmNmarginWidth, 0,
  62         XmNshowLabel, False,
  63         XmNeditable, ((style & wxCB_READONLY) != wxCB_READONLY),
  64         XmNsorted, ((style & wxCB_SORT) == wxCB_SORT),
  65         XmNstaticList, ((style & wxCB_SIMPLE) == wxCB_SIMPLE),
  66         NULL);
  67
  68     int i;
  69     for (i = 0; i < n; i++)
  70     {
  71         wxXmString str( choices[i] );
  72         XmComboBoxAddItem(buttonWidget, str(), 0);
  73         m_stringList.Add(choices[i]);
  74     }
  75
  76     m_mainWidget = (Widget) buttonWidget;
  77
  78     XtManageChild (buttonWidget);
  79
  80     SetValue(value);
  81
  82     ChangeFont(FALSE);
  83
  84     XtAddCallback (buttonWidget, XmNselectionCallback, (XtCallbackProc) wxComboBoxCallback,
  85         (XtPointer) this);
  86     XtAddCallback (buttonWidget, XmNvalueChangedCallback, (XtCallbackProc) wxComboBoxCallback,
  87         (XtPointer) this);
  88
  89     AttachWidget (parent, m_mainWidget, (WXWidget) NULL, pos.x, pos.y, size.x, size.y);
  90
  91     ChangeBackgroundColour();
  92
  93     return TRUE;
  94 }
  95
  96 wxComboBox::~wxComboBox()
  97 {
  98     DetachWidget((Widget) m_mainWidget); // Removes event handlers
  99     XtDestroyWidget((Widget) m_mainWidget);
 100     m_mainWidget = (WXWidget) 0;
 101     if ( HasClientObjectData() )
 102         m_clientDataDict.DestroyData();
 103 }
 104
 105 void wxComboBox::DoSetSize(int x, int y, int width, int height, int sizeFlags)
 106 {
 107     // Necessary so it doesn't call wxChoice::SetSize
 108     wxWindow::DoSetSize(x, y, width, DoGetBestSize().y, sizeFlags);
 109 }
 110
 111 wxString wxComboBox::GetValue() const
 112 {
 113     char *s = XmComboBoxGetString ((Widget) m_mainWidget);
 114     if (s)
 115     {
 116         wxString str(s);
 117         XtFree (s);
 118         return str;
 119     }
 120     else
 121         return wxEmptyString;
 122 }
 123
 124 void wxComboBox::SetValue(const wxString& value)
 125 {
 126     m_inSetValue = TRUE;
 127     if( !value.empty() )
 128         XmComboBoxSetString( (Widget)m_mainWidget,
 129                              wxConstCast(value.c_str(), char) );
 130     m_inSetValue = FALSE;
 131 }
 132
 133 void wxComboBox::SetString(int n, const wxString& s)
 134 {
 135     wxFAIL_MSG( wxT("wxComboBox::SetString only implemented for Motif 2.0") );
 136 }
 137
 138 int wxComboBox::DoAppend(const wxString& item)
 139 {
 140     wxXmString str( item.c_str() );
 141     XmComboBoxAddItem((Widget) m_mainWidget, str(), 0);
 142     m_stringList.Add(item);
 143     m_noStrings ++;
 144
 145     return GetCount() - 1;
 146 }
 147
 148 int wxComboBox::DoInsert(const wxString& item, int pos)
 149 {
 150     wxCHECK_MSG(!(GetWindowStyle() & wxCB_SORT), -1, wxT("can't insert into sorted list"));
 151     wxCHECK_MSG((pos>=0) && (pos<=GetCount()), -1, wxT("invalid index"));
 152
 153     if (pos == GetCount())
 154         return DoAppend(item);
 155
 156     wxXmString str( item.c_str() );
 157     XmComboBoxAddItem((Widget) m_mainWidget, str(), pos+1);
 158 #ifndef __VMS
 159    //FIX me for VMS : no intance for insert function to overload
 160    m_stringList.Insert(pos, item);
 161 #endif
 162     m_noStrings ++;
 163
 164     return pos;
 165 }
 166
 167 void wxComboBox::Delete(int n)
 168 {
 169     XmComboBoxDeletePos((Widget) m_mainWidget, n+1);
 170     wxStringList::Node *node = m_stringList.Item(n);
 171     if (node)
 172     {
 173         delete[] node->GetData();
 174         delete node;
 175     }
 176     m_clientDataDict.Delete(n, HasClientObjectData());
 177     m_noStrings--;
 178 }
 179
 180 void wxComboBox::Clear()
 181 {
 182     XmComboBoxDeleteAllItems((Widget) m_mainWidget);
 183     m_stringList.Clear();
 184
 185     if ( HasClientObjectData() )
 186         m_clientDataDict.DestroyData();
 187     m_noStrings = 0;
 188 }
 189
 190 void wxComboBox::SetSelection (int n)
 191 {
 192     XmComboBoxSelectPos((Widget) m_mainWidget, n+1, False);
 193 }
 194
 195 int wxComboBox::GetSelection (void) const
 196 {
 197     int sel = XmComboBoxGetSelectedPos((Widget) m_mainWidget);
 198     if (sel == 0)
 199         return -1;
 200     else
 201         return sel - 1;
 202 }
 203
 204 wxString wxComboBox::GetString(int n) const
 205 {
 206     wxStringList::Node *node = m_stringList.Item(n);
 207     if (node)
 208         return wxString(node->GetData ());
 209     else
 210         return wxEmptyString;
 211 }
 212
 213 int wxComboBox::FindString(const wxString& s) const
 214 {
 215     int *pos_list = NULL;
 216     int count = 0;
 217     wxXmString text( s );
 218     bool found = (XmComboBoxGetMatchPos((Widget) m_mainWidget,
 219         text(), &pos_list, &count) != 0);
 220
 221     if (found && count > 0)
 222     {
 223         int pos = pos_list[0] - 1;
 224         free(pos_list);
 225         return pos;
 226     }
 227
 228     return -1;
 229 }
 230
 231 // Clipboard operations
 232 void wxComboBox::Copy()
 233 {
 234     XmComboBoxCopy((Widget) m_mainWidget, CurrentTime);
 235 }
 236
 237 void wxComboBox::Cut()
 238 {
 239     XmComboBoxCut((Widget) m_mainWidget, CurrentTime);
 240 }
 241
 242 void wxComboBox::Paste()
 243 {
 244     XmComboBoxPaste((Widget) m_mainWidget);
 245 }
 246
 247 void wxComboBox::SetEditable(bool WXUNUSED(editable))
 248 {
 249     // TODO
 250 }
 251
 252 void wxComboBox::SetInsertionPoint(long pos)
 253 {
 254     XmComboBoxSetInsertionPosition ((Widget) m_mainWidget, (XmTextPosition) pos);
 255 }
 256
 257 void wxComboBox::SetInsertionPointEnd()
 258 {
 259     XmTextPosition pos = XmComboBoxGetLastPosition ((Widget) m_mainWidget);
 260     XmComboBoxSetInsertionPosition ((Widget) m_mainWidget, (XmTextPosition) (pos + 1));
 261 }
 262
 263 long wxComboBox::GetInsertionPoint() const
 264 {
 265     return (long) XmComboBoxGetInsertionPosition ((Widget) m_mainWidget);
 266 }
 267
 268 long wxComboBox::GetLastPosition() const
 269 {
 270     return (long) XmComboBoxGetLastPosition ((Widget) m_mainWidget);
 271 }
 272
 273 void wxComboBox::Replace(long from, long to, const wxString& value)
 274 {
 275     XmComboBoxReplace ((Widget) m_mainWidget, (XmTextPosition) from,
 276                        (XmTextPosition) to,
 277                        wxConstCast(value.c_str(), char));
 278 }
 279
 280 void wxComboBox::Remove(long from, long to)
 281 {
 282     XmComboBoxSetSelection ((Widget) m_mainWidget, (XmTextPosition) from, (XmTextPosition) to,
 283                       (Time) 0);
 284     XmComboBoxRemove ((Widget) m_mainWidget);
 285 }
 286
 287 void wxComboBox::SetSelection(long from, long to)
 288 {
 289     XmComboBoxSetSelection ((Widget) m_mainWidget, (XmTextPosition) from, (XmTextPosition) to,
 290                       (Time) 0);
 291 }
 292
 293 void  wxComboBoxCallback (Widget WXUNUSED(w), XtPointer clientData,
 294                           XmComboBoxSelectionCallbackStruct * cbs)
 295 {
 296     wxComboBox *item = (wxComboBox *) clientData;
 297
 298     switch (cbs->reason)
 299     {
 300     case XmCR_SINGLE_SELECT:
 301     case XmCR_BROWSE_SELECT:
 302         {
 303             wxCommandEvent event (wxEVT_COMMAND_COMBOBOX_SELECTED,
 304                                   item->GetId());
 305             event.m_commandInt = cbs->index - 1;
 306             event.m_commandString = item->GetString (event.m_commandInt);
 307             if ( item->HasClientObjectData() )
 308                 event.SetClientObject( item->GetClientObject(cbs->index - 1) );
 309             else if ( item->HasClientUntypedData() )
 310                 event.SetClientData( item->GetClientData(cbs->index - 1) );
 311             event.m_extraLong = TRUE;
 312             event.SetEventObject(item);
 313             item->ProcessCommand (event);
 314             break;
 315         }
 316     case XmCR_VALUE_CHANGED:
 317         {
 318             wxCommandEvent event (wxEVT_COMMAND_TEXT_UPDATED, item->GetId());
 319             event.m_commandInt = -1;
 320             event.m_commandString = item->GetValue();
 321             event.m_extraLong = TRUE;
 322             event.SetEventObject(item);
 323             item->ProcessCommand (event);
 324             break;
 325         }
 326     default:
 327         break;
 328     }
 329 }
 330
 331 void wxComboBox::ChangeFont(bool keepOriginalSize)
 332 {
 333     // Don't use the base class wxChoice's ChangeFont
 334     wxWindow::ChangeFont(keepOriginalSize);
 335 }
 336
 337 void wxComboBox::ChangeBackgroundColour()
 338 {
 339     wxWindow::ChangeBackgroundColour();
 340 }
 341
 342 void wxComboBox::ChangeForegroundColour()
 343 {
 344     wxWindow::ChangeForegroundColour();
 345 }
 346
 347 wxSize wxComboBox::DoGetBestSize() const
 348 {
 349     if( (GetWindowStyle() & wxCB_DROPDOWN) == wxCB_DROPDOWN ||
 350         (GetWindowStyle() & wxCB_READONLY) == wxCB_READONLY )
 351     {
 352         wxSize items = GetItemsSize();
 353         // FIXME arbitrary constants
 354         return wxSize( ( items.x ? items.x + 50 : 120 ),
 355                          items.y + 10 );
 356     }
 357     else
 358         return wxWindow::DoGetBestSize();
 359 }
 360
 361 #endif // XmVersion < 2000
 362
 363 #endif // wxUSE_COMBOBOX