]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/msw/combobox.cpp
Missing #ifdef markup.
[wxWidgets.git] / src / msw / combobox.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: msw/combobox.cpp
3// Purpose: wxComboBox class
4// Author: Julian Smart
5// Modified by:
6// Created: 01/02/97
7// RCS-ID: $Id$
8// Copyright: (c) Julian Smart
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
19
20// For compilers that support precompilation, includes "wx.h".
21#include "wx/wxprec.h"
22
23#ifdef __BORLANDC__
24 #pragma hdrstop
25#endif
26
27#if wxUSE_COMBOBOX
28
29#ifndef WX_PRECOMP
30 #include "wx/settings.h"
31 #include "wx/log.h"
32 // for wxEVT_COMMAND_TEXT_ENTER
33 #include "wx/textctrl.h"
34#endif
35
36#include "wx/app.h"
37#include "wx/combobox.h"
38#include "wx/brush.h"
39#include "wx/clipbrd.h"
40#include "wx/msw/private.h"
41
42#if wxUSE_TOOLTIPS
43 #if !defined(__GNUWIN32_OLD__) || defined(__CYGWIN10__)
44 #include <commctrl.h>
45 #endif
46 #include "wx/tooltip.h"
47#endif // wxUSE_TOOLTIPS
48
49// ----------------------------------------------------------------------------
50// wxWin macros
51// ----------------------------------------------------------------------------
52
53#if wxUSE_EXTENDED_RTTI
54WX_DEFINE_FLAGS( wxComboBoxStyle )
55
56wxBEGIN_FLAGS( wxComboBoxStyle )
57 // new style border flags, we put them first to
58 // use them for streaming out
59 wxFLAGS_MEMBER(wxBORDER_SIMPLE)
60 wxFLAGS_MEMBER(wxBORDER_SUNKEN)
61 wxFLAGS_MEMBER(wxBORDER_DOUBLE)
62 wxFLAGS_MEMBER(wxBORDER_RAISED)
63 wxFLAGS_MEMBER(wxBORDER_STATIC)
64 wxFLAGS_MEMBER(wxBORDER_NONE)
65
66 // old style border flags
67 wxFLAGS_MEMBER(wxSIMPLE_BORDER)
68 wxFLAGS_MEMBER(wxSUNKEN_BORDER)
69 wxFLAGS_MEMBER(wxDOUBLE_BORDER)
70 wxFLAGS_MEMBER(wxRAISED_BORDER)
71 wxFLAGS_MEMBER(wxSTATIC_BORDER)
72 wxFLAGS_MEMBER(wxBORDER)
73
74 // standard window styles
75 wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
76 wxFLAGS_MEMBER(wxCLIP_CHILDREN)
77 wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
78 wxFLAGS_MEMBER(wxWANTS_CHARS)
79 wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE)
80 wxFLAGS_MEMBER(wxALWAYS_SHOW_SB )
81 wxFLAGS_MEMBER(wxVSCROLL)
82 wxFLAGS_MEMBER(wxHSCROLL)
83
84 wxFLAGS_MEMBER(wxCB_SIMPLE)
85 wxFLAGS_MEMBER(wxCB_SORT)
86 wxFLAGS_MEMBER(wxCB_READONLY)
87 wxFLAGS_MEMBER(wxCB_DROPDOWN)
88
89wxEND_FLAGS( wxComboBoxStyle )
90
91IMPLEMENT_DYNAMIC_CLASS_XTI(wxComboBox, wxControl,"wx/combobox.h")
92
93wxBEGIN_PROPERTIES_TABLE(wxComboBox)
94 wxEVENT_PROPERTY( Select , wxEVT_COMMAND_COMBOBOX_SELECTED , wxCommandEvent )
95 wxEVENT_PROPERTY( TextEnter , wxEVT_COMMAND_TEXT_ENTER , wxCommandEvent )
96
97 // TODO DELEGATES
98 wxPROPERTY( Font , wxFont , SetFont , GetFont , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
99 wxPROPERTY_COLLECTION( Choices , wxArrayString , wxString , AppendString , GetStrings , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
100 wxPROPERTY( Value ,wxString, SetValue, GetValue, EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
101 wxPROPERTY( Selection ,int, SetSelection, GetSelection, EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
102 wxPROPERTY_FLAGS( WindowStyle , wxComboBoxStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
103wxEND_PROPERTIES_TABLE()
104
105wxBEGIN_HANDLERS_TABLE(wxComboBox)
106wxEND_HANDLERS_TABLE()
107
108wxCONSTRUCTOR_5( wxComboBox , wxWindow* , Parent , wxWindowID , Id , wxString , Value , wxPoint , Position , wxSize , Size )
109
110#else
111
112IMPLEMENT_DYNAMIC_CLASS(wxComboBox, wxControl)
113
114#endif
115
116BEGIN_EVENT_TABLE(wxComboBox, wxControl)
117 EVT_MENU(wxID_CUT, wxComboBox::OnCut)
118 EVT_MENU(wxID_COPY, wxComboBox::OnCopy)
119 EVT_MENU(wxID_PASTE, wxComboBox::OnPaste)
120 EVT_MENU(wxID_UNDO, wxComboBox::OnUndo)
121 EVT_MENU(wxID_REDO, wxComboBox::OnRedo)
122 EVT_MENU(wxID_CLEAR, wxComboBox::OnDelete)
123 EVT_MENU(wxID_SELECTALL, wxComboBox::OnSelectAll)
124
125 EVT_UPDATE_UI(wxID_CUT, wxComboBox::OnUpdateCut)
126 EVT_UPDATE_UI(wxID_COPY, wxComboBox::OnUpdateCopy)
127 EVT_UPDATE_UI(wxID_PASTE, wxComboBox::OnUpdatePaste)
128 EVT_UPDATE_UI(wxID_UNDO, wxComboBox::OnUpdateUndo)
129 EVT_UPDATE_UI(wxID_REDO, wxComboBox::OnUpdateRedo)
130 EVT_UPDATE_UI(wxID_CLEAR, wxComboBox::OnUpdateDelete)
131 EVT_UPDATE_UI(wxID_SELECTALL, wxComboBox::OnUpdateSelectAll)
132END_EVENT_TABLE()
133
134// ----------------------------------------------------------------------------
135// function prototypes
136// ----------------------------------------------------------------------------
137
138LRESULT APIENTRY _EXPORT wxComboEditWndProc(HWND hWnd,
139 UINT message,
140 WPARAM wParam,
141 LPARAM lParam);
142
143// ---------------------------------------------------------------------------
144// global vars
145// ---------------------------------------------------------------------------
146
147// the pointer to standard radio button wnd proc
148static WNDPROC gs_wndprocEdit = (WNDPROC)NULL;
149
150// ============================================================================
151// implementation
152// ============================================================================
153
154// ----------------------------------------------------------------------------
155// wnd proc for subclassed edit control
156// ----------------------------------------------------------------------------
157
158LRESULT APIENTRY _EXPORT wxComboEditWndProc(HWND hWnd,
159 UINT message,
160 WPARAM wParam,
161 LPARAM lParam)
162{
163 HWND hwndCombo = ::GetParent(hWnd);
164 wxWindow *win = wxFindWinFromHandle((WXHWND)hwndCombo);
165
166 switch ( message )
167 {
168 // forward some messages to the combobox to generate the appropriate
169 // wxEvents from them
170 case WM_KEYUP:
171 case WM_KEYDOWN:
172 case WM_CHAR:
173 case WM_SYSCHAR:
174 case WM_SYSKEYDOWN:
175 case WM_SYSKEYUP:
176 case WM_SETFOCUS:
177 case WM_KILLFOCUS:
178 {
179 wxComboBox *combo = wxDynamicCast(win, wxComboBox);
180 if ( !combo )
181 {
182 // we can get WM_KILLFOCUS while our parent is already half
183 // destroyed and hence doesn't look like a combobx any
184 // longer, check for it to avoid bogus assert failures
185 if ( !win->IsBeingDeleted() )
186 {
187 wxFAIL_MSG( _T("should have combo as parent") );
188 }
189 }
190 else if ( combo->MSWProcessEditMsg(message, wParam, lParam) )
191 {
192 // handled by parent
193 return 0;
194 }
195 }
196 break;
197
198 case WM_GETDLGCODE:
199 {
200 wxCHECK_MSG( win, 0, _T("should have a parent") );
201
202 if ( win->GetWindowStyle() & wxPROCESS_ENTER )
203 {
204 // need to return a custom dlg code or we'll never get it
205 return DLGC_WANTMESSAGE;
206 }
207 }
208 break;
209
210 // deal with tooltips here
211#if wxUSE_TOOLTIPS && defined(TTN_NEEDTEXT)
212 case WM_NOTIFY:
213 {
214 wxCHECK_MSG( win, 0, _T("should have a parent") );
215
216 NMHDR* hdr = (NMHDR *)lParam;
217 if ( hdr->code == TTN_NEEDTEXT )
218 {
219 wxToolTip *tooltip = win->GetToolTip();
220 if ( tooltip )
221 {
222 TOOLTIPTEXT *ttt = (TOOLTIPTEXT *)lParam;
223 ttt->lpszText = (wxChar *)tooltip->GetTip().c_str();
224 }
225
226 // processed
227 return 0;
228 }
229 }
230 break;
231#endif // wxUSE_TOOLTIPS
232 }
233
234 return ::CallWindowProc(CASTWNDPROC gs_wndprocEdit, hWnd, message, wParam, lParam);
235}
236
237// ----------------------------------------------------------------------------
238// wxComboBox callbacks
239// ----------------------------------------------------------------------------
240
241WXLRESULT wxComboBox::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
242{
243 // TODO: handle WM_CTLCOLOR messages from our EDIT control to be able to
244 // set its colour correctly (to be the same as our own one)
245
246 switch ( nMsg )
247 {
248 case CB_SETCURSEL:
249 // Selection was set with SetSelection. Update the value too.
250 if ((int)wParam > GetCount())
251 m_value.clear();
252 else
253 m_value = GetString(wParam);
254 m_selectionOld = -1;
255 break;
256
257 case WM_SIZE:
258 // wxStaticBox can generate this message, when modifying the control's style.
259 // This causes the content of the combobox to be selected, for some reason.
260 case WM_STYLECHANGED:
261 {
262 // combobox selection sometimes spontaneously changes when its
263 // size changes, restore it to the old value if necessary
264 long fromOld, toOld;
265 GetSelection(&fromOld, &toOld);
266 WXLRESULT result = wxChoice::MSWWindowProc(nMsg, wParam, lParam);
267
268 long fromNew, toNew;
269 GetSelection(&fromNew, &toNew);
270
271 if ( fromOld != fromNew || toOld != toNew )
272 {
273 SetSelection(fromOld, toOld);
274 }
275
276 return result;
277 }
278 }
279
280 return wxChoice::MSWWindowProc(nMsg, wParam, lParam);
281}
282
283bool wxComboBox::MSWProcessEditMsg(WXUINT msg, WXWPARAM wParam, WXLPARAM lParam)
284{
285 switch ( msg )
286 {
287 case WM_CHAR:
288 // for compatibility with wxTextCtrl, generate a special message
289 // when Enter is pressed
290 if ( wParam == VK_RETURN )
291 {
292 wxCommandEvent event(wxEVT_COMMAND_TEXT_ENTER, m_windowId);
293 InitCommandEvent(event);
294 event.SetString(GetValue());
295 event.SetInt(GetSelection());
296 if ( ProcessCommand(event) )
297 {
298 // don't let the event through to the native control
299 // because it doesn't need it and may generate an annoying
300 // beep if it gets it
301 return true;
302 }
303 }
304 // fall through
305
306 case WM_SYSCHAR:
307 return HandleChar(wParam, lParam, true /* isASCII */);
308
309 case WM_SYSKEYDOWN:
310 case WM_KEYDOWN:
311 return HandleKeyDown(wParam, lParam);
312
313 case WM_SYSKEYUP:
314 case WM_KEYUP:
315 return HandleKeyUp(wParam, lParam);
316
317 case WM_SETFOCUS:
318 return HandleSetFocus((WXHWND)wParam);
319
320 case WM_KILLFOCUS:
321 return HandleKillFocus((WXHWND)wParam);
322 }
323
324 return false;
325}
326
327bool wxComboBox::MSWCommand(WXUINT param, WXWORD id)
328{
329 wxString value;
330 int sel = -1;
331 switch ( param )
332 {
333 case CBN_SELENDOK:
334 case CBN_SELCHANGE:
335 sel = GetSelection();
336
337 // we may sometimes get 2 CBN_SELCHANGE events or a CBN_SELENDOK
338 // before CBN_SELCHANGE with the same index when the user selects
339 // an item in the combobox -- ignore duplicates
340 if ( sel > -1 && sel != m_selectionOld )
341 {
342 m_selectionOld = sel;
343
344 // GetValue() would still return the old value from here but
345 // according to the docs we should return the new value if the
346 // user calls it in his event handler, so update internal
347 // m_value
348 m_value = GetString(sel);
349
350 wxCommandEvent event(wxEVT_COMMAND_COMBOBOX_SELECTED, GetId());
351 event.SetInt(sel);
352 event.SetEventObject(this);
353 event.SetString(m_value);
354 ProcessCommand(event);
355 }
356 else // no valid selection
357 {
358 m_selectionOld = sel;
359
360 // hence no EVT_TEXT neither
361 break;
362 }
363
364 // fall through: for compability with wxGTK, also send the text
365 // update event when the selection changes (this also seems more
366 // logical as the text does change)
367
368 case CBN_EDITCHANGE:
369 {
370 wxCommandEvent event(wxEVT_COMMAND_TEXT_UPDATED, GetId());
371
372 // if sel != -1, value was initialized above (and we can't use
373 // GetValue() here as it would return the old selection and we
374 // want the new one)
375 if ( sel == -1 )
376 {
377 m_value = wxGetWindowText(GetHwnd());
378 m_selectionOld = -1;
379 }
380 else // we're synthesizing text updated event from sel change
381 {
382 // We need to retrieve the current selection because the
383 // user may have changed it in the previous handler (for
384 // CBN_SELCHANGE above).
385 sel = GetSelection();
386 if ( sel > -1 )
387 {
388 m_value = GetString(sel);
389 }
390 }
391
392 event.SetString(m_value);
393 event.SetEventObject(this);
394 ProcessCommand(event);
395 }
396 break;
397
398 default:
399 return wxChoice::MSWCommand(param, id);
400 }
401
402 // let the def window proc have it by returning false, but do not pass the
403 // message we've already handled here (notably CBN_SELCHANGE) to the base
404 // class as it would generate another event for them
405 return false;
406}
407
408WXHWND wxComboBox::GetEditHWND() const
409{
410 // this function should not be called for wxCB_READONLY controls, it is
411 // the callers responsability to check this
412 wxASSERT_MSG( !(GetWindowStyle() & wxCB_READONLY),
413 _T("read-only combobox doesn't have any edit control") );
414
415 POINT pt;
416 pt.x = pt.y = 4;
417 HWND hwndEdit = ::ChildWindowFromPoint(GetHwnd(), pt);
418 if ( !hwndEdit || hwndEdit == GetHwnd() )
419 {
420 wxFAIL_MSG(_T("not read only combobox without edit control?"));
421 }
422
423 return (WXHWND)hwndEdit;
424}
425
426// ----------------------------------------------------------------------------
427// wxComboBox creation
428// ----------------------------------------------------------------------------
429
430bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
431 const wxString& value,
432 const wxPoint& pos,
433 const wxSize& size,
434 int n, const wxString choices[],
435 long style,
436 const wxValidator& validator,
437 const wxString& name)
438{
439 // pretend that wxComboBox is hidden while it is positioned and resized and
440 // show it only right before leaving this method because otherwise there is
441 // some noticeable flicker while the control rearranges itself
442 m_isShown = false;
443
444 if ( !CreateAndInit(parent, id, pos, size, n, choices, style,
445 validator, name) )
446 return false;
447
448 // we shouldn't call SetValue() for an empty string because this would
449 // (correctly) result in an assert with a read only combobox and is useless
450 // for the other ones anyhow
451 if ( !value.empty() )
452 SetValue(value);
453
454 // a (not read only) combobox is, in fact, 2 controls: the combobox itself
455 // and an edit control inside it and if we want to catch events from this
456 // edit control, we must subclass it as well
457 if ( !(style & wxCB_READONLY) )
458 {
459 gs_wndprocEdit = wxSetWindowProc((HWND)GetEditHWND(),
460 wxComboEditWndProc);
461 }
462
463 // and finally, show the control
464 Show(true);
465
466 return true;
467}
468
469bool wxComboBox::Create(wxWindow *parent, wxWindowID id,
470 const wxString& value,
471 const wxPoint& pos,
472 const wxSize& size,
473 const wxArrayString& choices,
474 long style,
475 const wxValidator& validator,
476 const wxString& name)
477{
478 wxCArrayString chs(choices);
479 return Create(parent, id, value, pos, size, chs.GetCount(),
480 chs.GetStrings(), style, validator, name);
481}
482
483WXDWORD wxComboBox::MSWGetStyle(long style, WXDWORD *exstyle) const
484{
485 // we never have an external border
486 WXDWORD msStyle = wxChoice::MSWGetStyle
487 (
488 (style & ~wxBORDER_MASK) | wxBORDER_NONE, exstyle
489 );
490
491 // usually WS_TABSTOP is added by wxControl::MSWGetStyle() but as we're
492 // created hidden (see Create() above), it is not done for us but we still
493 // want to have this style
494 msStyle |= WS_TABSTOP;
495
496 // remove the style always added by wxChoice
497 msStyle &= ~CBS_DROPDOWNLIST;
498
499 if ( style & wxCB_READONLY )
500 msStyle |= CBS_DROPDOWNLIST;
501#ifndef __WXWINCE__
502 else if ( style & wxCB_SIMPLE )
503 msStyle |= CBS_SIMPLE; // A list (shown always) and edit control
504#endif
505 else
506 msStyle |= CBS_DROPDOWN;
507
508 // there is no reason to not always use CBS_AUTOHSCROLL, so do use it
509 msStyle |= CBS_AUTOHSCROLL;
510
511 // NB: we used to also add CBS_NOINTEGRALHEIGHT here but why?
512
513 return msStyle;
514}
515
516// ----------------------------------------------------------------------------
517// wxComboBox text control-like methods
518// ----------------------------------------------------------------------------
519
520void wxComboBox::SetValue(const wxString& value)
521{
522 if ( HasFlag(wxCB_READONLY) )
523 SetStringSelection(value);
524 else
525 SetWindowText(GetHwnd(), value.c_str());
526
527 m_value = value;
528 m_selectionOld = GetSelection();
529}
530
531// Clipboard operations
532void wxComboBox::Copy()
533{
534 SendMessage(GetHwnd(), WM_COPY, 0, 0L);
535}
536
537void wxComboBox::Cut()
538{
539 SendMessage(GetHwnd(), WM_CUT, 0, 0L);
540}
541
542void wxComboBox::Paste()
543{
544 SendMessage(GetHwnd(), WM_PASTE, 0, 0L);
545}
546
547void wxComboBox::Undo()
548{
549 if (CanUndo())
550 {
551 HWND hEditWnd = (HWND) GetEditHWND() ;
552 if ( hEditWnd )
553 ::SendMessage(hEditWnd, EM_UNDO, 0, 0);
554 }
555}
556
557void wxComboBox::Redo()
558{
559 if (CanUndo())
560 {
561 // Same as Undo, since Undo undoes the undo, i.e. a redo.
562 HWND hEditWnd = (HWND) GetEditHWND() ;
563 if ( hEditWnd )
564 ::SendMessage(hEditWnd, EM_UNDO, 0, 0);
565 }
566}
567
568void wxComboBox::SelectAll()
569{
570 SetSelection(0, GetLastPosition());
571}
572
573bool wxComboBox::CanUndo() const
574{
575 if (!IsEditable())
576 return false;
577
578 HWND hEditWnd = (HWND) GetEditHWND() ;
579 if ( hEditWnd )
580 return ::SendMessage(hEditWnd, EM_CANUNDO, 0, 0) != 0;
581 else
582 return false;
583}
584
585bool wxComboBox::CanRedo() const
586{
587 if (!IsEditable())
588 return false;
589
590 HWND hEditWnd = (HWND) GetEditHWND() ;
591 if ( hEditWnd )
592 return ::SendMessage(hEditWnd, EM_CANUNDO, 0, 0) != 0;
593 else
594 return false;
595}
596
597bool wxComboBox::HasSelection() const
598{
599 long from, to;
600 GetSelection(&from, &to);
601 return from != to;
602}
603
604bool wxComboBox::CanCopy() const
605{
606 // Can copy if there's a selection
607 return HasSelection();
608}
609
610bool wxComboBox::CanCut() const
611{
612 return IsEditable() && CanCopy() ;
613}
614
615bool wxComboBox::CanPaste() const
616{
617 if ( !IsEditable() )
618 return false;
619
620 // Standard edit control: check for straight text on clipboard
621 if ( !::OpenClipboard(GetHwndOf(wxTheApp->GetTopWindow())) )
622 return false;
623
624 bool isTextAvailable = ::IsClipboardFormatAvailable(CF_TEXT) != 0;
625 ::CloseClipboard();
626
627 return isTextAvailable;
628}
629
630bool wxComboBox::IsEditable() const
631{
632 return !HasFlag(wxCB_READONLY);
633}
634
635void wxComboBox::SetEditable(bool WXUNUSED(editable))
636{
637 // Can't implement in MSW?
638// HWND hWnd = GetHwnd();
639// SendMessage(hWnd, EM_SETREADONLY, (WPARAM)!editable, (LPARAM)0L);
640}
641
642void wxComboBox::SetInsertionPoint(long pos)
643{
644 if ( GetWindowStyle() & wxCB_READONLY )
645 return;
646
647#ifdef __WIN32__
648 HWND hWnd = GetHwnd();
649 ::SendMessage(hWnd, CB_SETEDITSEL, 0, MAKELPARAM(pos, pos));
650 HWND hEditWnd = (HWND) GetEditHWND() ;
651 if ( hEditWnd )
652 {
653 // Scroll insertion point into view
654 SendMessage(hEditWnd, EM_SCROLLCARET, (WPARAM)0, (LPARAM)0);
655 // Why is this necessary? (Copied from wxTextCtrl::SetInsertionPoint)
656 SendMessage(hEditWnd, EM_REPLACESEL, 0, (LPARAM) wxEmptyString);
657 }
658#endif // __WIN32__
659}
660
661void wxComboBox::SetInsertionPointEnd()
662{
663 // setting insertion point doesn't make sense for read only comboboxes
664 if ( !(GetWindowStyle() & wxCB_READONLY) )
665 {
666 wxTextPos pos = GetLastPosition();
667 SetInsertionPoint(pos);
668 }
669}
670
671long wxComboBox::GetInsertionPoint() const
672{
673 // CB_GETEDITSEL returns the index of the first character of the selection in
674 // its low-order word
675 DWORD pos= (DWORD)::SendMessage(GetHwnd(), CB_GETEDITSEL, 0, 0L);
676 return LOWORD(pos);
677}
678
679wxTextPos wxComboBox::GetLastPosition() const
680{
681 HWND hEditWnd = (HWND) GetEditHWND();
682
683 // Get number of characters in the last (only) line. We'll add this to the character
684 // index for the last line, 1st position.
685 wxTextPos lineLength = (wxTextPos)SendMessage(hEditWnd, EM_LINELENGTH, (WPARAM) 0, (LPARAM)0L);
686
687 return lineLength;
688}
689
690void wxComboBox::Replace(long from, long to, const wxString& value)
691{
692#if wxUSE_CLIPBOARD
693 Remove(from, to);
694
695 // Now replace with 'value', by pasting.
696 wxSetClipboardData(wxDF_TEXT, (wxObject *)(const wxChar *)value, 0, 0);
697
698 // Paste into edit control
699 SendMessage(GetHwnd(), WM_PASTE, (WPARAM)0, (LPARAM)0L);
700#else
701 wxUnusedVar(from);
702 wxUnusedVar(to);
703 wxUnusedVar(value);
704#endif
705}
706
707void wxComboBox::Remove(long from, long to)
708{
709 // Set selection and remove it
710 SetSelection(from, to);
711 SendMessage(GetHwnd(), WM_CUT, (WPARAM)0, (LPARAM)0);
712}
713
714void wxComboBox::SetSelection(long from, long to)
715{
716 // if from and to are both -1, it means (in wxWidgets) that all text should
717 // be selected, translate this into Windows convention
718 if ( (from == -1) && (to == -1) )
719 {
720 from = 0;
721 }
722
723 if ( SendMessage(GetHwnd(), CB_SETEDITSEL,
724 0, (LPARAM)MAKELONG(from, to)) == CB_ERR )
725 {
726 wxLogDebug(_T("CB_SETEDITSEL failed"));
727 }
728}
729
730void wxComboBox::GetSelection(long* from, long* to) const
731{
732 DWORD dwStart, dwEnd;
733 if ( ::SendMessage(GetHwnd(), CB_GETEDITSEL,
734 (WPARAM)&dwStart, (LPARAM)&dwEnd) == CB_ERR )
735 {
736 *from =
737 *to = 0;
738 }
739 else
740 {
741 *from = dwStart;
742 *to = dwEnd;
743 }
744}
745
746int wxComboBox::GetSelection() const
747{
748 return wxChoice::GetSelection();
749}
750
751// ----------------------------------------------------------------------------
752// standard event handling
753// ----------------------------------------------------------------------------
754
755void wxComboBox::OnCut(wxCommandEvent& WXUNUSED(event))
756{
757 Cut();
758}
759
760void wxComboBox::OnCopy(wxCommandEvent& WXUNUSED(event))
761{
762 Copy();
763}
764
765void wxComboBox::OnPaste(wxCommandEvent& WXUNUSED(event))
766{
767 Paste();
768}
769
770void wxComboBox::OnUndo(wxCommandEvent& WXUNUSED(event))
771{
772 Undo();
773}
774
775void wxComboBox::OnRedo(wxCommandEvent& WXUNUSED(event))
776{
777 Redo();
778}
779
780void wxComboBox::OnDelete(wxCommandEvent& WXUNUSED(event))
781{
782 long from, to;
783 GetSelection(& from, & to);
784 if (from != -1 && to != -1)
785 Remove(from, to);
786}
787
788void wxComboBox::OnSelectAll(wxCommandEvent& WXUNUSED(event))
789{
790 SetSelection(-1, -1);
791}
792
793void wxComboBox::OnUpdateCut(wxUpdateUIEvent& event)
794{
795 event.Enable( CanCut() );
796}
797
798void wxComboBox::OnUpdateCopy(wxUpdateUIEvent& event)
799{
800 event.Enable( CanCopy() );
801}
802
803void wxComboBox::OnUpdatePaste(wxUpdateUIEvent& event)
804{
805 event.Enable( CanPaste() );
806}
807
808void wxComboBox::OnUpdateUndo(wxUpdateUIEvent& event)
809{
810 event.Enable( CanUndo() );
811}
812
813void wxComboBox::OnUpdateRedo(wxUpdateUIEvent& event)
814{
815 event.Enable( CanRedo() );
816}
817
818void wxComboBox::OnUpdateDelete(wxUpdateUIEvent& event)
819{
820 event.Enable(HasSelection() && IsEditable()) ;
821}
822
823void wxComboBox::OnUpdateSelectAll(wxUpdateUIEvent& event)
824{
825 event.Enable(GetLastPosition() > 0);
826}
827
828#endif // wxUSE_COMBOBOX
829