]> git.saurik.com Git - wxWidgets.git/blame - src/msw/listbox.cpp
TransferFrom/ToWindow() were reverted, fixed
[wxWidgets.git] / src / msw / listbox.cpp
CommitLineData
2bda0e17 1///////////////////////////////////////////////////////////////////////////////
1e6feb95 2// Name: src/msw/listbox.cpp
2bda0e17
KB
3// Purpose: wxListBox
4// Author: Julian Smart
5// Modified by: Vadim Zeitlin (owner drawn stuff)
dd3c394a 6// Created:
2bda0e17
KB
7// RCS-ID: $Id$
8// Copyright: (c) Julian Smart
6c9a19aa 9// Licence: wxWindows licence
2bda0e17
KB
10///////////////////////////////////////////////////////////////////////////////
11
14f355c2 12#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
dd3c394a 13 #pragma implementation "listbox.h"
2bda0e17
KB
14#endif
15
16// For compilers that support precompilation, includes "wx.h".
17#include "wx/wxprec.h"
18
19#ifdef __BORLANDC__
dd3c394a 20 #pragma hdrstop
2bda0e17
KB
21#endif
22
1e6feb95 23#if wxUSE_LISTBOX
0c589ad0 24
2bda0e17 25#ifndef WX_PRECOMP
0c589ad0
BM
26#include "wx/listbox.h"
27#include "wx/settings.h"
28#include "wx/brush.h"
29#include "wx/font.h"
30#include "wx/dc.h"
2662e49e 31#include "wx/utils.h"
2bda0e17
KB
32#endif
33
1e6feb95
VZ
34#include "wx/window.h"
35#include "wx/msw/private.h"
36
5ea105e0
RR
37#include <windowsx.h>
38
0c589ad0
BM
39#include "wx/dynarray.h"
40#include "wx/log.h"
2bda0e17 41
0c589ad0
BM
42#if wxUSE_OWNER_DRAWN
43 #include "wx/ownerdrw.h"
44#endif
2bda0e17 45
b39dbf34
JS
46#ifdef __GNUWIN32_OLD__
47 #include "wx/msw/gnuwin32/extra.h"
57c208c5 48#endif
2bda0e17 49
6a89f9ee 50#if wxUSE_EXTENDED_RTTI
bc9fb572
JS
51WX_DEFINE_FLAGS( wxListBoxStyle )
52
3ff066a4 53wxBEGIN_FLAGS( wxListBoxStyle )
bc9fb572
JS
54 // new style border flags, we put them first to
55 // use them for streaming out
3ff066a4
SC
56 wxFLAGS_MEMBER(wxBORDER_SIMPLE)
57 wxFLAGS_MEMBER(wxBORDER_SUNKEN)
58 wxFLAGS_MEMBER(wxBORDER_DOUBLE)
59 wxFLAGS_MEMBER(wxBORDER_RAISED)
60 wxFLAGS_MEMBER(wxBORDER_STATIC)
61 wxFLAGS_MEMBER(wxBORDER_NONE)
bc9fb572
JS
62
63 // old style border flags
3ff066a4
SC
64 wxFLAGS_MEMBER(wxSIMPLE_BORDER)
65 wxFLAGS_MEMBER(wxSUNKEN_BORDER)
66 wxFLAGS_MEMBER(wxDOUBLE_BORDER)
67 wxFLAGS_MEMBER(wxRAISED_BORDER)
68 wxFLAGS_MEMBER(wxSTATIC_BORDER)
69 wxFLAGS_MEMBER(wxNO_BORDER)
bc9fb572
JS
70
71 // standard window styles
3ff066a4
SC
72 wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
73 wxFLAGS_MEMBER(wxCLIP_CHILDREN)
74 wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
75 wxFLAGS_MEMBER(wxWANTS_CHARS)
76 wxFLAGS_MEMBER(wxNO_FULL_REPAINT_ON_RESIZE)
77 wxFLAGS_MEMBER(wxALWAYS_SHOW_SB )
78 wxFLAGS_MEMBER(wxVSCROLL)
79 wxFLAGS_MEMBER(wxHSCROLL)
80
81 wxFLAGS_MEMBER(wxLB_SINGLE)
82 wxFLAGS_MEMBER(wxLB_MULTIPLE)
83 wxFLAGS_MEMBER(wxLB_EXTENDED)
84 wxFLAGS_MEMBER(wxLB_HSCROLL)
85 wxFLAGS_MEMBER(wxLB_ALWAYS_SB)
86 wxFLAGS_MEMBER(wxLB_NEEDED_SB)
87 wxFLAGS_MEMBER(wxLB_SORT)
88
89wxEND_FLAGS( wxListBoxStyle )
bc9fb572 90
6a89f9ee
SC
91IMPLEMENT_DYNAMIC_CLASS_XTI(wxListBox, wxControl,"wx/listbox.h")
92
3ff066a4
SC
93wxBEGIN_PROPERTIES_TABLE(wxListBox)
94 wxEVENT_PROPERTY( Select , wxEVT_COMMAND_LISTBOX_SELECTED , wxCommandEvent )
95 wxEVENT_PROPERTY( DoubleClick , wxEVT_COMMAND_LISTBOX_DOUBLECLICKED , wxCommandEvent )
c5ca409b 96
3ff066a4
SC
97 wxPROPERTY( Font , wxFont , SetFont , GetFont , , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
98 wxPROPERTY_COLLECTION( Choices , wxArrayString , wxString , AppendString , GetStrings, 0 /*flags*/ , wxT("Helpstring") , wxT("group") )
99 wxPROPERTY( Selection ,int, SetSelection, GetSelection,, 0 /*flags*/ , wxT("Helpstring") , wxT("group") )
100 wxPROPERTY_FLAGS( WindowStyle , wxListBoxStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
101wxEND_PROPERTIES_TABLE()
6a89f9ee 102
3ff066a4
SC
103wxBEGIN_HANDLERS_TABLE(wxListBox)
104wxEND_HANDLERS_TABLE()
6a89f9ee 105
3ff066a4 106wxCONSTRUCTOR_4( wxListBox , wxWindow* , Parent , wxWindowID , Id , wxPoint , Position , wxSize , Size )
6a89f9ee 107#else
9c9c3d7a 108IMPLEMENT_DYNAMIC_CLASS(wxListBox, wxControl)
6a89f9ee 109#endif
2bda0e17 110
066f1b7a
SC
111/*
112TODO PROPERTIES
113 selection
114 content
115 item
116*/
117
2bda0e17
KB
118// ============================================================================
119// list box item declaration and implementation
120// ============================================================================
121
47d67540 122#if wxUSE_OWNER_DRAWN
2bda0e17
KB
123
124class wxListBoxItem : public wxOwnerDrawn
125{
126public:
2b5f62a0 127 wxListBoxItem(const wxString& str = wxEmptyString);
2bda0e17
KB
128};
129
dd3c394a 130wxListBoxItem::wxListBoxItem(const wxString& str) : wxOwnerDrawn(str, FALSE)
2bda0e17 131{
dd3c394a
VZ
132 // no bitmaps/checkmarks
133 SetMarginWidth(0);
2bda0e17
KB
134}
135
2b5f62a0 136wxOwnerDrawn *wxListBox::CreateLboxItem(size_t WXUNUSED(n))
2bda0e17 137{
dd3c394a 138 return new wxListBoxItem();
2bda0e17
KB
139}
140
141#endif //USE_OWNER_DRAWN
142
143// ============================================================================
144// list box control implementation
145// ============================================================================
146
2ee3ee1b
VZ
147// ----------------------------------------------------------------------------
148// creation
149// ----------------------------------------------------------------------------
dd3c394a 150
2ee3ee1b 151// Listbox item
bfc6fde4 152wxListBox::wxListBox()
2bda0e17 153{
dd3c394a
VZ
154 m_noItems = 0;
155 m_selected = 0;
2bda0e17
KB
156}
157
dd3c394a
VZ
158bool wxListBox::Create(wxWindow *parent,
159 wxWindowID id,
2bda0e17
KB
160 const wxPoint& pos,
161 const wxSize& size,
debe6624
JS
162 int n, const wxString choices[],
163 long style,
ac8d0c11 164 const wxValidator& wxVALIDATOR_PARAM(validator),
2bda0e17
KB
165 const wxString& name)
166{
dd3c394a
VZ
167 m_noItems = 0;
168 m_hWnd = 0;
169 m_selected = 0;
2bda0e17 170
dd3c394a 171 SetName(name);
11b6a93b 172#if wxUSE_VALIDATORS
dd3c394a 173 SetValidator(validator);
11b6a93b 174#endif // wxUSE_VALIDATORS
2bda0e17 175
dd3c394a
VZ
176 if (parent)
177 parent->AddChild(this);
2bda0e17 178
7516ed26 179 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW));
dd3c394a 180 SetForegroundColour(parent->GetForegroundColour());
2bda0e17 181
dd3c394a 182 m_windowId = ( id == -1 ) ? (int)NewControlId() : id;
2bda0e17 183
dd3c394a
VZ
184 int x = pos.x;
185 int y = pos.y;
186 int width = size.x;
187 int height = size.y;
188 m_windowStyle = style;
2bda0e17 189
fe3d9123
JS
190 DWORD wstyle = WS_VISIBLE | WS_CHILD | WS_VSCROLL | WS_TABSTOP |
191 LBS_NOTIFY | LBS_HASSTRINGS ;
54081dc5
VZ
192
193 wxASSERT_MSG( !(style & wxLB_MULTIPLE) || !(style & wxLB_EXTENDED),
194 _T("only one of listbox selection modes can be specified") );
c76b1a30
JS
195
196 if ( (m_windowStyle & wxBORDER_MASK) == wxBORDER_DEFAULT )
197 m_windowStyle |= wxBORDER_SUNKEN;
198
b0766406
JS
199 if ( m_windowStyle & wxCLIP_SIBLINGS )
200 wstyle |= WS_CLIPSIBLINGS;
54081dc5 201
dd3c394a
VZ
202 if (m_windowStyle & wxLB_MULTIPLE)
203 wstyle |= LBS_MULTIPLESEL;
204 else if (m_windowStyle & wxLB_EXTENDED)
205 wstyle |= LBS_EXTENDEDSEL;
2bda0e17 206
dd3c394a 207 if (m_windowStyle & wxLB_ALWAYS_SB)
2ee3ee1b 208 wstyle |= LBS_DISABLENOSCROLL;
dd3c394a
VZ
209 if (m_windowStyle & wxLB_HSCROLL)
210 wstyle |= WS_HSCROLL;
211 if (m_windowStyle & wxLB_SORT)
212 wstyle |= LBS_SORT;
2bda0e17 213
4676948b 214#if wxUSE_OWNER_DRAWN && !defined(__WXWINCE__)
2bda0e17 215 if ( m_windowStyle & wxLB_OWNERDRAW ) {
dd3c394a
VZ
216 // we don't support LBS_OWNERDRAWVARIABLE yet
217 wstyle |= LBS_OWNERDRAWFIXED;
2bda0e17 218 }
2bda0e17
KB
219#endif
220
dd3c394a
VZ
221 // Without this style, you get unexpected heights, so e.g. constraint layout
222 // doesn't work properly
223 wstyle |= LBS_NOINTEGRALHEIGHT;
224
fe3d9123 225 WXDWORD exStyle = 0;
22a746d7 226 (void) MSWGetStyle(m_windowStyle, & exStyle) ;
2bda0e17 227
223d09f6 228 m_hWnd = (WXHWND)::CreateWindowEx(exStyle, wxT("LISTBOX"), NULL,
fe3d9123 229 wstyle ,
dd3c394a
VZ
230 0, 0, 0, 0,
231 (HWND)parent->GetHWND(), (HMENU)m_windowId,
232 wxGetInstance(), NULL);
1c089c47 233
223d09f6 234 wxCHECK_MSG( m_hWnd, FALSE, wxT("Failed to create listbox") );
1c089c47 235
dd3c394a
VZ
236 // Subclass again to catch messages
237 SubclassWin(m_hWnd);
2bda0e17 238
dd3c394a
VZ
239 size_t ui;
240 for (ui = 0; ui < (size_t)n; ui++) {
241 Append(choices[ui]);
2bda0e17 242 }
2bda0e17 243
dd3c394a 244 if ( (m_windowStyle & wxLB_MULTIPLE) == 0 )
a23fd0e1 245 SendMessage(GetHwnd(), LB_SETCURSEL, 0, 0);
2bda0e17 246
dd3c394a 247 SetFont(parent->GetFont());
2bda0e17 248
dd3c394a 249 SetSize(x, y, width, height);
2bda0e17 250
dd3c394a 251 return TRUE;
2bda0e17
KB
252}
253
bfc6fde4 254wxListBox::~wxListBox()
2bda0e17 255{
baccb514 256 Free();
2bda0e17
KB
257}
258
bfc6fde4 259void wxListBox::SetupColours()
2bda0e17 260{
a756f210 261 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW));
dd3c394a 262 SetForegroundColour(GetParent()->GetForegroundColour());
2bda0e17
KB
263}
264
2ee3ee1b
VZ
265// ----------------------------------------------------------------------------
266// implementation of wxListBoxBase methods
267// ----------------------------------------------------------------------------
268
269void wxListBox::DoSetFirstItem(int N)
2bda0e17 270{
dd3c394a 271 wxCHECK_RET( N >= 0 && N < m_noItems,
223d09f6 272 wxT("invalid index in wxListBox::SetFirstItem") );
dd3c394a 273
2ee3ee1b 274 SendMessage(GetHwnd(), LB_SETTOPINDEX, (WPARAM)N, (LPARAM)0);
2bda0e17
KB
275}
276
debe6624 277void wxListBox::Delete(int N)
2bda0e17 278{
dd3c394a 279 wxCHECK_RET( N >= 0 && N < m_noItems,
223d09f6 280 wxT("invalid index in wxListBox::Delete") );
dd3c394a 281
07cf98cb
VZ
282 // for owner drawn objects, the data is used for storing wxOwnerDrawn
283 // pointers and we shouldn't touch it
284#if !wxUSE_OWNER_DRAWN
285 if ( !(m_windowStyle & wxLB_OWNERDRAW) )
286#endif // !wxUSE_OWNER_DRAWN
287 if ( HasClientObjectData() )
288 {
289 delete GetClientObject(N);
290 }
6c8a980f 291
a23fd0e1 292 SendMessage(GetHwnd(), LB_DELETESTRING, N, 0);
dd3c394a
VZ
293 m_noItems--;
294
2b5f62a0 295 SetHorizontalExtent(wxEmptyString);
2bda0e17
KB
296}
297
2ee3ee1b 298int wxListBox::DoAppend(const wxString& item)
2bda0e17 299{
a23fd0e1 300 int index = ListBox_AddString(GetHwnd(), item);
2ee3ee1b 301 m_noItems++;
2bda0e17 302
47d67540 303#if wxUSE_OWNER_DRAWN
2bda0e17 304 if ( m_windowStyle & wxLB_OWNERDRAW ) {
2b5f62a0 305 wxOwnerDrawn *pNewItem = CreateLboxItem(index); // dummy argument
dd3c394a 306 pNewItem->SetName(item);
fd7ab28c 307 m_aItems.Insert(pNewItem, index);
a23fd0e1 308 ListBox_SetItemData(GetHwnd(), index, pNewItem);
60c65519 309 pNewItem->SetFont(GetFont());
2bda0e17 310 }
fd7ab28c 311#endif // wxUSE_OWNER_DRAWN
2bda0e17 312
dd3c394a 313 SetHorizontalExtent(item);
dd3c394a 314
2ee3ee1b 315 return index;
2bda0e17
KB
316}
317
2ee3ee1b 318void wxListBox::DoSetItems(const wxArrayString& choices, void** clientData)
2bda0e17 319{
f6bcfd97
BP
320 // avoid flicker - but don't need to do this for a hidden listbox
321 bool hideAndShow = IsShown();
322 if ( hideAndShow )
323 {
324 ShowWindow(GetHwnd(), SW_HIDE);
325 }
2ee3ee1b 326
a23fd0e1 327 ListBox_ResetContent(GetHwnd());
2ee3ee1b
VZ
328
329 m_noItems = choices.GetCount();
dd3c394a 330 int i;
2ee3ee1b 331 for (i = 0; i < m_noItems; i++)
dd3c394a 332 {
a23fd0e1 333 ListBox_AddString(GetHwnd(), choices[i]);
dd3c394a 334 if ( clientData )
2ee3ee1b 335 {
2b5f62a0 336 SetClientData(i, clientData[i]);
2ee3ee1b 337 }
dd3c394a 338 }
2bda0e17 339
47d67540 340#if wxUSE_OWNER_DRAWN
2bda0e17 341 if ( m_windowStyle & wxLB_OWNERDRAW ) {
dd3c394a 342 // first delete old items
fd7ab28c 343 WX_CLEAR_ARRAY(m_aItems);
dd3c394a
VZ
344
345 // then create new ones
fd7ab28c 346 for ( size_t ui = 0; ui < (size_t)m_noItems; ui++ ) {
2b5f62a0 347 wxOwnerDrawn *pNewItem = CreateLboxItem(ui);
dd3c394a
VZ
348 pNewItem->SetName(choices[ui]);
349 m_aItems.Add(pNewItem);
a23fd0e1 350 ListBox_SetItemData(GetHwnd(), ui, pNewItem);
dd3c394a 351 }
2bda0e17 352 }
2ee3ee1b
VZ
353#endif // wxUSE_OWNER_DRAWN
354
355 SetHorizontalExtent();
2bda0e17 356
f6bcfd97
BP
357 if ( hideAndShow )
358 {
359 // show the listbox back if we hid it
360 ShowWindow(GetHwnd(), SW_SHOW);
361 }
2bda0e17
KB
362}
363
364int wxListBox::FindString(const wxString& s) const
365{
a23fd0e1 366 int pos = ListBox_FindStringExact(GetHwnd(), (WPARAM)-1, s);
dd3c394a 367 if (pos == LB_ERR)
2ee3ee1b 368 return wxNOT_FOUND;
dd3c394a
VZ
369 else
370 return pos;
2bda0e17
KB
371}
372
bfc6fde4 373void wxListBox::Clear()
2bda0e17 374{
baccb514 375 Free();
8ee9d618
VZ
376
377 ListBox_ResetContent(GetHwnd());
378
379 m_noItems = 0;
380 SetHorizontalExtent();
381}
382
383void wxListBox::Free()
2b273975 384{
dd3c394a 385#if wxUSE_OWNER_DRAWN
185fa6bf
VZ
386 if ( m_windowStyle & wxLB_OWNERDRAW )
387 {
fd7ab28c 388 WX_CLEAR_ARRAY(m_aItems);
185fa6bf
VZ
389 }
390 else
391#endif // wxUSE_OWNER_DRAWN
6c8a980f
VZ
392 if ( HasClientObjectData() )
393 {
394 for ( size_t n = 0; n < (size_t)m_noItems; n++ )
395 {
396 delete GetClientObject(n);
397 }
398 }
2bda0e17 399}
baccb514 400
debe6624 401void wxListBox::SetSelection(int N, bool select)
2bda0e17 402{
dd3c394a 403 wxCHECK_RET( N >= 0 && N < m_noItems,
223d09f6 404 wxT("invalid index in wxListBox::SetSelection") );
dd3c394a 405
2ee3ee1b
VZ
406 if ( HasMultipleSelection() )
407 {
a23fd0e1 408 SendMessage(GetHwnd(), LB_SETSEL, select, N);
2ee3ee1b 409 }
dd3c394a
VZ
410 else
411 {
2ee3ee1b 412 SendMessage(GetHwnd(), LB_SETCURSEL, select ? N : -1, 0);
dd3c394a 413 }
2bda0e17
KB
414}
415
2ee3ee1b 416bool wxListBox::IsSelected(int N) const
2bda0e17 417{
dd3c394a 418 wxCHECK_MSG( N >= 0 && N < m_noItems, FALSE,
223d09f6 419 wxT("invalid index in wxListBox::Selected") );
dd3c394a 420
a23fd0e1 421 return SendMessage(GetHwnd(), LB_GETSEL, N, 0) == 0 ? FALSE : TRUE;
2bda0e17
KB
422}
423
6c8a980f 424wxClientData* wxListBox::DoGetItemClientObject(int n) const
2bda0e17 425{
6c8a980f 426 return (wxClientData *)DoGetItemClientData(n);
2bda0e17
KB
427}
428
6c8a980f 429void *wxListBox::DoGetItemClientData(int n) const
2bda0e17 430{
2ee3ee1b 431 wxCHECK_MSG( n >= 0 && n < m_noItems, NULL,
223d09f6 432 wxT("invalid index in wxListBox::GetClientData") );
dd3c394a 433
2ee3ee1b 434 return (void *)SendMessage(GetHwnd(), LB_GETITEMDATA, n, 0);
2bda0e17
KB
435}
436
6c8a980f 437void wxListBox::DoSetItemClientObject(int n, wxClientData* clientData)
2bda0e17 438{
6c8a980f 439 DoSetItemClientData(n, clientData);
2ee3ee1b
VZ
440}
441
6c8a980f 442void wxListBox::DoSetItemClientData(int n, void *clientData)
2ee3ee1b
VZ
443{
444 wxCHECK_RET( n >= 0 && n < m_noItems,
223d09f6 445 wxT("invalid index in wxListBox::SetClientData") );
dd3c394a 446
2ee3ee1b
VZ
447#if wxUSE_OWNER_DRAWN
448 if ( m_windowStyle & wxLB_OWNERDRAW )
449 {
450 // client data must be pointer to wxOwnerDrawn, otherwise we would crash
451 // in OnMeasure/OnDraw.
452 wxFAIL_MSG(wxT("Can't use client data with owner-drawn listboxes"));
453 }
454#endif // wxUSE_OWNER_DRAWN
455
456 if ( ListBox_SetItemData(GetHwnd(), n, clientData) == LB_ERR )
223d09f6 457 wxLogDebug(wxT("LB_SETITEMDATA failed"));
2bda0e17
KB
458}
459
460// Return number of selections and an array of selected integers
14483330 461int wxListBox::GetSelections(wxArrayInt& aSelections) const
2bda0e17 462{
dd3c394a 463 aSelections.Empty();
14483330 464
2ee3ee1b 465 if ( HasMultipleSelection() )
dd3c394a 466 {
d90879fa
VZ
467 int countSel = ListBox_GetSelCount(GetHwnd());
468 if ( countSel == LB_ERR )
469 {
470 wxLogDebug(_T("ListBox_GetSelCount failed"));
471 }
472 else if ( countSel != 0 )
473 {
474 int *selections = new int[countSel];
14483330 475
d90879fa
VZ
476 if ( ListBox_GetSelItems(GetHwnd(),
477 countSel, selections) == LB_ERR )
478 {
479 wxLogDebug(wxT("ListBox_GetSelItems failed"));
480 countSel = -1;
481 }
482 else
483 {
484 aSelections.Alloc(countSel);
485 for ( int n = 0; n < countSel; n++ )
486 aSelections.Add(selections[n]);
487 }
14483330 488
dd3c394a
VZ
489 delete [] selections;
490 }
14483330 491
d90879fa 492 return countSel;
dd3c394a
VZ
493 }
494 else // single-selection listbox
495 {
f6bcfd97
BP
496 if (ListBox_GetCurSel(GetHwnd()) > -1)
497 aSelections.Add(ListBox_GetCurSel(GetHwnd()));
14483330 498
f6bcfd97 499 return aSelections.Count();
dd3c394a 500 }
2bda0e17
KB
501}
502
503// Get single selection, for single choice list items
14483330 504int wxListBox::GetSelection() const
2bda0e17 505{
2ee3ee1b 506 wxCHECK_MSG( !HasMultipleSelection(),
dd3c394a 507 -1,
f6bcfd97 508 wxT("GetSelection() can't be used with multiple-selection listboxes, use GetSelections() instead.") );
14483330 509
a23fd0e1 510 return ListBox_GetCurSel(GetHwnd());
2bda0e17
KB
511}
512
513// Find string for position
debe6624 514wxString wxListBox::GetString(int N) const
2bda0e17 515{
2b5f62a0 516 wxCHECK_MSG( N >= 0 && N < m_noItems, wxEmptyString,
223d09f6 517 wxT("invalid index in wxListBox::GetClientData") );
dd3c394a 518
a23fd0e1 519 int len = ListBox_GetTextLen(GetHwnd(), N);
dd3c394a
VZ
520
521 // +1 for terminating NUL
522 wxString result;
de564874 523 ListBox_GetText(GetHwnd(), N, wxStringBuffer(result, len + 1));
dd3c394a
VZ
524
525 return result;
2bda0e17
KB
526}
527
2ee3ee1b
VZ
528void
529wxListBox::DoInsertItems(const wxArrayString& items, int pos)
530{
531 wxCHECK_RET( pos >= 0 && pos <= m_noItems,
532 wxT("invalid index in wxListBox::InsertItems") );
533
534 int nItems = items.GetCount();
535 for ( int i = 0; i < nItems; i++ )
fd7ab28c
VZ
536 {
537 int idx = ListBox_InsertString(GetHwnd(), i + pos, items[i]);
538
539#if wxUSE_OWNER_DRAWN
9085d634
RD
540 if ( m_windowStyle & wxLB_OWNERDRAW )
541 {
2b5f62a0 542 wxOwnerDrawn *pNewItem = CreateLboxItem(idx);
9085d634
RD
543 pNewItem->SetName(items[i]);
544 pNewItem->SetFont(GetFont());
545 m_aItems.Insert(pNewItem, idx);
fd7ab28c 546
9085d634
RD
547 ListBox_SetItemData(GetHwnd(), idx, pNewItem);
548 }
fd7ab28c
VZ
549#endif // wxUSE_OWNER_DRAWN
550 }
551
2ee3ee1b
VZ
552 m_noItems += nItems;
553
554 SetHorizontalExtent();
555}
556
557void wxListBox::SetString(int N, const wxString& s)
558{
559 wxCHECK_RET( N >= 0 && N < m_noItems,
560 wxT("invalid index in wxListBox::SetString") );
561
562 // remember the state of the item
563 bool wasSelected = IsSelected(N);
564
565 void *oldData = NULL;
566 wxClientData *oldObjData = NULL;
1e6feb95 567 if ( m_clientDataItemsType == wxClientData_Void )
2ee3ee1b 568 oldData = GetClientData(N);
1e6feb95 569 else if ( m_clientDataItemsType == wxClientData_Object )
2ee3ee1b
VZ
570 oldObjData = GetClientObject(N);
571
572 // delete and recreate it
573 SendMessage(GetHwnd(), LB_DELETESTRING, N, 0);
574
575 int newN = N;
576 if ( N == m_noItems - 1 )
577 newN = -1;
578
579 ListBox_InsertString(GetHwnd(), newN, s);
580
581 // restore the client data
582 if ( oldData )
583 SetClientData(N, oldData);
584 else if ( oldObjData )
585 SetClientObject(N, oldObjData);
586
587 // we may have lost the selection
588 if ( wasSelected )
589 Select(N);
590
591#if wxUSE_OWNER_DRAWN
592 if ( m_windowStyle & wxLB_OWNERDRAW )
c294f450 593 {
2ee3ee1b
VZ
594 // update item's text
595 m_aItems[N]->SetName(s);
fd7ab28c 596
c294f450
RD
597 // reassign the item's data
598 ListBox_SetItemData(GetHwnd(), N, m_aItems[N]);
599 }
2ee3ee1b
VZ
600#endif //USE_OWNER_DRAWN
601}
602
603int wxListBox::GetCount() const
604{
605 return m_noItems;
606}
607
608// ----------------------------------------------------------------------------
609// helpers
610// ----------------------------------------------------------------------------
611
4438caf4
VZ
612// Windows-specific code to set the horizontal extent of the listbox, if
613// necessary. If s is non-NULL, it's used to calculate the horizontal extent.
2bda0e17
KB
614// Otherwise, all strings are used.
615void wxListBox::SetHorizontalExtent(const wxString& s)
616{
dd3c394a
VZ
617 // Only necessary if we want a horizontal scrollbar
618 if (!(m_windowStyle & wxHSCROLL))
619 return;
620 TEXTMETRIC lpTextMetric;
621
2ee3ee1b 622 if ( !s.IsEmpty() )
2bda0e17 623 {
a23fd0e1
VZ
624 int existingExtent = (int)SendMessage(GetHwnd(), LB_GETHORIZONTALEXTENT, 0, 0L);
625 HDC dc = GetWindowDC(GetHwnd());
dd3c394a
VZ
626 HFONT oldFont = 0;
627 if (GetFont().Ok() && GetFont().GetResourceHandle())
628 oldFont = (HFONT) ::SelectObject(dc, (HFONT) GetFont().GetResourceHandle());
629
630 GetTextMetrics(dc, &lpTextMetric);
631 SIZE extentXY;
837e5743 632 ::GetTextExtentPoint(dc, (LPTSTR) (const wxChar *)s, s.Length(), &extentXY);
dd3c394a
VZ
633 int extentX = (int)(extentXY.cx + lpTextMetric.tmAveCharWidth);
634
635 if (oldFont)
636 ::SelectObject(dc, oldFont);
637
a23fd0e1 638 ReleaseDC(GetHwnd(), dc);
dd3c394a 639 if (extentX > existingExtent)
a23fd0e1 640 SendMessage(GetHwnd(), LB_SETHORIZONTALEXTENT, LOWORD(extentX), 0L);
dd3c394a
VZ
641 }
642 else
643 {
644 int largestExtent = 0;
a23fd0e1 645 HDC dc = GetWindowDC(GetHwnd());
dd3c394a
VZ
646 HFONT oldFont = 0;
647 if (GetFont().Ok() && GetFont().GetResourceHandle())
648 oldFont = (HFONT) ::SelectObject(dc, (HFONT) GetFont().GetResourceHandle());
649
650 GetTextMetrics(dc, &lpTextMetric);
3e3be693
VZ
651
652 // FIXME: buffer overflow!!
653 wxChar buf[1024];
654 for (int i = 0; i < m_noItems; i++)
dd3c394a 655 {
3e3be693
VZ
656 int len = (int)SendMessage(GetHwnd(), LB_GETTEXT, i, (LPARAM)buf);
657 buf[len] = 0;
dd3c394a 658 SIZE extentXY;
3e3be693 659 ::GetTextExtentPoint(dc, buf, len, &extentXY);
dd3c394a
VZ
660 int extentX = (int)(extentXY.cx + lpTextMetric.tmAveCharWidth);
661 if (extentX > largestExtent)
662 largestExtent = extentX;
663 }
664 if (oldFont)
665 ::SelectObject(dc, oldFont);
666
a23fd0e1
VZ
667 ReleaseDC(GetHwnd(), dc);
668 SendMessage(GetHwnd(), LB_SETHORIZONTALEXTENT, LOWORD(largestExtent), 0L);
2bda0e17 669 }
2bda0e17
KB
670}
671
f68586e5 672wxSize wxListBox::DoGetBestSize() const
b908d224
VZ
673{
674 // find the widest string
675 int wLine;
676 int wListbox = 0;
677 for ( int i = 0; i < m_noItems; i++ )
678 {
679 wxString str(GetString(i));
680 GetTextExtent(str, &wLine, NULL);
681 if ( wLine > wListbox )
682 wListbox = wLine;
683 }
684
685 // give it some reasonable default value if there are no strings in the
686 // list
687 if ( wListbox == 0 )
688 wListbox = 100;
689
690 // the listbox should be slightly larger than the widest string
691 int cx, cy;
692 wxGetCharSize(GetHWND(), &cx, &cy, &GetFont());
693
694 wListbox += 3*cx;
695
5b6d6b70
VZ
696 // don't make the listbox too tall (limit height to 10 items) but don't
697 // make it too small neither
698 int hListbox = EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy)*
699 wxMin(wxMax(m_noItems, 3), 10);
b908d224
VZ
700
701 return wxSize(wListbox, hListbox);
702}
703
2ee3ee1b
VZ
704// ----------------------------------------------------------------------------
705// callbacks
706// ----------------------------------------------------------------------------
707
708bool wxListBox::MSWCommand(WXUINT param, WXWORD WXUNUSED(id))
2bda0e17 709{
bada28f0 710 wxEventType evtType;
8ee9d618 711 if ( param == LBN_SELCHANGE )
2bda0e17 712 {
bada28f0 713 evtType = wxEVT_COMMAND_LISTBOX_SELECTED;
2bda0e17 714 }
8ee9d618 715 else if ( param == LBN_DBLCLK )
2ee3ee1b 716 {
bada28f0
VZ
717 evtType = wxEVT_COMMAND_LISTBOX_DOUBLECLICKED;
718 }
719 else
720 {
721 // some event we're not interested in
722 return FALSE;
723 }
724
725 wxCommandEvent event(evtType, m_windowId);
726 event.SetEventObject( this );
8ee9d618 727
9c9c3d7a
VZ
728 // retrieve the affected item
729 int n = SendMessage(GetHwnd(), LB_GETCARETINDEX, 0, 0);
730 if ( n != LB_ERR )
bada28f0 731 {
bada28f0
VZ
732 if ( HasClientObjectData() )
733 event.SetClientObject( GetClientObject(n) );
734 else if ( HasClientUntypedData() )
735 event.SetClientData( GetClientData(n) );
9c9c3d7a 736
bada28f0 737 event.SetString( GetString(n) );
9c9c3d7a 738 event.SetExtraLong( HasMultipleSelection() ? IsSelected(n) : TRUE );
bada28f0
VZ
739 }
740
741 event.m_commandInt = n;
2ee3ee1b 742
bada28f0 743 return GetEventHandler()->ProcessEvent(event);
2bda0e17
KB
744}
745
2ee3ee1b
VZ
746// ----------------------------------------------------------------------------
747// wxCheckListBox support
748// ----------------------------------------------------------------------------
2bda0e17 749
47d67540 750#if wxUSE_OWNER_DRAWN
2bda0e17
KB
751
752// drawing
753// -------
754
755// space beneath/above each row in pixels
756// "standard" checklistbox use 1 here, some might prefer 2. 0 is ugly.
757#define OWNER_DRAWN_LISTBOX_EXTRA_SPACE (1)
758
759// the height is the same for all items
dd3c394a
VZ
760// TODO should be changed for LBS_OWNERDRAWVARIABLE style listboxes
761
762// NB: can't forward this to wxListBoxItem because LB_SETITEMDATA
763// message is not yet sent when we get here!
2bda0e17
KB
764bool wxListBox::MSWOnMeasure(WXMEASUREITEMSTRUCT *item)
765{
dd3c394a
VZ
766 // only owner-drawn control should receive this message
767 wxCHECK( ((m_windowStyle & wxLB_OWNERDRAW) == wxLB_OWNERDRAW), FALSE );
2bda0e17 768
dd3c394a 769 MEASUREITEMSTRUCT *pStruct = (MEASUREITEMSTRUCT *)item;
2bda0e17 770
4676948b
JS
771#ifdef __WXWINCE__
772 HDC hdc = GetDC(NULL);
773#else
07cf98cb 774 HDC hdc = CreateIC(wxT("DISPLAY"), NULL, NULL, 0);
4676948b 775#endif
07cf98cb 776
dd3c394a 777 wxDC dc;
07cf98cb 778 dc.SetHDC((WXHDC)hdc);
a756f210 779 dc.SetFont(wxSystemSettings::GetFont(wxSYS_ANSI_VAR_FONT));
2bda0e17 780
dd3c394a
VZ
781 pStruct->itemHeight = dc.GetCharHeight() + 2*OWNER_DRAWN_LISTBOX_EXTRA_SPACE;
782 pStruct->itemWidth = dc.GetCharWidth();
2bda0e17 783
07cf98cb
VZ
784 dc.SetHDC(0);
785
786 DeleteDC(hdc);
787
dd3c394a 788 return TRUE;
2bda0e17
KB
789}
790
791// forward the message to the appropriate item
792bool wxListBox::MSWOnDraw(WXDRAWITEMSTRUCT *item)
793{
dd3c394a
VZ
794 // only owner-drawn control should receive this message
795 wxCHECK( ((m_windowStyle & wxLB_OWNERDRAW) == wxLB_OWNERDRAW), FALSE );
796
797 DRAWITEMSTRUCT *pStruct = (DRAWITEMSTRUCT *)item;
f6bcfd97
BP
798 UINT itemID = pStruct->itemID;
799
800 // the item may be -1 for an empty listbox
801 if ( itemID == (UINT)-1 )
802 return FALSE;
dd3c394a 803
a23fd0e1 804 long data = ListBox_GetItemData(GetHwnd(), pStruct->itemID);
2bda0e17 805
dd3c394a 806 wxCHECK( data && (data != LB_ERR), FALSE );
2bda0e17 807
dd3c394a 808 wxListBoxItem *pItem = (wxListBoxItem *)data;
2bda0e17 809
7561aacd 810 wxDCTemp dc((WXHDC)pStruct->hDC);
dd3c394a 811 wxRect rect(wxPoint(pStruct->rcItem.left, pStruct->rcItem.top),
f6bcfd97 812 wxPoint(pStruct->rcItem.right, pStruct->rcItem.bottom));
2bda0e17 813
dd3c394a 814 return pItem->OnDrawItem(dc, rect,
7561aacd
VZ
815 (wxOwnerDrawn::wxODAction)pStruct->itemAction,
816 (wxOwnerDrawn::wxODStatus)pStruct->itemState);
2bda0e17
KB
817}
818
1e6feb95
VZ
819#endif // wxUSE_OWNER_DRAWN
820
821#endif // wxUSE_LISTBOX