src/motif/combobox_native.cpp

/////////////////////////////////////////////////////////////////////////////
// Name:        src/motif/combobox_native.cpp
// Purpose:     wxComboBox class
// Author:      Julian Smart, Ian Brown
// Modified by:
// Created:     01/02/03
// RCS-ID:      $Id$
// Copyright:   (c) Julian Smart
// Licence:     wxWindows licence
/////////////////////////////////////////////////////////////////////////////

// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"

#if wxUSE_COMBOBOX

#include "wx/combobox.h"

#ifndef WX_PRECOMP
    #include "wx/arrstr.h"
#endif

#ifdef __VMS__
#pragma message disable nosimpint
#endif
#include <Xm/Xm.h>
#ifdef __VMS__
#pragma message enable nosimpint
#endif

// use the new, shiny combobox for Motif 2.x
#if (XmVersion >= 2000)

#ifdef __VMS__
#pragma message disable nosimpint
#endif
#include <Xm/ComboBox.h>
#include <Xm/Text.h>
#include <Xm/List.h>
#ifdef __VMS__
#pragma message enable nosimpint
#endif

#include "wx/motif/private.h"

// utility
static Widget GetXmList( const wxComboBox* cb )
{
    Widget ret;
    XtVaGetValues( (Widget)cb->GetMainWidget(),
                   XmNlist, &ret,
                   NULL );

    return ret;
}

static Widget GetXmText( const wxComboBox* cb )
{
    Widget ret;
    XtVaGetValues( (Widget)cb->GetMainWidget(),
                   XmNtextField, &ret,
                   NULL );

    return ret;
}

void  wxComboBoxCallback (Widget w, XtPointer clientData,
                          XmComboBoxCallbackStruct * cbs);

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)
{
    if( !CreateControl( parent, id, pos, size, style, validator, name ) )
        return false;
    PreCreation();

    Widget parentWidget = (Widget) parent->GetClientWidget();

    int cb_type = ( style & wxCB_SIMPLE ) ? XmCOMBO_BOX :
                  ( style & wxCB_READONLY ) ? XmDROP_DOWN_LIST :
                  ( style & wxCB_DROPDOWN ) ? XmDROP_DOWN_COMBO_BOX :
    // default to wxCB_DROPDOWN
                                              XmDROP_DOWN_COMBO_BOX;
    if( cb_type == XmDROP_DOWN_COMBO_BOX )
        SetWindowStyle( style | wxCB_DROPDOWN );

    Widget buttonWidget= XtVaCreateManagedWidget(name.c_str(),
        xmComboBoxWidgetClass, parentWidget,
        XmNcomboBoxType, cb_type,
        NULL);

    m_mainWidget = (Widget) buttonWidget;

    int i;
    for ( i = 0; i < n; ++i)
        Append( choices[i] );

    XtManageChild (buttonWidget);

    SetValue(value);

    XtAddCallback (buttonWidget, XmNselectionCallback,
                   (XtCallbackProc) wxComboBoxCallback,
                   (XtPointer) this);
    XtAddCallback (GetXmText(this), XmNvalueChangedCallback,
                   (XtCallbackProc) wxComboBoxCallback,
                   (XtPointer) this);

    wxSize best = GetBestSize();
    if( size.x != wxDefaultCoord ) best.x = size.x;
    if( size.y != wxDefaultCoord ) best.y = size.y;

    PostCreation();
    AttachWidget (parent, m_mainWidget, (WXWidget) NULL,
                  pos.x, pos.y, best.x, best.y);

    return true;
}

bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
                        const wxString& value,
                        const wxPoint& pos,
                        const wxSize& size,
                        const wxArrayString& choices,
                        long style,
                        const wxValidator& validator,
                        const wxString& name)
{
    wxCArrayString chs(choices);
    return Create(parent, id, value, pos, size, chs.GetCount(),
                  chs.GetStrings(), style, validator, name);
}

