src/msw/listbox.cpp

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