/////////////////////////////////////////////////////////////////////////////
-// Name: combobox.cpp
+// Name: src/os2/combobox.cpp
// Purpose: wxComboBox class
-// Author: AUTHOR
+// Author: David Webster
// Modified by:
-// Created: ??/??/98
+// Created: 10/13/99
// RCS-ID: $Id$
-// Copyright: (c) AUTHOR
-// Licence: wxWindows licence
+// Copyright: (c) David Webster
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
-#ifdef __GNUG__
-#pragma implementation "combobox.h"
-#endif
+// For compilers that support precompilation, includes "wx.h".
+#include "wx/wxprec.h"
+
+#if wxUSE_COMBOBOX
#include "wx/combobox.h"
-#if !USE_SHARED_LIBRARY
-IMPLEMENT_DYNAMIC_CLASS(wxComboBox, wxControl)
+#ifndef WX_PRECOMP
+ #include "wx/settings.h"
#endif
-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)
+#include "wx/clipbrd.h"
+#include "wx/os2/private.h"
+
+#define OWNER_DRAWN_LISTBOX_EXTRA_SPACE (1)
+
+MRESULT EXPENTRY wxComboEditWndProc( HWND hWnd
+ ,UINT uMessage
+ ,MPARAM wParam
+ ,MPARAM lParam
+ );
+//
+// The pointer to standard wnd proc
+//
+static WXFARPROC gfnWndprocEdit = (WXFARPROC)NULL;
+
+IMPLEMENT_DYNAMIC_CLASS(wxComboBox, wxControl)
+
+bool wxComboBox::OS2Command( WXUINT uParam, WXWORD WXUNUSED(wId) )
{
- SetName(name);
- SetValidator(validator);
- m_noStrings = n;
- m_windowStyle = style;
+ long lSel = GetSelection();
+ wxString sValue;
- if (parent) parent->AddChild(this);
+ switch (uParam)
+ {
+ case CBN_LBSELECT:
+ if (lSel > -1)
+ {
+ wxCommandEvent vEvent( wxEVT_COMMAND_COMBOBOX_SELECTED, GetId() );
- if ( id == -1 )
- m_windowId = (int)NewControlId();
- else
- m_windowId = id;
+ vEvent.SetInt(lSel);
+ vEvent.SetEventObject(this);
+ vEvent.SetString(GetStringSelection());
+
+ ProcessCommand(vEvent);
+ }
+ break;
- // TODO: create combobox control
+ case CBN_EFCHANGE:
+ {
+ wxCommandEvent vEvent( wxEVT_COMMAND_TEXT_UPDATED, GetId() );
- return TRUE;
+ if (lSel == -1L)
+ sValue = GetValue();
+ else
+ sValue = GetStringSelection();
+ vEvent.SetString(sValue);
+ vEvent.SetEventObject(this);
+ ProcessCommand(vEvent);
+ }
+ break;
+ }
+ //
+ // There is no return value for the CBN_ notifications, so always return
+ // false from here to pass the message to DefWindowProc()
+ //
+ return false;
+} // end of wxComboBox::OS2Command
+
+bool wxComboBox::Create(
+ wxWindow* pParent
+, wxWindowID vId
+, const wxString& rsValue
+, const wxPoint& rPos
+, const wxSize& rSize
+, const wxArrayString& asChoices
+, long lStyle
+, const wxValidator& rValidator
+, const wxString& rsName
+)
+{
+ wxCArrayString chs(asChoices);
+
+ return Create(pParent, vId, rsValue, rPos, rSize, chs.GetCount(),
+ chs.GetStrings(), lStyle, rValidator, rsName);
}
+bool wxComboBox::Create(
+ wxWindow* pParent
+, wxWindowID vId
+, const wxString& rsValue
+, const wxPoint& rPos
+, const wxSize& rSize
+, int n
+, const wxString asChoices[]
+, long lStyle
+, const wxValidator& rValidator
+, const wxString& rsName
+)
+{
+ m_isShown = false;
+
+ if (!CreateControl( pParent
+ ,vId
+ ,rPos
+ ,rSize
+ ,lStyle
+ ,rValidator
+ ,rsName
+ ))
+ return false;
+
+ //
+ // Get the right style
+ //
+ long lSstyle = 0L;
+
+ lSstyle = WS_TABSTOP |
+ WS_VISIBLE;
+
+ // clipping siblings does not yet work
+ // if (lStyle & wxCLIP_SIBLINGS )
+ // lSstyle |= WS_CLIPSIBLINGS;
+ if (lStyle & wxCB_READONLY)
+ lSstyle |= CBS_DROPDOWNLIST;
+ else if (lStyle & wxCB_SIMPLE)
+ lSstyle |= CBS_SIMPLE; // A list (shown always) and edit control
+ else
+ lSstyle |= CBS_DROPDOWN;
+
+
+ if (!OS2CreateControl( _T("COMBOBOX")
+ ,lSstyle
+ ))
+ return false;
+
+ //
+ // A choice/combobox normally has a white background (or other, depending
+ // on global settings) rather than inheriting the parent's background colour.
+ //
+ SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW));
+
+ for (int i = 0; i < n; i++)
+ {
+ Append(asChoices[i]);
+ }
+
+ SetSize( rPos.x
+ ,rPos.y
+ ,rSize.x
+ ,rSize.y
+ );
+
+ // Set height to use with sizers i.e. without the dropdown listbox
+ wxFont vFont = GetFont();
+ int nEditHeight;
+ wxGetCharSize( GetHWND(), NULL, &nEditHeight, &vFont );
+ nEditHeight = EDIT_HEIGHT_FROM_CHAR_HEIGHT(nEditHeight);
+ SetInitialSize(wxSize(-1,nEditHeight+4)); // +2x2 for the border
+
+ if (!rsValue.empty())
+ {
+ SetValue(rsValue);
+ }
+ gfnWndprocEdit = (WXFARPROC)::WinSubclassWindow( (HWND)GetHwnd()
+ ,(PFNWP)wxComboEditWndProc
+ );
+ ::WinSetWindowULong(GetHwnd(), QWL_USER, (ULONG)this);
+ Show(true);
+ return true;
+} // end of wxComboBox::Create
+
wxString wxComboBox::GetValue() const
{
- // TODO
- return wxString("");
+ return wxGetWindowText(GetHwnd());
}
-void wxComboBox::SetValue(const wxString& value)
+void wxComboBox::SetValue(
+ const wxString& rsValue
+)
{
- // TODO
-}
+ if ( HasFlag(wxCB_READONLY) )
+ SetStringSelection(rsValue);
+ else
+ ::WinSetWindowText(GetHwnd(), rsValue.c_str());
+} // end of wxComboBox::SetValue
+//
// Clipboard operations
+//
void wxComboBox::Copy()
{
- // TODO
-}
+ HWND hWnd = GetHwnd();
+
+ ::WinSendMsg(hWnd, EM_COPY, (MPARAM)0, (MPARAM)0);
+} // end of wxComboBox::Copy
void wxComboBox::Cut()
{
- // TODO
-}
+ HWND hWnd = GetHwnd();
+
+ ::WinSendMsg(hWnd, EM_CUT, (MPARAM)0, (MPARAM)0);
+} // end of wxComboBox::Cut
void wxComboBox::Paste()
{
- // TODO
-}
+ HWND hWnd = GetHwnd();
+
+ ::WinSendMsg(hWnd, EM_PASTE, (MPARAM)0, (MPARAM)0);
+} // end of wxComboBox::Paste
-void wxComboBox::SetEditable(bool editable)
+void wxComboBox::SetEditable(
+ bool bEditable
+)
{
- // TODO
-}
+ HWND hWnd = GetHwnd();
+
+ ::WinSendMsg(hWnd, EM_SETREADONLY, (MPARAM)!bEditable, (MPARAM)0L);
+} // end of wxComboBox::SetEditable
-void wxComboBox::SetInsertionPoint(long pos)
+void wxComboBox::SetInsertionPoint(
+ long lPos
+)
{
- // TODO
-}
+ HWND hWnd = GetHwnd();
+
+ ::WinSendMsg(hWnd, EM_SETFIRSTCHAR, MPFROMLONG(lPos), (MPARAM)0);
+} // end of wxComboBox::SetInsertionPoint
void wxComboBox::SetInsertionPointEnd()
{
- // TODO
-}
+ wxTextPos lPos = GetLastPosition();
+
+ SetInsertionPoint(lPos);
+} // end of wxComboBox::SetInsertionPointEnd
long wxComboBox::GetInsertionPoint() const
{
- // TODO
- return 0;
-}
+ long lPos = LONGFROMMR(::WinSendMsg( GetHwnd()
+ ,LM_QUERYSELECTION
+ ,(MPARAM)0
+ ,(MPARAM)0
+ ));
+ if (lPos == LIT_NONE)
+ return wxNOT_FOUND;
+ return lPos;
+} // end of wxComboBox::GetInsertionPoint
-long wxComboBox::GetLastPosition() const
+wxTextPos wxComboBox::GetLastPosition() const
{
- // TODO
- return 0;
-}
+ long lLineLength = 0L;
+ WNDPARAMS vParams;
-void wxComboBox::Replace(long from, long to, const wxString& value)
-{
- // TODO
-}
+ //
+ // Get number of characters in the last (only) line. We'll add this to the character
+ // index for the last line, 1st position.
+ //
-void wxComboBox::Remove(long from, long to)
-{
- // TODO
-}
-void wxComboBox::SetSelection(long from, long to)
-{
- // TODO
-}
+ vParams.fsStatus = WPM_CCHTEXT;
+ if (::WinSendMsg( GetHwnd()
+ ,WM_QUERYWINDOWPARAMS
+ ,&vParams
+ ,0
+ ))
+ {
+ lLineLength = (long)vParams.cchText;
+ }
+ else
+ lLineLength = 0L;
+ return lLineLength;
+} // end of wxComboBox::GetLastPosition
-void wxComboBox::Append(const wxString& item)
+void wxComboBox::Replace( long lFrom,
+ long lTo,
+ const wxString& rsValue )
{
- // TODO
-}
+#if wxUSE_CLIPBOARD
+ HWND hWnd = GetHwnd();
-void wxComboBox::Delete(int n)
-{
- // TODO
-}
+ //
+ // Set selection and remove it
+ //
+ ::WinSendMsg(hWnd, EM_SETSEL, MPFROM2SHORT((USHORT)lFrom, (USHORT)lTo), 0);
+ ::WinSendMsg(hWnd, EM_CUT, (MPARAM)0, (MPARAM)0);
-void wxComboBox::Clear()
-{
- // TODO
-}
+ //
+ // Now replace with 'value', by pasting.
+ //
+ wxSetClipboardData( wxDF_TEXT
+ ,rsValue.c_str()
+ ,0
+ ,0
+ );
-int wxComboBox::GetSelection() const
-{
- // TODO
- return -1;
-}
+ //
+ // Paste into edit control
+ //
+ ::WinSendMsg(hWnd, EM_PASTE, (MPARAM)0, (MPARAM)0L);
+#else
+ wxUnusedVar(lFrom);
+ wxUnusedVar(lTo);
+ wxUnusedVar(rsValue);
+#endif
+} // end of wxComboBox::Replace
-void wxComboBox::SetSelection(int n)
+void wxComboBox::Remove( long lFrom, long lTo)
{
- // TODO
-}
+#if wxUSE_CLIPBOARD
+ HWND hWnd = GetHwnd();
-int wxComboBox::FindString(const wxString& s) const
-{
- // TODO
- return -1;
-}
+ ::WinSendMsg(hWnd, EM_SETSEL, MPFROM2SHORT((USHORT)lFrom, (USHORT)lTo), 0);
+ ::WinSendMsg(hWnd, EM_CUT, (MPARAM)0, (MPARAM)0);
+#else
+ wxUnusedVar(lFrom);
+ wxUnusedVar(lTo);
+#endif
+} // end of wxComboBox::Remove
-wxString wxComboBox::GetString(int n) const
+void wxComboBox::SetSelection( long lFrom, long lTo )
{
- // TODO
- return wxString("");
-}
+ HWND hWnd = GetHwnd();
+ long lFromChar = 0;
+ long lToChar = 0;
+
+ //
+ // If from and to are both -1, it means
+ // (in wxWidgets) that all text should be selected.
+ // This translates into Windows convention
+ //
+ if ((lFrom == -1L) && (lTo == -1L))
+ {
+ lFromChar = 0;
+ lToChar = -1;
+ }
+
+ ::WinSendMsg( hWnd
+ ,EM_SETSEL
+ ,MPFROM2SHORT((USHORT)lFromChar, (USHORT)lToChar)
+ ,(MPARAM)0
+ );
+} // end of wxComboBox::SetSelection
-wxString wxComboBox::GetStringSelection() const
+bool wxComboBox::ProcessEditMsg(
+ WXUINT uMsg
+, WXWPARAM wParam
+, WXLPARAM lParam)
{
- // TODO
- return wxString("");
-}
+ SHORT vFlag;
+ switch (uMsg)
+ {
+ case WM_CHAR:
+ vFlag = SHORT1FROMMP(wParam);
+ switch(vFlag)
+ {
+ case KC_CHAR:
+ return (HandleChar( wParam
+ ,lParam
+ ,true /* isASCII */
+ ));
+
+ case KC_PREVDOWN:
+ return (HandleKeyDown( wParam
+ ,lParam
+ ));
+
+ case KC_KEYUP:
+ return (HandleKeyUp( wParam
+ ,lParam
+ ));
+ }
+ break;
-bool wxComboBox::SetStringSelection(const wxString& sel)
+ case WM_SETFOCUS:
+ if (SHORT1FROMMP((MPARAM)lParam) == TRUE)
+ return(HandleSetFocus((WXHWND)(HWND)wParam));
+ else
+ return(HandleKillFocus((WXHWND)(HWND)wParam));
+ }
+ return false;
+} // end of wxComboBox::ProcessEditMsg
+
+MRESULT EXPENTRY wxComboEditWndProc(
+ HWND hWnd
+, UINT uMessage
+, MPARAM wParam
+, MPARAM lParam
+)
{
- // TODO
- return FALSE;
-}
+ switch (uMessage)
+ {
+ //
+ // Forward some messages to the combobox
+ //
+ case WM_SETFOCUS:
+ case WM_CHAR:
+ {
+ wxComboBox* pCombo = (wxComboBox *)::WinQueryWindowULong( hWnd
+ ,QWL_USER
+ );
+
+ if (pCombo->ProcessEditMsg( uMessage
+ ,wParam
+ ,lParam
+ ))
+ return ((MRESULT)0);
+ }
+ break;
+
+ //
+ // TODO: Deal with tooltips here
+ //
+ }
+ return (gfnWndprocEdit(hWnd, (ULONG)uMessage, (MPARAM)wParam, (MPARAM)lParam));
+} // end of wxComboEditWndProc
+
+#endif
+ // wxUSE_COMBOBOX
projects / wxWidgets.git / blobdiff