void wxComboBox::AdjustDropDownListSize()
{
    int newListCount = -1, itemCount = GetCount();
    const int MAX = 12;

    if( !itemCount )
        newListCount = 1;
    else if( itemCount < MAX )
        newListCount = itemCount;
    else
        newListCount = MAX;

    XtVaSetValues( GetXmList(this),
                   XmNvisibleItemCount, newListCount,
                   NULL );
}

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 WXUNUSED(height), int sizeFlags)
{
    // Necessary so it doesn't call wxChoice::SetSize
    wxWindow::DoSetSize(x, y, width, DoGetBestSize().y, sizeFlags);
}

void wxComboBox::SetString(unsigned int n, const wxString& s)
{
    wxXmString text(s);
    Widget listBox = GetXmList(this);

    // delete the item and add it again.
    // FIXME isn't there a way to change it in place?
    XmListDeletePos (listBox, n+1);
    XmListAddItem (listBox, text(), n+1);
}

void wxComboBox::SetValue(const wxString& value)
{
    m_inSetValue = true;

    XtVaSetValues( GetXmText(this),
                   XmNvalue, (const char*)value.mb_str(),
                   NULL);

    m_inSetValue = false;
}

int wxComboBox::DoInsertItems(const wxArrayStringsAdapter & items,
                              unsigned int pos,
                              void **clientData, wxClientDataType type)
{
    const unsigned int numItems = items.GetCount();

    AllocClientData(numItems);
    for ( unsigned int i = 0; i < numItems; ++i, ++pos )
    {
        wxXmString str( items[i].c_str() );
        XmComboBoxAddItem((Widget) m_mainWidget, str(),
                          GetMotifPosition(pos), False);

        InsertNewItemClientData(pos, clientData, i, type);
    }

    AdjustDropDownListSize();

    return pos - 1;
}

void wxComboBox::DoDeleteOneItem(unsigned int n)
{
#ifdef LESSTIF_VERSION
    XmListDeletePos (GetXmList(this), n + 1);
#else
    XmComboBoxDeletePos((Widget) m_mainWidget, n+1);
#endif

    wxControlWithItems::DoDeleteOneItem(n);
    m_stringArray.RemoveAt(size_t(n));

    AdjustDropDownListSize();
}

void wxComboBox::Clear()
{
#ifdef LESSTIF_VERSION
    XmListDeleteAllItems (GetXmList(this));
#else
    size_t n = m_stringArray.GetCount();
    while(n > 0)
    {
        XmComboBoxDeletePos((Widget) m_mainWidget, n--);
    }
#endif

    m_stringArray.Clear();
    AdjustDropDownListSize();

    wxTextEntry::Clear();
}

void wxComboBox::SetSelection (int n)
{
    m_inSetSelection = true;

#if wxCHECK_LESSTIF()
    XmListSelectPos (GetXmList(this), n + 1, false);
    SetValue(GetString(n));
#else
#if 0
    wxXmString str(GetString(n).c_str());
    XmComboBoxSelectItem((Widget) m_mainWidget, str());
#endif
    XtVaSetValues( (Widget)m_mainWidget,
                   XmNselectedPosition, n,
                   NULL );
#endif

    m_inSetSelection = false;
}

int wxComboBox::GetSelection() const
{
    return wxDoGetSelectionInList( GetXmList( this ) );
}

wxString wxComboBox::GetString(unsigned int n) const
{
    return wxDoGetStringInList( GetXmList(this), n );
}

int wxComboBox::FindString(const wxString& s, bool WXUNUSED(bCase)) const
{
    // FIXME: back to base class for not supported value of bCase

    return wxDoFindStringInList( GetXmList( this ), s );
}

