1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: src/msw/listbox.cpp
4 // Author: Julian Smart
5 // Modified by: Vadim Zeitlin (owner drawn stuff)
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 ///////////////////////////////////////////////////////////////////////////////
12 // For compilers that support precompilation, includes "wx.h".
13 #include "wx/wxprec.h"
21 #include "wx/listbox.h"
24 #include "wx/dynarray.h"
25 #include "wx/settings.h"
31 #include "wx/window.h"
34 #include "wx/msw/private.h"
35 #include "wx/msw/dc.h"
40 #include "wx/ownerdrw.h"
43 // ============================================================================
44 // list box item declaration and implementation
45 // ============================================================================
49 class wxListBoxItem
: public wxOwnerDrawn
52 wxListBoxItem(wxListBox
*parent
)
53 { m_parent
= parent
; }
55 wxListBox
*GetParent() const
59 { return m_parent
->GetItemIndex(const_cast<wxListBoxItem
*>(this)); }
61 wxString
GetName() const
62 { return m_parent
->GetString(GetIndex()); }
68 wxOwnerDrawn
*wxListBox::CreateLboxItem(size_t WXUNUSED(n
))
70 return new wxListBoxItem(this);
73 #endif //USE_OWNER_DRAWN
75 // ============================================================================
76 // list box control implementation
77 // ============================================================================
79 // ----------------------------------------------------------------------------
81 // ----------------------------------------------------------------------------
83 void wxListBox::Init()
86 m_updateHorizontalExtent
= false;
87 m_selectedByKeyboard
= false;
90 bool wxListBox::Create(wxWindow
*parent
,
94 int n
, const wxString choices
[],
96 const wxValidator
& validator
,
99 // initialize base class fields
100 if ( !CreateControl(parent
, id
, pos
, size
, style
, validator
, name
) )
103 // create the native control
104 if ( !MSWCreateControl(wxT("LISTBOX"), wxEmptyString
, pos
, size
) )
106 // control creation failed
110 // initialize the contents
111 for ( int i
= 0; i
< n
; i
++ )
116 // now we can compute our best size correctly, so do it again
117 SetInitialSize(size
);
122 bool wxListBox::Create(wxWindow
*parent
,
126 const wxArrayString
& choices
,
128 const wxValidator
& validator
,
129 const wxString
& name
)
131 wxCArrayString
chs(choices
);
132 return Create(parent
, id
, pos
, size
, chs
.GetCount(), chs
.GetStrings(),
133 style
, validator
, name
);
136 wxListBox::~wxListBox()
141 WXDWORD
wxListBox::MSWGetStyle(long style
, WXDWORD
*exstyle
) const
143 WXDWORD msStyle
= wxControl::MSWGetStyle(style
, exstyle
);
145 // we always want to get the notifications
146 msStyle
|= LBS_NOTIFY
;
148 // without this style, you get unexpected heights, so e.g. constraint
149 // layout doesn't work properly
150 msStyle
|= LBS_NOINTEGRALHEIGHT
;
152 wxASSERT_MSG( !(style
& wxLB_MULTIPLE
) || !(style
& wxLB_EXTENDED
),
153 wxT("only one of listbox selection modes can be specified") );
155 if ( style
& wxLB_MULTIPLE
)
156 msStyle
|= LBS_MULTIPLESEL
;
157 else if ( style
& wxLB_EXTENDED
)
158 msStyle
|= LBS_EXTENDEDSEL
;
160 wxASSERT_MSG( !(style
& wxLB_ALWAYS_SB
) || !(style
& wxLB_NO_SB
),
161 wxT( "Conflicting styles wxLB_ALWAYS_SB and wxLB_NO_SB." ) );
163 if ( !(style
& wxLB_NO_SB
) )
165 msStyle
|= WS_VSCROLL
;
166 if ( style
& wxLB_ALWAYS_SB
)
167 msStyle
|= LBS_DISABLENOSCROLL
;
170 if ( m_windowStyle
& wxLB_HSCROLL
)
171 msStyle
|= WS_HSCROLL
;
172 if ( m_windowStyle
& wxLB_SORT
)
175 #if wxUSE_OWNER_DRAWN && !defined(__WXWINCE__)
176 if ( m_windowStyle
& wxLB_OWNERDRAW
)
178 // we don't support LBS_OWNERDRAWVARIABLE yet and we also always put
179 // the strings in the listbox for simplicity even though we could have
180 // avoided it in this case
181 msStyle
|= LBS_OWNERDRAWFIXED
| LBS_HASSTRINGS
;
183 #endif // wxUSE_OWNER_DRAWN
188 void wxListBox::OnInternalIdle()
190 wxWindow::OnInternalIdle();
192 if (m_updateHorizontalExtent
)
194 SetHorizontalExtent(wxEmptyString
);
195 m_updateHorizontalExtent
= false;
199 void wxListBox::MSWOnItemsChanged()
201 // we need to do two things when items change: update their max horizontal
202 // extent so that horizontal scrollbar could be shown or hidden as
203 // appropriate and also invlaidate the best size
205 // updating the max extent is slow (it's an O(N) operation) and so we defer
206 // it until the idle time but the best size should be invalidated
207 // immediately doing it in idle time is too late -- layout using incorrect
208 // old best size will have been already done by then
210 m_updateHorizontalExtent
= true;
212 InvalidateBestSize();
215 // ----------------------------------------------------------------------------
216 // implementation of wxListBoxBase methods
217 // ----------------------------------------------------------------------------
219 void wxListBox::DoSetFirstItem(int N
)
221 wxCHECK_RET( IsValid(N
),
222 wxT("invalid index in wxListBox::SetFirstItem") );
224 SendMessage(GetHwnd(), LB_SETTOPINDEX
, (WPARAM
)N
, (LPARAM
)0);
227 void wxListBox::DoDeleteOneItem(unsigned int n
)
229 wxCHECK_RET( IsValid(n
),
230 wxT("invalid index in wxListBox::Delete") );
232 #if wxUSE_OWNER_DRAWN
233 if ( HasFlag(wxLB_OWNERDRAW
) )
236 m_aItems
.RemoveAt(n
);
238 #endif // wxUSE_OWNER_DRAWN
240 SendMessage(GetHwnd(), LB_DELETESTRING
, n
, 0);
245 UpdateOldSelections();
248 int wxListBox::FindString(const wxString
& s
, bool bCase
) const
250 // back to base class search for not native search type
252 return wxItemContainerImmutable::FindString( s
, bCase
);
254 int pos
= ListBox_FindStringExact(GetHwnd(), -1, s
.wx_str());
261 void wxListBox::DoClear()
263 #if wxUSE_OWNER_DRAWN
264 if ( HasFlag(wxLB_OWNERDRAW
) )
266 WX_CLEAR_ARRAY(m_aItems
);
268 #endif // wxUSE_OWNER_DRAWN
270 ListBox_ResetContent(GetHwnd());
275 UpdateOldSelections();
278 void wxListBox::DoSetSelection(int N
, bool select
)
280 wxCHECK_RET( N
== wxNOT_FOUND
|| IsValid(N
),
281 wxT("invalid index in wxListBox::SetSelection") );
283 if ( HasMultipleSelection() )
285 // Setting selection to -1 should deselect everything.
286 const bool deselectAll
= N
== wxNOT_FOUND
;
287 SendMessage(GetHwnd(), LB_SETSEL
,
288 deselectAll
? FALSE
: select
,
289 deselectAll
? -1 : N
);
293 SendMessage(GetHwnd(), LB_SETCURSEL
, select
? N
: -1, 0);
296 UpdateOldSelections();
299 bool wxListBox::IsSelected(int N
) const
301 wxCHECK_MSG( IsValid(N
), false,
302 wxT("invalid index in wxListBox::Selected") );
304 return SendMessage(GetHwnd(), LB_GETSEL
, N
, 0) == 0 ? false : true;
307 void *wxListBox::DoGetItemClientData(unsigned int n
) const
309 return (void *)SendMessage(GetHwnd(), LB_GETITEMDATA
, n
, 0);
312 void wxListBox::DoSetItemClientData(unsigned int n
, void *clientData
)
314 if ( ListBox_SetItemData(GetHwnd(), n
, clientData
) == LB_ERR
)
316 wxLogDebug(wxT("LB_SETITEMDATA failed"));
320 // Return number of selections and an array of selected integers
321 int wxListBox::GetSelections(wxArrayInt
& aSelections
) const
325 if ( HasMultipleSelection() )
327 int countSel
= ListBox_GetSelCount(GetHwnd());
328 if ( countSel
== LB_ERR
)
330 wxLogDebug(wxT("ListBox_GetSelCount failed"));
332 else if ( countSel
!= 0 )
334 int *selections
= new int[countSel
];
336 if ( ListBox_GetSelItems(GetHwnd(),
337 countSel
, selections
) == LB_ERR
)
339 wxLogDebug(wxT("ListBox_GetSelItems failed"));
344 aSelections
.Alloc(countSel
);
345 for ( int n
= 0; n
< countSel
; n
++ )
346 aSelections
.Add(selections
[n
]);
349 delete [] selections
;
354 else // single-selection listbox
356 if (ListBox_GetCurSel(GetHwnd()) > -1)
357 aSelections
.Add(ListBox_GetCurSel(GetHwnd()));
359 return aSelections
.Count();
363 // Get single selection, for single choice list items
364 int wxListBox::GetSelection() const
366 wxCHECK_MSG( !HasMultipleSelection(),
368 wxT("GetSelection() can't be used with multiple-selection listboxes, use GetSelections() instead.") );
370 return ListBox_GetCurSel(GetHwnd());
373 // Find string for position
374 wxString
wxListBox::GetString(unsigned int n
) const
376 wxCHECK_MSG( IsValid(n
), wxEmptyString
,
377 wxT("invalid index in wxListBox::GetString") );
379 int len
= ListBox_GetTextLen(GetHwnd(), n
);
381 // +1 for terminating NUL
383 ListBox_GetText(GetHwnd(), n
, (wxChar
*)wxStringBuffer(result
, len
+ 1));
388 int wxListBox::DoInsertItems(const wxArrayStringsAdapter
& items
,
391 wxClientDataType type
)
393 MSWAllocStorage(items
, LB_INITSTORAGE
);
395 const bool append
= pos
== GetCount();
397 // we must use CB_ADDSTRING when appending as only it works correctly for
398 // the sorted controls
399 const unsigned msg
= append
? LB_ADDSTRING
: LB_INSERTSTRING
;
406 const unsigned int numItems
= items
.GetCount();
407 for ( unsigned int i
= 0; i
< numItems
; i
++ )
409 n
= MSWInsertOrAppendItem(pos
, items
[i
], msg
);
410 if ( n
== wxNOT_FOUND
)
418 #if wxUSE_OWNER_DRAWN
419 if ( HasFlag(wxLB_OWNERDRAW
) )
421 wxOwnerDrawn
*pNewItem
= CreateLboxItem(n
);
422 pNewItem
->SetFont(GetFont());
423 m_aItems
.Insert(pNewItem
, n
);
425 #endif // wxUSE_OWNER_DRAWN
426 AssignNewItemClientData(n
, clientData
, i
, type
);
431 UpdateOldSelections();
436 int wxListBox::DoHitTestList(const wxPoint
& point
) const
438 LRESULT lRes
= ::SendMessage(GetHwnd(), LB_ITEMFROMPOINT
,
439 0, MAKELPARAM(point
.x
, point
.y
));
441 // non zero high-order word means that this item is outside of the client
442 // area, IOW the point is outside of the listbox
443 return HIWORD(lRes
) ? wxNOT_FOUND
: LOWORD(lRes
);
446 void wxListBox::SetString(unsigned int n
, const wxString
& s
)
448 wxCHECK_RET( IsValid(n
),
449 wxT("invalid index in wxListBox::SetString") );
451 // remember the state of the item
452 bool wasSelected
= IsSelected(n
);
454 void *oldData
= NULL
;
455 wxClientData
*oldObjData
= NULL
;
456 if ( HasClientUntypedData() )
457 oldData
= GetClientData(n
);
458 else if ( HasClientObjectData() )
459 oldObjData
= GetClientObject(n
);
461 // delete and recreate it
462 SendMessage(GetHwnd(), LB_DELETESTRING
, n
, 0);
465 if ( n
== (m_noItems
- 1) )
468 ListBox_InsertString(GetHwnd(), newN
, s
.wx_str());
470 // restore the client data
472 SetClientData(n
, oldData
);
473 else if ( oldObjData
)
474 SetClientObject(n
, oldObjData
);
476 // we may have lost the selection
483 unsigned int wxListBox::GetCount() const
488 // ----------------------------------------------------------------------------
489 // size-related stuff
490 // ----------------------------------------------------------------------------
492 void wxListBox::SetHorizontalExtent(const wxString
& s
)
494 // the rest is only necessary if we want a horizontal scrollbar
495 if ( !HasFlag(wxHSCROLL
) )
499 WindowHDC
dc(GetHwnd());
500 SelectInHDC
selFont(dc
, GetHfontOf(GetFont()));
502 TEXTMETRIC lpTextMetric
;
503 ::GetTextMetrics(dc
, &lpTextMetric
);
505 int largestExtent
= 0;
510 // set extent to the max length of all strings
511 for ( unsigned int i
= 0; i
< m_noItems
; i
++ )
513 const wxString str
= GetString(i
);
514 ::GetTextExtentPoint32(dc
, str
.c_str(), str
.length(), &extentXY
);
516 int extentX
= (int)(extentXY
.cx
+ lpTextMetric
.tmAveCharWidth
);
517 if ( extentX
> largestExtent
)
518 largestExtent
= extentX
;
521 else // just increase the extent to the length of this string
523 int existingExtent
= (int)SendMessage(GetHwnd(),
524 LB_GETHORIZONTALEXTENT
, 0, 0L);
526 ::GetTextExtentPoint32(dc
, s
.c_str(), s
.length(), &extentXY
);
528 int extentX
= (int)(extentXY
.cx
+ lpTextMetric
.tmAveCharWidth
);
529 if ( extentX
> existingExtent
)
530 largestExtent
= extentX
;
534 SendMessage(GetHwnd(), LB_SETHORIZONTALEXTENT
, LOWORD(largestExtent
), 0L);
535 //else: it shouldn't change
538 wxSize
wxListBox::DoGetBestClientSize() const
540 // find the widest string
543 for (unsigned int i
= 0; i
< m_noItems
; i
++)
545 wxString
str(GetString(i
));
546 GetTextExtent(str
, &wLine
, NULL
);
547 if ( wLine
> wListbox
)
551 // give it some reasonable default value if there are no strings in the
556 // the listbox should be slightly larger than the widest string
557 wListbox
+= 3*GetCharWidth();
559 // add room for the scrollbar
560 wListbox
+= wxSystemSettings::GetMetric(wxSYS_VSCROLL_X
);
562 // don't make the listbox too tall (limit height to 10 items) but don't
563 // make it too small neither
564 int hListbox
= SendMessage(GetHwnd(), LB_GETITEMHEIGHT
, 0, 0)*
565 wxMin(wxMax(m_noItems
, 3), 10);
567 return wxSize(wListbox
, hListbox
);
570 // ----------------------------------------------------------------------------
572 // ----------------------------------------------------------------------------
574 bool wxListBox::MSWCommand(WXUINT param
, WXWORD
WXUNUSED(id
))
578 if ( param
== LBN_SELCHANGE
)
580 if ( HasMultipleSelection() )
581 return CalcAndSendEvent();
583 evtType
= wxEVT_COMMAND_LISTBOX_SELECTED
;
585 if ( m_selectedByKeyboard
)
587 // We shouldn't use the mouse position to find the item as mouse
588 // can be anywhere, ask the listbox itself. Notice that this can't
589 // be used when the item is selected using the mouse however as
590 // LB_GETCARETINDEX will always return a valid item, even if the
591 // mouse is clicked below all the items, which is why we find the
592 // item ourselves below in this case.
593 n
= SendMessage(GetHwnd(), LB_GETCARETINDEX
, 0, 0);
595 //else: n will be determined below from the mouse position
597 else if ( param
== LBN_DBLCLK
)
599 evtType
= wxEVT_COMMAND_LISTBOX_DOUBLECLICKED
;
603 // some event we're not interested in
607 // Find the item position if it was a mouse-generated selection event or a
608 // double click event (which is always generated using the mouse)
609 if ( n
== wxNOT_FOUND
)
611 const DWORD pos
= ::GetMessagePos();
612 const wxPoint
pt(GET_X_LPARAM(pos
), GET_Y_LPARAM(pos
));
613 n
= HitTest(ScreenToClient(wxPoint(pt
)));
616 // We get events even when mouse is clicked outside of any valid item from
617 // Windows, just ignore them.
618 if ( n
== wxNOT_FOUND
)
621 if ( param
== LBN_SELCHANGE
)
623 if ( !DoChangeSingleSelection(n
) )
627 // Do generate an event otherwise.
628 return SendEvent(evtType
, n
, true /* selection */);
632 wxListBox::MSWWindowProc(WXUINT nMsg
, WXWPARAM wParam
, WXLPARAM lParam
)
634 // Remember whether there was a keyboard or mouse event before
635 // LBN_SELCHANGE: this allows us to correctly determine the item affected
636 // by it in MSWCommand() above in any case.
637 if ( WM_KEYFIRST
<= nMsg
&& nMsg
<= WM_KEYLAST
)
638 m_selectedByKeyboard
= true;
639 else if ( WM_MOUSEFIRST
<= nMsg
&& nMsg
<= WM_MOUSELAST
)
640 m_selectedByKeyboard
= false;
642 return wxListBoxBase::MSWWindowProc(nMsg
, wParam
, lParam
);
645 // ----------------------------------------------------------------------------
646 // owner-drawn list boxes support
647 // ----------------------------------------------------------------------------
649 #if wxUSE_OWNER_DRAWN
651 // misc overloaded methods
652 // -----------------------
654 bool wxListBox::SetFont(const wxFont
&font
)
656 if ( HasFlag(wxLB_OWNERDRAW
) )
658 const unsigned count
= m_aItems
.GetCount();
659 for ( unsigned i
= 0; i
< count
; i
++ )
660 m_aItems
[i
]->SetFont(font
);
663 wxListBoxBase::SetFont(font
);
668 bool wxListBox::GetItemRect(size_t n
, wxRect
& rect
) const
670 wxCHECK_MSG( IsValid(n
), false,
671 wxT("invalid index in wxListBox::GetItemRect") );
675 if ( ListBox_GetItemRect(GetHwnd(), n
, &rc
) != LB_ERR
)
677 rect
= wxRectFromRECT(rc
);
682 // couldn't retrieve rect: for example, item isn't visible
687 bool wxListBox::RefreshItem(size_t n
)
690 if ( !GetItemRect(n
, rect
) )
694 wxCopyRectToRECT(rect
, rc
);
696 return ::InvalidateRect((HWND
)GetHWND(), &rc
, FALSE
) == TRUE
;
705 // space beneath/above each row in pixels
706 static const int LISTBOX_EXTRA_SPACE
= 1;
708 } // anonymous namespace
710 // the height is the same for all items
711 // TODO should be changed for LBS_OWNERDRAWVARIABLE style listboxes
713 // NB: can't forward this to wxListBoxItem because LB_SETITEMDATA
714 // message is not yet sent when we get here!
715 bool wxListBox::MSWOnMeasure(WXMEASUREITEMSTRUCT
*item
)
717 // only owner-drawn control should receive this message
718 wxCHECK( HasFlag(wxLB_OWNERDRAW
), false );
720 MEASUREITEMSTRUCT
*pStruct
= (MEASUREITEMSTRUCT
*)item
;
723 HDC hdc
= GetDC(NULL
);
725 HDC hdc
= CreateIC(wxT("DISPLAY"), NULL
, NULL
, 0);
729 wxDCTemp
dc((WXHDC
)hdc
);
730 dc
.SetFont(GetFont());
732 pStruct
->itemHeight
= dc
.GetCharHeight() + 2 * LISTBOX_EXTRA_SPACE
;
733 pStruct
->itemWidth
= dc
.GetCharWidth();
737 ReleaseDC(NULL
, hdc
);
745 // forward the message to the appropriate item
746 bool wxListBox::MSWOnDraw(WXDRAWITEMSTRUCT
*item
)
748 // only owner-drawn control should receive this message
749 wxCHECK( HasFlag(wxLB_OWNERDRAW
), false );
751 DRAWITEMSTRUCT
*pStruct
= (DRAWITEMSTRUCT
*)item
;
753 // the item may be -1 for an empty listbox
754 if ( pStruct
->itemID
== (UINT
)-1 )
757 wxListBoxItem
*pItem
= (wxListBoxItem
*)m_aItems
[pStruct
->itemID
];
759 wxDCTemp
dc((WXHDC
)pStruct
->hDC
);
761 return pItem
->OnDrawItem(dc
, wxRectFromRECT(pStruct
->rcItem
),
762 (wxOwnerDrawn::wxODAction
)pStruct
->itemAction
,
763 (wxOwnerDrawn::wxODStatus
)(pStruct
->itemState
| wxOwnerDrawn::wxODHidePrefix
));
766 #endif // wxUSE_OWNER_DRAWN
768 #endif // wxUSE_LISTBOX