1 /////////////////////////////////////////////////////////////////////////////
2 // Name: msw/combobox.cpp
3 // Purpose: wxComboBox class
4 // Author: Julian Smart
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 // ============================================================================
14 // ============================================================================
16 // ----------------------------------------------------------------------------
18 // ----------------------------------------------------------------------------
20 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
21 #pragma implementation "combobox.h"
24 // For compilers that support precompilation, includes "wx.h".
25 #include "wx/wxprec.h"
34 #include "wx/settings.h"
36 // for wxEVT_COMMAND_TEXT_ENTER
37 #include "wx/textctrl.h"
41 #include "wx/combobox.h"
43 #include "wx/clipbrd.h"
44 #include "wx/msw/private.h"
47 #if !defined(__GNUWIN32_OLD__) || defined(__CYGWIN10__)
50 #include "wx/tooltip.h"
51 #endif // wxUSE_TOOLTIPS
53 // ----------------------------------------------------------------------------
55 // ----------------------------------------------------------------------------
57 #if wxUSE_EXTENDED_RTTI
58 WX_DEFINE_FLAGS( wxComboBoxStyle
)
60 wxBEGIN_FLAGS( wxComboBoxStyle
)
61 // new style border flags, we put them first to
62 // use them for streaming out
63 wxFLAGS_MEMBER(wxBORDER_SIMPLE
)
64 wxFLAGS_MEMBER(wxBORDER_SUNKEN
)
65 wxFLAGS_MEMBER(wxBORDER_DOUBLE
)
66 wxFLAGS_MEMBER(wxBORDER_RAISED
)
67 wxFLAGS_MEMBER(wxBORDER_STATIC
)
68 wxFLAGS_MEMBER(wxBORDER_NONE
)
70 // old style border flags
71 wxFLAGS_MEMBER(wxSIMPLE_BORDER
)
72 wxFLAGS_MEMBER(wxSUNKEN_BORDER
)
73 wxFLAGS_MEMBER(wxDOUBLE_BORDER
)
74 wxFLAGS_MEMBER(wxRAISED_BORDER
)
75 wxFLAGS_MEMBER(wxSTATIC_BORDER
)
76 wxFLAGS_MEMBER(wxBORDER
)
78 // standard window styles
79 wxFLAGS_MEMBER(wxTAB_TRAVERSAL
)
80 wxFLAGS_MEMBER(wxCLIP_CHILDREN
)
81 wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW
)
82 wxFLAGS_MEMBER(wxWANTS_CHARS
)
83 wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE
)
84 wxFLAGS_MEMBER(wxALWAYS_SHOW_SB
)
85 wxFLAGS_MEMBER(wxVSCROLL
)
86 wxFLAGS_MEMBER(wxHSCROLL
)
88 wxFLAGS_MEMBER(wxCB_SIMPLE
)
89 wxFLAGS_MEMBER(wxCB_SORT
)
90 wxFLAGS_MEMBER(wxCB_READONLY
)
91 wxFLAGS_MEMBER(wxCB_DROPDOWN
)
93 wxEND_FLAGS( wxComboBoxStyle
)
95 IMPLEMENT_DYNAMIC_CLASS_XTI(wxComboBox
, wxControl
,"wx/combobox.h")
97 wxBEGIN_PROPERTIES_TABLE(wxComboBox
)
98 wxEVENT_PROPERTY( Select
, wxEVT_COMMAND_COMBOBOX_SELECTED
, wxCommandEvent
)
99 wxEVENT_PROPERTY( TextEnter
, wxEVT_COMMAND_TEXT_ENTER
, wxCommandEvent
)
102 wxPROPERTY( Font
, wxFont
, SetFont
, GetFont
, EMPTY_MACROVALUE
, 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
103 wxPROPERTY_COLLECTION( Choices
, wxArrayString
, wxString
, AppendString
, GetStrings
, 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
104 wxPROPERTY( Value
,wxString
, SetValue
, GetValue
, EMPTY_MACROVALUE
, 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
105 wxPROPERTY( Selection
,int, SetSelection
, GetSelection
, EMPTY_MACROVALUE
, 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
106 wxPROPERTY_FLAGS( WindowStyle
, wxComboBoxStyle
, long , SetWindowStyleFlag
, GetWindowStyleFlag
, EMPTY_MACROVALUE
, 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
107 wxEND_PROPERTIES_TABLE()
109 wxBEGIN_HANDLERS_TABLE(wxComboBox
)
110 wxEND_HANDLERS_TABLE()
112 wxCONSTRUCTOR_5( wxComboBox
, wxWindow
* , Parent
, wxWindowID
, Id
, wxString
, Value
, wxPoint
, Position
, wxSize
, Size
)
116 IMPLEMENT_DYNAMIC_CLASS(wxComboBox
, wxControl
)
120 BEGIN_EVENT_TABLE(wxComboBox
, wxControl
)
121 EVT_MENU(wxID_CUT
, wxComboBox::OnCut
)
122 EVT_MENU(wxID_COPY
, wxComboBox::OnCopy
)
123 EVT_MENU(wxID_PASTE
, wxComboBox::OnPaste
)
124 EVT_MENU(wxID_UNDO
, wxComboBox::OnUndo
)
125 EVT_MENU(wxID_REDO
, wxComboBox::OnRedo
)
126 EVT_MENU(wxID_CLEAR
, wxComboBox::OnDelete
)
127 EVT_MENU(wxID_SELECTALL
, wxComboBox::OnSelectAll
)
129 EVT_UPDATE_UI(wxID_CUT
, wxComboBox::OnUpdateCut
)
130 EVT_UPDATE_UI(wxID_COPY
, wxComboBox::OnUpdateCopy
)
131 EVT_UPDATE_UI(wxID_PASTE
, wxComboBox::OnUpdatePaste
)
132 EVT_UPDATE_UI(wxID_UNDO
, wxComboBox::OnUpdateUndo
)
133 EVT_UPDATE_UI(wxID_REDO
, wxComboBox::OnUpdateRedo
)
134 EVT_UPDATE_UI(wxID_CLEAR
, wxComboBox::OnUpdateDelete
)
135 EVT_UPDATE_UI(wxID_SELECTALL
, wxComboBox::OnUpdateSelectAll
)
138 // ----------------------------------------------------------------------------
139 // function prototypes
140 // ----------------------------------------------------------------------------
142 LRESULT APIENTRY _EXPORT
wxComboEditWndProc(HWND hWnd
,
147 // ---------------------------------------------------------------------------
149 // ---------------------------------------------------------------------------
151 // the pointer to standard radio button wnd proc
152 static WNDPROC gs_wndprocEdit
= (WNDPROC
)NULL
;
154 // ============================================================================
156 // ============================================================================
158 // ----------------------------------------------------------------------------
159 // wnd proc for subclassed edit control
160 // ----------------------------------------------------------------------------
162 LRESULT APIENTRY _EXPORT
wxComboEditWndProc(HWND hWnd
,
167 HWND hwndCombo
= ::GetParent(hWnd
);
168 wxWindow
*win
= wxFindWinFromHandle((WXHWND
)hwndCombo
);
172 // forward some messages to the combobox to generate the appropriate
173 // wxEvents from them
180 wxComboBox
*combo
= wxDynamicCast(win
, wxComboBox
);
183 // we can get WM_KILLFOCUS while our parent is already half
184 // destroyed and hence doesn't look like a combobx any
185 // longer, check for it to avoid bogus assert failures
186 if ( !win
->IsBeingDeleted() )
188 wxFAIL_MSG( _T("should have combo as parent") );
191 else if ( combo
->MSWProcessEditMsg(message
, wParam
, lParam
) )
201 wxCHECK_MSG( win
, 0, _T("should have a parent") );
203 if ( win
->GetWindowStyle() & wxPROCESS_ENTER
)
205 // need to return a custom dlg code or we'll never get it
206 return DLGC_WANTMESSAGE
;
211 // deal with tooltips here
212 #if wxUSE_TOOLTIPS && defined(TTN_NEEDTEXT)
215 wxCHECK_MSG( win
, 0, _T("should have a parent") );
217 NMHDR
* hdr
= (NMHDR
*)lParam
;
218 if ( hdr
->code
== TTN_NEEDTEXT
)
220 wxToolTip
*tooltip
= win
->GetToolTip();
223 TOOLTIPTEXT
*ttt
= (TOOLTIPTEXT
*)lParam
;
224 ttt
->lpszText
= (wxChar
*)tooltip
->GetTip().c_str();
232 #endif // wxUSE_TOOLTIPS
235 return ::CallWindowProc(CASTWNDPROC gs_wndprocEdit
, hWnd
, message
, wParam
, lParam
);
238 // ----------------------------------------------------------------------------
239 // wxComboBox callbacks
240 // ----------------------------------------------------------------------------
242 WXLRESULT
wxComboBox::MSWWindowProc(WXUINT nMsg
, WXWPARAM wParam
, WXLPARAM lParam
)
244 // handle WM_CTLCOLOR messages from our EDIT control to be able to set its
245 // colour correctly (to be the same as our own one)
249 // Selection was set with SetSelection. Update the value too.
250 if ((int)wParam
> GetCount())
251 m_value
= wxEmptyString
;
253 m_value
= GetString(wParam
);
257 return wxChoice::MSWWindowProc(nMsg
, wParam
, lParam
);
260 bool wxComboBox::MSWProcessEditMsg(WXUINT msg
, WXWPARAM wParam
, WXLPARAM lParam
)
265 // for compatibility with wxTextCtrl, generate a special message
266 // when Enter is pressed
267 if ( wParam
== VK_RETURN
)
269 wxCommandEvent
event(wxEVT_COMMAND_TEXT_ENTER
, m_windowId
);
270 InitCommandEvent(event
);
271 event
.SetString(GetValue());
272 event
.SetInt(GetSelection());
273 ProcessCommand(event
);
276 return HandleChar(wParam
, lParam
, true /* isASCII */);
279 return HandleKeyDown(wParam
, lParam
);
282 return HandleKeyUp(wParam
, lParam
);
285 return HandleSetFocus((WXHWND
)wParam
);
288 return HandleKillFocus((WXHWND
)wParam
);
294 bool wxComboBox::MSWCommand(WXUINT param
, WXWORD
WXUNUSED(id
))
301 sel
= GetSelection();
303 // somehow we get 2 CBN_SELCHANGE events with the same index when
304 // the user selects an item in the combobox -- ignore duplicates
305 if ( sel
> -1 && sel
!= m_selectionOld
)
307 m_selectionOld
= sel
;
309 // GetValue() would still return the old value from here but
310 // according to the docs we should return the new value if the
311 // user calls it in his event handler, so update internal
313 m_value
= GetString(sel
);
315 wxCommandEvent
event(wxEVT_COMMAND_COMBOBOX_SELECTED
, GetId());
317 event
.SetEventObject(this);
318 event
.SetString(m_value
);
319 ProcessCommand(event
);
321 else // no valid selection
323 m_selectionOld
= sel
;
325 // hence no EVT_TEXT neither
329 // fall through: for compability with wxGTK, also send the text
330 // update event when the selection changes (this also seems more
331 // logical as the text does change)
335 wxCommandEvent
event(wxEVT_COMMAND_TEXT_UPDATED
, GetId());
337 // if sel != -1, value was initialized above (and we can't use
338 // GetValue() here as it would return the old selection and we
342 m_value
= wxGetWindowText(GetHwnd());
344 else // we're synthesizing text updated event from sel change
346 // We need to retrieve the current selection because the
347 // user may have changed it in the previous handler (for
348 // CBN_SELCHANGE above).
349 sel
= GetSelection();
352 m_value
= GetString(sel
);
356 event
.SetString(m_value
);
357 event
.SetEventObject(this);
358 ProcessCommand(event
);
363 // there is no return value for the CBN_ notifications, so always return
364 // false from here to pass the message to DefWindowProc()
368 WXHWND
wxComboBox::GetEditHWND() const
370 // this function should not be called for wxCB_READONLY controls, it is
371 // the callers responsability to check this
372 wxASSERT_MSG( !(GetWindowStyle() & wxCB_READONLY
),
373 _T("read-only combobox doesn't have any edit control") );
377 HWND hwndEdit
= ::ChildWindowFromPoint(GetHwnd(), pt
);
378 if ( !hwndEdit
|| hwndEdit
== GetHwnd() )
380 wxFAIL_MSG(_T("not read only combobox without edit control?"));
383 return (WXHWND
)hwndEdit
;
386 // ----------------------------------------------------------------------------
387 // wxComboBox creation
388 // ----------------------------------------------------------------------------
390 bool wxComboBox::Create(wxWindow
*parent
, wxWindowID id
,
391 const wxString
& value
,
394 int n
, const wxString choices
[],
396 const wxValidator
& validator
,
397 const wxString
& name
)
399 // pretend that wxComboBox is hidden while it is positioned and resized and
400 // show it only right before leaving this method because otherwise there is
401 // some noticeable flicker while the control rearranges itself
404 if ( !CreateAndInit(parent
, id
, pos
, size
, n
, choices
, style
,
408 // we shouldn't call SetValue() for an empty string because this would
409 // (correctly) result in an assert with a read only combobox and is useless
410 // for the other ones anyhow
411 if ( !value
.empty() )
414 // a (not read only) combobox is, in fact, 2 controls: the combobox itself
415 // and an edit control inside it and if we want to catch events from this
416 // edit control, we must subclass it as well
417 if ( !(style
& wxCB_READONLY
) )
419 gs_wndprocEdit
= wxSetWindowProc((HWND
)GetEditHWND(),
423 // and finally, show the control
429 bool wxComboBox::Create(wxWindow
*parent
, wxWindowID id
,
430 const wxString
& value
,
433 const wxArrayString
& choices
,
435 const wxValidator
& validator
,
436 const wxString
& name
)
438 wxCArrayString
chs(choices
);
439 return Create(parent
, id
, value
, pos
, size
, chs
.GetCount(),
440 chs
.GetStrings(), style
, validator
, name
);
443 WXDWORD
wxComboBox::MSWGetStyle(long style
, WXDWORD
*exstyle
) const
445 // we never have an external border
446 WXDWORD msStyle
= wxChoice::MSWGetStyle
448 (style
& ~wxBORDER_MASK
) | wxBORDER_NONE
, exstyle
451 // remove the style always added by wxChoice
452 msStyle
&= ~CBS_DROPDOWNLIST
;
454 if ( style
& wxCB_READONLY
)
455 msStyle
|= CBS_DROPDOWNLIST
;
457 else if ( style
& wxCB_SIMPLE
)
458 msStyle
|= CBS_SIMPLE
; // A list (shown always) and edit control
461 msStyle
|= CBS_DROPDOWN
;
463 // there is no reason to not always use CBS_AUTOHSCROLL, so do use it
464 msStyle
|= CBS_AUTOHSCROLL
;
466 // NB: we used to also add CBS_NOINTEGRALHEIGHT here but why?
471 // ----------------------------------------------------------------------------
472 // wxComboBox text control-like methods
473 // ----------------------------------------------------------------------------
475 void wxComboBox::SetValue(const wxString
& value
)
477 if ( HasFlag(wxCB_READONLY
) )
478 SetStringSelection(value
);
480 SetWindowText(GetHwnd(), value
.c_str());
483 m_selectionOld
= GetSelection();
486 // Clipboard operations
487 void wxComboBox::Copy()
489 SendMessage(GetHwnd(), WM_COPY
, 0, 0L);
492 void wxComboBox::Cut()
494 SendMessage(GetHwnd(), WM_CUT
, 0, 0L);
497 void wxComboBox::Paste()
499 SendMessage(GetHwnd(), WM_PASTE
, 0, 0L);
502 void wxComboBox::Undo()
506 HWND hEditWnd
= (HWND
) GetEditHWND() ;
508 ::SendMessage(hEditWnd
, EM_UNDO
, 0, 0);
512 void wxComboBox::Redo()
516 // Same as Undo, since Undo undoes the undo, i.e. a redo.
517 HWND hEditWnd
= (HWND
) GetEditHWND() ;
519 ::SendMessage(hEditWnd
, EM_UNDO
, 0, 0);
523 void wxComboBox::SelectAll()
525 SetSelection(0, GetLastPosition());
528 bool wxComboBox::CanUndo() const
530 HWND hEditWnd
= (HWND
) GetEditHWND() ;
532 return ::SendMessage(hEditWnd
, EM_CANUNDO
, 0, 0) != 0;
537 bool wxComboBox::CanRedo() const
539 HWND hEditWnd
= (HWND
) GetEditHWND() ;
541 return ::SendMessage(hEditWnd
, EM_CANUNDO
, 0, 0) != 0;
546 bool wxComboBox::HasSelection() const
549 GetSelection(&from
, &to
);
553 bool wxComboBox::CanCopy() const
555 // Can copy if there's a selection
556 return HasSelection();
559 bool wxComboBox::CanCut() const
561 return CanCopy() && IsEditable();
564 bool wxComboBox::CanPaste() const
569 // Standard edit control: check for straight text on clipboard
570 if ( !::OpenClipboard(GetHwndOf(wxTheApp
->GetTopWindow())) )
573 bool isTextAvailable
= ::IsClipboardFormatAvailable(CF_TEXT
) != 0;
576 return isTextAvailable
;
579 bool wxComboBox::IsEditable() const
581 return !HasFlag(wxCB_READONLY
);
584 void wxComboBox::SetEditable(bool WXUNUSED(editable
))
586 // Can't implement in MSW?
587 // HWND hWnd = GetHwnd();
588 // SendMessage(hWnd, EM_SETREADONLY, (WPARAM)!editable, (LPARAM)0L);
591 void wxComboBox::SetInsertionPoint(long pos
)
593 if ( GetWindowStyle() & wxCB_READONLY
)
597 HWND hWnd
= GetHwnd();
598 ::SendMessage(hWnd
, CB_SETEDITSEL
, 0, MAKELPARAM(pos
, pos
));
599 HWND hEditWnd
= (HWND
) GetEditHWND() ;
602 // Scroll insertion point into view
603 SendMessage(hEditWnd
, EM_SCROLLCARET
, (WPARAM
)0, (LPARAM
)0);
604 // Why is this necessary? (Copied from wxTextCtrl::SetInsertionPoint)
605 SendMessage(hEditWnd
, EM_REPLACESEL
, 0, (LPARAM
) wxEmptyString
);
610 void wxComboBox::SetInsertionPointEnd()
612 // setting insertion point doesn't make sense for read only comboboxes
613 if ( !(GetWindowStyle() & wxCB_READONLY
) )
615 long pos
= GetLastPosition();
616 SetInsertionPoint(pos
);
620 long wxComboBox::GetInsertionPoint() const
623 DWORD Pos
=(DWORD
)SendMessage(GetHwnd(), CB_GETEDITSEL
, 0, 0L);
630 long wxComboBox::GetLastPosition() const
632 HWND hEditWnd
= (HWND
) GetEditHWND();
634 // Get number of characters in the last (only) line. We'll add this to the character
635 // index for the last line, 1st position.
636 int lineLength
= (int)SendMessage(hEditWnd
, EM_LINELENGTH
, (WPARAM
) 0, (LPARAM
)0L);
638 return (long)(lineLength
);
641 void wxComboBox::Replace(long from
, long to
, const wxString
& value
)
646 // Now replace with 'value', by pasting.
647 wxSetClipboardData(wxDF_TEXT
, (wxObject
*)(const wxChar
*)value
, 0, 0);
649 // Paste into edit control
650 SendMessage(GetHwnd(), WM_PASTE
, (WPARAM
)0, (LPARAM
)0L);
654 void wxComboBox::Remove(long from
, long to
)
656 // Set selection and remove it
657 SetSelection(from
, to
);
658 SendMessage(GetHwnd(), WM_CUT
, (WPARAM
)0, (LPARAM
)0);
661 void wxComboBox::SetSelection(long from
, long to
)
663 HWND hWnd
= GetHwnd();
664 long fromChar
= from
;
666 // if from and to are both -1, it means
667 // (in wxWidgets) that all text should be selected.
668 // This translates into Windows convention
669 if ((from
== -1) && (to
== -1))
675 if ( SendMessage(hWnd
, CB_SETEDITSEL
, (WPARAM
)0, (LPARAM
)MAKELONG(fromChar
, toChar
)) == CB_ERR
)
677 wxLogDebug(_T("CB_SETEDITSEL failed"));
681 void wxComboBox::GetSelection(long* from
, long* to
) const
683 DWORD dwStart
, dwEnd
;
684 ::SendMessage(GetHwnd(), CB_GETEDITSEL
, (WPARAM
)&dwStart
, (LPARAM
)&dwEnd
);
690 int wxComboBox::GetSelection() const
692 return wxChoice::GetSelection();
695 // ----------------------------------------------------------------------------
696 // standard event handling
697 // ----------------------------------------------------------------------------
699 void wxComboBox::OnCut(wxCommandEvent
& WXUNUSED(event
))
704 void wxComboBox::OnCopy(wxCommandEvent
& WXUNUSED(event
))
709 void wxComboBox::OnPaste(wxCommandEvent
& WXUNUSED(event
))
714 void wxComboBox::OnUndo(wxCommandEvent
& WXUNUSED(event
))
719 void wxComboBox::OnRedo(wxCommandEvent
& WXUNUSED(event
))
724 void wxComboBox::OnDelete(wxCommandEvent
& WXUNUSED(event
))
727 GetSelection(& from
, & to
);
728 if (from
!= -1 && to
!= -1)
732 void wxComboBox::OnSelectAll(wxCommandEvent
& WXUNUSED(event
))
734 SetSelection(-1, -1);
737 void wxComboBox::OnUpdateCut(wxUpdateUIEvent
& event
)
739 event
.Enable( CanCut() );
742 void wxComboBox::OnUpdateCopy(wxUpdateUIEvent
& event
)
744 event
.Enable( CanCopy() );
747 void wxComboBox::OnUpdatePaste(wxUpdateUIEvent
& event
)
749 event
.Enable( CanPaste() );
752 void wxComboBox::OnUpdateUndo(wxUpdateUIEvent
& event
)
754 event
.Enable( CanUndo() );
757 void wxComboBox::OnUpdateRedo(wxUpdateUIEvent
& event
)
759 event
.Enable( CanRedo() );
762 void wxComboBox::OnUpdateDelete(wxUpdateUIEvent
& event
)
764 event
.Enable(HasSelection() && IsEditable()) ;
767 void wxComboBox::OnUpdateSelectAll(wxUpdateUIEvent
& event
)
769 event
.Enable(GetLastPosition() > 0);
772 #endif // wxUSE_COMBOBOX