void  wxComboBoxCallback (Widget WXUNUSED(w), XtPointer clientData,
                          XmComboBoxCallbackStruct * cbs)
{
    wxComboBox *item = (wxComboBox *) clientData;

    if( item->m_inSetSelection ) return;

    switch (cbs->reason)
    {
    case XmCR_SELECT:
#if 0
    case XmCR_SINGLE_SELECT:
    case XmCR_BROWSE_SELECT:
#endif
        {
            wxCommandEvent event (wxEVT_COMBOBOX,
                                  item->GetId());
            int idx = cbs->item_position;
            event.SetInt(idx);
            event.SetString( item->GetString (idx) );
            if ( item->HasClientObjectData() )
                event.SetClientObject( item->GetClientObject(idx) );
            else if ( item->HasClientUntypedData() )
                event.SetClientData( item->GetClientData(idx) );
            event.SetExtraLong(true);
            event.SetEventObject(item);
            item->HandleWindowEvent(event);
            break;
        }
    case XmCR_VALUE_CHANGED:
        {
            wxCommandEvent event (wxEVT_TEXT, item->GetId());
            event.SetInt(-1);
            event.SetString( item->GetValue() );
            event.SetExtraLong(true);
            event.SetEventObject(item);
            item->HandleWindowEvent(event);
            break;
        }
    default:
        break;
    }
}

void wxComboBox::ChangeFont(bool keepOriginalSize)
{
    if( m_font.IsOk() && m_mainWidget != NULL )
    {
        wxDoChangeFont( GetXmText(this), m_font );
        wxDoChangeFont( GetXmList(this), m_font );
    }

    // Don't use the base class wxChoice's ChangeFont
    wxWindow::ChangeFont(keepOriginalSize);
}

void wxComboBox::ChangeBackgroundColour()
{
    wxWindow::ChangeBackgroundColour();
}

void wxComboBox::ChangeForegroundColour()
{
    wxWindow::ChangeForegroundColour();
}

wxSize wxComboBox::DoGetBestSize() const
{
    if( (GetWindowStyle() & wxCB_DROPDOWN) == wxCB_DROPDOWN ||
        (GetWindowStyle() & wxCB_READONLY) == wxCB_READONLY )
    {
        Dimension arrowW, arrowS, highlight, xmargin, ymargin, shadow;

        XtVaGetValues( (Widget)m_mainWidget,
                       XmNarrowSize, &arrowW,
                       XmNarrowSpacing, &arrowS,
                       XmNhighlightThickness, &highlight,
                       XmNmarginWidth, &xmargin,
                       XmNmarginHeight, &ymargin,
                       XmNshadowThickness, &shadow,
                       NULL );

        wxSize listSize = wxDoGetListBoxBestSize( GetXmList(this), this );
        wxSize textSize = wxDoGetSingleTextCtrlBestSize( GetXmText(this),
                                                         this );

        // FIXME arbitrary constants
        return wxSize( listSize.x + arrowW + arrowS + 2 * highlight
                                  + 2 * shadow + 2 * xmargin ,
                       textSize.y + 2 * highlight + 2 * ymargin + 2 * shadow );
    }
    else
        return wxWindow::DoGetBestSize();
}

WXWidget wxComboBox::GetTextWidget() const
{
    return (WXWidget)GetXmText(this);
}

#endif // XmVersion >= 2000

#endif // wxUSE_COMBOBOX
Commit	Line	Data
	1	/////////////////////////////////////////////////////////////////////////////
	2	// Name: src/motif/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	// 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 new, shiny combobox for Motif 2.x
	32	#if (XmVersion >= 2000)
	33
	34	#ifdef __VMS__
	35	#pragma message disable nosimpint
	36	#endif
	37	#include <Xm/ComboBox.h>
	38	#include <Xm/Text.h>
	39	#include <Xm/List.h>
	40	#ifdef __VMS__
	41	#pragma message enable nosimpint
	42	#endif
	43
	44	#include "wx/motif/private.h"
	45
	46	// utility
	47	static Widget GetXmList( const wxComboBox* cb )
	48	{
	49	Widget ret;
	50	XtVaGetValues( (Widget)cb->GetMainWidget(),
	51	XmNlist, &ret,
	52	NULL );
	53
	54	return ret;
	55	}
	56
	57	static Widget GetXmText( const wxComboBox* cb )
	58	{
	59	Widget ret;
	60	XtVaGetValues( (Widget)cb->GetMainWidget(),
	61	XmNtextField, &ret,
	62	NULL );
	63
	64	return ret;
	65	}
	66
	67	void wxComboBoxCallback (Widget w, XtPointer clientData,
	68	XmComboBoxCallbackStruct * cbs);
	69
	70	bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
	71	const wxString& value,
	72	const wxPoint& pos,
	73	const wxSize& size,
	74	int n, const wxString choices[],
	75	long style,
	76	const wxValidator& validator,
	77	const wxString& name)
	78	{
	79	if( !CreateControl( parent, id, pos, size, style, validator, name ) )
	80	return false;
	81	PreCreation();
	82
	83	Widget parentWidget = (Widget) parent->GetClientWidget();
	84
	85	int cb_type = ( style & wxCB_SIMPLE ) ? XmCOMBO_BOX :
	86	( style & wxCB_READONLY ) ? XmDROP_DOWN_LIST :
	87	( style & wxCB_DROPDOWN ) ? XmDROP_DOWN_COMBO_BOX :
	88	// default to wxCB_DROPDOWN
	89	XmDROP_DOWN_COMBO_BOX;
	90	if( cb_type == XmDROP_DOWN_COMBO_BOX )
	91	SetWindowStyle( style \| wxCB_DROPDOWN );
	92
	93	Widget buttonWidget= XtVaCreateManagedWidget(name.c_str(),
	94	xmComboBoxWidgetClass, parentWidget,
	95	XmNcomboBoxType, cb_type,
	96	NULL);
	97
	98	m_mainWidget = (Widget) buttonWidget;
	99
	100	int i;
	101	for ( i = 0; i < n; ++i)
	102	Append( choices[i] );
	103
	104	XtManageChild (buttonWidget);
	105
	106	SetValue(value);
	107
	108	XtAddCallback (buttonWidget, XmNselectionCallback,
	109	(XtCallbackProc) wxComboBoxCallback,
	110	(XtPointer) this);
	111	XtAddCallback (GetXmText(this), XmNvalueChangedCallback,
	112	(XtCallbackProc) wxComboBoxCallback,
	113	(XtPointer) this);
	114
	115	wxSize best = GetBestSize();
	116	if( size.x != wxDefaultCoord ) best.x = size.x;
	117	if( size.y != wxDefaultCoord ) best.y = size.y;
	118
	119	PostCreation();
	120	AttachWidget (parent, m_mainWidget, (WXWidget) NULL,
	121	pos.x, pos.y, best.x, best.y);
	122
	123	return true;
	124	}
	125
	126	bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
	127	const wxString& value,
	128	const wxPoint& pos,
	129	const wxSize& size,
	130	const wxArrayString& choices,
	131	long style,
	132	const wxValidator& validator,
	133	const wxString& name)
	134	{
	135	wxCArrayString chs(choices);
	136	return Create(parent, id, value, pos, size, chs.GetCount(),
	137	chs.GetStrings(), style, validator, name);
	138	}
	139
	140	void wxComboBox::AdjustDropDownListSize()
	141	{
	142	int newListCount = -1, itemCount = GetCount();
	143	const int MAX = 12;
	144
	145	if( !itemCount )
	146	newListCount = 1;
	147	else if( itemCount < MAX )
	148	newListCount = itemCount;
	149	else
	150	newListCount = MAX;
	151
	152	XtVaSetValues( GetXmList(this),
	153	XmNvisibleItemCount, newListCount,
	154	NULL );
	155	}
	156
	157	wxComboBox::~wxComboBox()
	158	{
	159	DetachWidget((Widget) m_mainWidget); // Removes event handlers
	160	XtDestroyWidget((Widget) m_mainWidget);
	161	m_mainWidget = (WXWidget) 0;
	162	}
	163
	164	void wxComboBox::DoSetSize(int x, int y, int width, int WXUNUSED(height), int sizeFlags)
	165	{
	166	// Necessary so it doesn't call wxChoice::SetSize
	167	wxWindow::DoSetSize(x, y, width, DoGetBestSize().y, sizeFlags);
	168	}
	169
	170	void wxComboBox::SetString(unsigned int n, const wxString& s)
	171	{
	172	wxXmString text(s);
	173	Widget listBox = GetXmList(this);
	174
	175	// delete the item and add it again.
	176	// FIXME isn't there a way to change it in place?
	177	XmListDeletePos (listBox, n+1);
	178	XmListAddItem (listBox, text(), n+1);
	179	}
	180
	181	void wxComboBox::SetValue(const wxString& value)
	182	{
	183	m_inSetValue = true;
	184
	185	XtVaSetValues( GetXmText(this),
	186	XmNvalue, (const char*)value.mb_str(),
	187	NULL);
	188
	189	m_inSetValue = false;
	190	}
	191
	192	int wxComboBox::DoInsertItems(const wxArrayStringsAdapter & items,
	193	unsigned int pos,
	194	void **clientData, wxClientDataType type)
	195	{
	196	const unsigned int numItems = items.GetCount();
	197
	198	AllocClientData(numItems);
	199	for ( unsigned int i = 0; i < numItems; ++i, ++pos )
	200	{
	201	wxXmString str( items[i].c_str() );
	202	XmComboBoxAddItem((Widget) m_mainWidget, str(),
	203	GetMotifPosition(pos), False);
	204
	205	InsertNewItemClientData(pos, clientData, i, type);
	206	}
	207
	208	AdjustDropDownListSize();
	209
	210	return pos - 1;
	211	}
	212
	213	void wxComboBox::DoDeleteOneItem(unsigned int n)
	214	{
	215	#ifdef LESSTIF_VERSION
	216	XmListDeletePos (GetXmList(this), n + 1);
	217	#else
	218	XmComboBoxDeletePos((Widget) m_mainWidget, n+1);
	219	#endif
	220
	221	wxControlWithItems::DoDeleteOneItem(n);
	222	m_stringArray.RemoveAt(size_t(n));
	223
	224	AdjustDropDownListSize();
	225	}
	226
	227	void wxComboBox::Clear()
	228	{
	229	#ifdef LESSTIF_VERSION
	230	XmListDeleteAllItems (GetXmList(this));
	231	#else
	232	size_t n = m_stringArray.GetCount();
	233	while(n > 0)
	234	{
	235	XmComboBoxDeletePos((Widget) m_mainWidget, n--);
	236	}
	237	#endif
	238
	239	m_stringArray.Clear();
	240	AdjustDropDownListSize();
	241
	242	wxTextEntry::Clear();
	243	}
	244
	245	void wxComboBox::SetSelection (int n)
	246	{
	247	m_inSetSelection = true;
	248
	249	#if wxCHECK_LESSTIF()
	250	XmListSelectPos (GetXmList(this), n + 1, false);
	251	SetValue(GetString(n));
	252	#else
	253	#if 0
	254	wxXmString str(GetString(n).c_str());
	255	XmComboBoxSelectItem((Widget) m_mainWidget, str());
	256	#endif
	257	XtVaSetValues( (Widget)m_mainWidget,
	258	XmNselectedPosition, n,
	259	NULL );
	260	#endif
	261
	262	m_inSetSelection = false;
	263	}
	264
	265	int wxComboBox::GetSelection() const
	266	{
	267	return wxDoGetSelectionInList( GetXmList( this ) );
	268	}
	269
	270	wxString wxComboBox::GetString(unsigned int n) const
	271	{
	272	return wxDoGetStringInList( GetXmList(this), n );
	273	}
	274
	275	int wxComboBox::FindString(const wxString& s, bool WXUNUSED(bCase)) const
	276	{
	277	// FIXME: back to base class for not supported value of bCase
	278
	279	return wxDoFindStringInList( GetXmList( this ), s );
	280	}
	281
	282	void wxComboBoxCallback (Widget WXUNUSED(w), XtPointer clientData,
	283	XmComboBoxCallbackStruct * cbs)
	284	{
	285	wxComboBox item = (wxComboBox ) clientData;
	286
	287	if( item->m_inSetSelection ) return;
	288
	289	switch (cbs->reason)
	290	{
	291	case XmCR_SELECT:
	292	#if 0
	293	case XmCR_SINGLE_SELECT:
	294	case XmCR_BROWSE_SELECT:
	295	#endif
	296	{
	297	wxCommandEvent event (wxEVT_COMBOBOX,
	298	item->GetId());
	299	int idx = cbs->item_position;
	300	event.SetInt(idx);
	301	event.SetString( item->GetString (idx) );
	302	if ( item->HasClientObjectData() )
	303	event.SetClientObject( item->GetClientObject(idx) );
	304	else if ( item->HasClientUntypedData() )
	305	event.SetClientData( item->GetClientData(idx) );
	306	event.SetExtraLong(true);
	307	event.SetEventObject(item);
	308	item->HandleWindowEvent(event);
	309	break;
	310	}
	311	case XmCR_VALUE_CHANGED:
	312	{
	313	wxCommandEvent event (wxEVT_TEXT, item->GetId());
	314	event.SetInt(-1);
	315	event.SetString( item->GetValue() );
	316	event.SetExtraLong(true);
	317	event.SetEventObject(item);
	318	item->HandleWindowEvent(event);
	319	break;
	320	}
	321	default:
	322	break;
	323	}
	324	}
	325
	326	void wxComboBox::ChangeFont(bool keepOriginalSize)
	327	{
	328	if( m_font.IsOk() && m_mainWidget != NULL )
	329	{
	330	wxDoChangeFont( GetXmText(this), m_font );
	331	wxDoChangeFont( GetXmList(this), m_font );
	332	}
	333
	334	// Don't use the base class wxChoice's ChangeFont
	335	wxWindow::ChangeFont(keepOriginalSize);
	336	}
	337
	338	void wxComboBox::ChangeBackgroundColour()
	339	{
	340	wxWindow::ChangeBackgroundColour();
	341	}
	342
	343	void wxComboBox::ChangeForegroundColour()
	344	{
	345	wxWindow::ChangeForegroundColour();
	346	}
	347
	348	wxSize wxComboBox::DoGetBestSize() const
	349	{
	350	if( (GetWindowStyle() & wxCB_DROPDOWN) == wxCB_DROPDOWN \|\|
	351	(GetWindowStyle() & wxCB_READONLY) == wxCB_READONLY )
	352	{
	353	Dimension arrowW, arrowS, highlight, xmargin, ymargin, shadow;
	354
	355	XtVaGetValues( (Widget)m_mainWidget,
	356	XmNarrowSize, &arrowW,
	357	XmNarrowSpacing, &arrowS,
	358	XmNhighlightThickness, &highlight,
	359	XmNmarginWidth, &xmargin,
	360	XmNmarginHeight, &ymargin,
	361	XmNshadowThickness, &shadow,
	362	NULL );
	363
	364	wxSize listSize = wxDoGetListBoxBestSize( GetXmList(this), this );
	365	wxSize textSize = wxDoGetSingleTextCtrlBestSize( GetXmText(this),
	366	this );
	367
	368	// FIXME arbitrary constants
	369	return wxSize( listSize.x + arrowW + arrowS + 2 * highlight
	370	+ 2 * shadow + 2 * xmargin ,
	371	textSize.y + 2 * highlight + 2 * ymargin + 2 * shadow );
	372	}
	373	else
	374	return wxWindow::DoGetBestSize();
	375	}
	376
	377	WXWidget wxComboBox::GetTextWidget() const
	378	{
	379	return (WXWidget)GetXmText(this);
	380	}
	381
	382	#endif // XmVersion >= 2000
	383
	384	#endif // wxUSE_COMBOBOX