src/os2/listbox.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/os2/listbox.cpp
   3 // Purpose:     wxListBox
   4 // Author:      David Webster
   5 // Modified by:
   6 // Created:     10/09/99
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) David Webster
   9 // Licence:     wxWindows licence
  10 ///////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #include "wx/window.h"
  16 #include "wx/os2/private.h"
  17
  18 #ifndef WX_PRECOMP
  19 #include "wx/listbox.h"
  20 #include "wx/settings.h"
  21 #include "wx/brush.h"
  22 #include "wx/font.h"
  23 #include "wx/dc.h"
  24 #include "wx/dcscreen.h"
  25 #include "wx/utils.h"
  26 #include "wx/scrolwin.h"
  27 #endif
  28
  29 #define INCL_M
  30 #include <os2.h>
  31
  32 #include "wx/dynarray.h"
  33 #include "wx/log.h"
  34
  35 #if wxUSE_LISTBOX
  36
  37 #if wxUSE_OWNER_DRAWN
  38     #include  "wx/ownerdrw.h"
  39 #endif
  40
  41   IMPLEMENT_DYNAMIC_CLASS(wxListBox, wxControl)
  42
  43 // ============================================================================
  44 // list box item declaration and implementation
  45 // ============================================================================
  46
  47 #if wxUSE_OWNER_DRAWN
  48
  49 class wxListBoxItem : public wxOwnerDrawn
  50 {
  51 public:
  52     wxListBoxItem(const wxString& rsStr = wxEmptyString);
  53 };
  54
  55 wxListBoxItem::wxListBoxItem(
  56   const wxString& rsStr
  57 )
  58 : wxOwnerDrawn( rsStr
  59                ,false
  60               )
  61 {
  62     //
  63     // No bitmaps/checkmarks
  64     //
  65     SetMarginWidth(0);
  66 } // end of wxListBoxItem::wxListBoxItem
  67
  68 wxOwnerDrawn* wxListBox::CreateItem( size_t WXUNUSED(n) )
  69 {
  70     return new wxListBoxItem();
  71 } // end of wxListBox::CreateItem
  72
  73 #endif  //USE_OWNER_DRAWN
  74
  75 // ============================================================================
  76 // list box control implementation
  77 // ============================================================================
  78
  79 // Listbox item
  80 wxListBox::wxListBox()
  81 {
  82     m_nNumItems = 0;
  83     m_nSelected = 0;
  84 } // end of wxListBox::wxListBox
  85
  86 bool wxListBox::Create(
  87   wxWindow*                         pParent
  88 , wxWindowID                        vId
  89 , const wxPoint&                    rPos
  90 , const wxSize&                     rSize
  91 , const wxArrayString&              asChoices
  92 , long                              lStyle
  93 , const wxValidator&                rValidator
  94 , const wxString&                   rsName
  95 )
  96 {
  97     wxCArrayString chs(asChoices);
  98
  99     return Create(pParent, vId, rPos, rSize, chs.GetCount(), chs.GetStrings(),
 100                   lStyle, rValidator, rsName);
 101 }
 102
 103 bool wxListBox::Create(
 104   wxWindow*                         pParent
 105 , wxWindowID                        vId
 106 , const wxPoint&                    rPos
 107 , const wxSize&                     rSize
 108 , int                               n
 109 , const wxString                    asChoices[]
 110 , long                              lStyle
 111 , const wxValidator&                rValidator
 112 , const wxString&                   rsName
 113 )
 114 {
 115     m_nNumItems = 0;
 116     m_hWnd      = 0;
 117     m_nSelected = 0;
 118
 119     SetName(rsName);
 120 #if wxUSE_VALIDATORS
 121     SetValidator(rValidator);
 122 #endif
 123
 124     if (pParent)
 125         pParent->AddChild(this);
 126
 127     wxSystemSettings                vSettings;
 128
 129     SetBackgroundColour(vSettings.GetColour(wxSYS_COLOUR_WINDOW));
 130     SetForegroundColour(pParent->GetForegroundColour());
 131
 132     m_windowId = (vId == -1) ? (int)NewControlId() : vId;
 133
 134     int                             nX      = rPos.x;
 135     int                             nY      = rPos.y;
 136     int                             nWidth  = rSize.x;
 137     int                             nHeight = rSize.y;
 138
 139     m_windowStyle = lStyle;
 140
 141     lStyle = WS_VISIBLE;
 142
 143     if (m_windowStyle & wxCLIP_SIBLINGS )
 144         lStyle |= WS_CLIPSIBLINGS;
 145     if (m_windowStyle & wxLB_MULTIPLE)
 146         lStyle |= LS_MULTIPLESEL;
 147     else if (m_windowStyle & wxLB_EXTENDED)
 148         lStyle |= LS_EXTENDEDSEL;
 149     if (m_windowStyle & wxLB_HSCROLL)
 150         lStyle |= LS_HORZSCROLL;
 151     if (m_windowStyle & wxLB_OWNERDRAW)
 152         lStyle |= LS_OWNERDRAW;
 153
 154     //
 155     // Without this style, you get unexpected heights, so e.g. constraint layout
 156     // doesn't work properly
 157     //
 158     lStyle |= LS_NOADJUSTPOS;
 159
 160     m_hWnd = (WXHWND)::WinCreateWindow( GetWinHwnd(pParent) // Parent
 161                                        ,WC_LISTBOX          // Default Listbox class
 162                                        ,"LISTBOX"           // Control's name
 163                                        ,lStyle              // Initial Style
 164                                        ,0, 0, 0, 0          // Position and size
 165                                        ,GetWinHwnd(pParent) // Owner
 166                                        ,HWND_TOP            // Z-Order
 167                                        ,(HMENU)m_windowId   // Id
 168                                        ,NULL                // Control Data
 169                                        ,NULL                // Presentation Parameters
 170                                       );
 171     if (m_hWnd == 0)
 172     {
 173         return false;
 174     }
 175
 176     //
 177     // Subclass again for purposes of dialog editing mode
 178     //
 179     SubclassWin(m_hWnd);
 180
 181     LONG                            lUi;
 182
 183     for (lUi = 0; lUi < (LONG)n; lUi++)
 184     {
 185         Append(asChoices[lUi]);
 186     }
 187     wxFont*                          pTextFont = new wxFont( 10
 188                                                             ,wxMODERN
 189                                                             ,wxNORMAL
 190                                                             ,wxNORMAL
 191                                                            );
 192     SetFont(*pTextFont);
 193
 194     //
 195     // Set OS/2 system colours for Listbox items and highlighting
 196     //
 197     wxColour                        vColour;
 198
 199     vColour = wxSystemSettingsNative::GetColour(wxSYS_COLOUR_HIGHLIGHTTEXT);
 200
 201     LONG                            lColor = (LONG)vColour.GetPixel();
 202
 203     ::WinSetPresParam( m_hWnd
 204                       ,PP_HILITEFOREGROUNDCOLOR
 205                       ,sizeof(LONG)
 206                       ,(PVOID)&lColor
 207                      );
 208     vColour = wxSystemSettingsNative::GetColour(wxSYS_COLOUR_HIGHLIGHT);
 209     lColor = (LONG)vColour.GetPixel();
 210     ::WinSetPresParam( m_hWnd
 211                       ,PP_HILITEBACKGROUNDCOLOR
 212                       ,sizeof(LONG)
 213                       ,(PVOID)&lColor
 214                      );
 215
 216     SetXComp(0);
 217     SetYComp(0);
 218     SetSize( nX
 219             ,nY
 220             ,nWidth
 221             ,nHeight
 222            );
 223     delete pTextFont;
 224     return true;
 225 } // end of wxListBox::Create
 226
 227 wxListBox::~wxListBox()
 228 {
 229 #if wxUSE_OWNER_DRAWN
 230     size_t                          lUiCount = m_aItems.Count();
 231
 232     while (lUiCount-- != 0)
 233     {
 234         delete m_aItems[lUiCount];
 235     }
 236 #endif // wxUSE_OWNER_DRAWN
 237 } // end of wxListBox::~wxListBox
 238
 239 void wxListBox::SetupColours()
 240 {
 241     SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW));
 242     SetForegroundColour(GetParent()->GetForegroundColour());
 243 } // end of wxListBox::SetupColours
 244
 245 // ----------------------------------------------------------------------------
 246 // implementation of wxListBoxBase methods
 247 // ----------------------------------------------------------------------------
 248
 249 void wxListBox::DoSetFirstItem(
 250   int                               N
 251 )
 252 {
 253     wxCHECK_RET( N >= 0 && N < m_nNumItems,
 254                  wxT("invalid index in wxListBox::SetFirstItem") );
 255
 256     ::WinSendMsg(GetHwnd(), LM_SETTOPINDEX, MPFROMLONG(N), (MPARAM)0);
 257 } // end of wxListBox::DoSetFirstItem
 258
 259 void wxListBox::Delete(
 260   int                               N
 261 )
 262 {
 263     wxCHECK_RET( N >= 0 && N < m_nNumItems,
 264                  wxT("invalid index in wxListBox::Delete") );
 265
 266 #if wxUSE_OWNER_DRAWN
 267     delete m_aItems[N];
 268     m_aItems.RemoveAt(N);
 269 #else // !wxUSE_OWNER_DRAWN
 270     if (HasClientObjectData())
 271     {
 272         delete GetClientObject(N);
 273     }
 274 #endif // wxUSE_OWNER_DRAWN/!wxUSE_OWNER_DRAWN
 275
 276     ::WinSendMsg(GetHwnd(), LM_DELETEITEM, (MPARAM)N, (MPARAM)0);
 277     m_nNumItems--;
 278 } // end of wxListBox::DoSetFirstItem
 279
 280 int wxListBox::DoAppend(
 281   const wxString&                   rsItem
 282 )
 283 {
 284     long                            lIndex = 0;
 285     LONG                            lIndexType = 0;
 286
 287     if (m_windowStyle & wxLB_SORT)
 288         lIndexType = LIT_SORTASCENDING;
 289     else
 290         lIndexType = LIT_END;
 291     lIndex = (long)::WinSendMsg(GetHwnd(), LM_INSERTITEM, (MPARAM)lIndexType, (MPARAM)rsItem.c_str());
 292     m_nNumItems++;
 293
 294 #if wxUSE_OWNER_DRAWN
 295     if (m_windowStyle & wxLB_OWNERDRAW)
 296     {
 297         wxOwnerDrawn*               pNewItem = CreateItem(lIndex); // dummy argument
 298         wxScreenDC                  vDc;
 299
 300
 301         pNewItem->SetName(rsItem);
 302         m_aItems.Insert(pNewItem, lIndex);
 303         ::WinSendMsg(GetHwnd(), LM_SETITEMHANDLE, (MPARAM)lIndex, MPFROMP(pNewItem));
 304         pNewItem->SetFont(GetFont());
 305     }
 306 #endif
 307     return (int)lIndex;
 308 } // end of wxListBox::DoAppend
 309
 310 void wxListBox::DoSetItems(
 311   const wxArrayString&              raChoices
 312 , void**                            ppClientData
 313 )
 314 {
 315     BOOL                            bHideAndShow = IsShown();
 316     int                             i;
 317     LONG                            lIndexType = 0;
 318
 319     if (bHideAndShow)
 320     {
 321         ::WinShowWindow(GetHwnd(), FALSE);
 322     }
 323     ::WinSendMsg(GetHwnd(), LM_DELETEALL, (MPARAM)0, (MPARAM)0);
 324     m_nNumItems = raChoices.GetCount();
 325     for (i = 0; i < m_nNumItems; i++)
 326     {
 327
 328         if (m_windowStyle & wxLB_SORT)
 329             lIndexType = LIT_SORTASCENDING;
 330         else
 331             lIndexType = LIT_END;
 332         ::WinSendMsg(GetHwnd(), LM_INSERTITEM, (MPARAM)lIndexType, (MPARAM)raChoices[i].c_str());
 333
 334         if (ppClientData)
 335         {
 336 #if wxUSE_OWNER_DRAWN
 337             wxASSERT_MSG(ppClientData[i] == NULL,
 338                          wxT("Can't use client data with owner-drawn listboxes"));
 339 #else // !wxUSE_OWNER_DRAWN
 340             ::WinSendMsg(WinUtil_GetHwnd(), LM_SETITEMHANDLE, MPFROMLONG(lCount), MPFROMP(ppClientData[i]));
 341 #endif // wxUSE_OWNER_DRAWN/!wxUSE_OWNER_DRAWN
 342         }
 343     }
 344
 345 #if wxUSE_OWNER_DRAWN
 346     if ( m_windowStyle & wxLB_OWNERDRAW )
 347     {
 348         //
 349         // First delete old items
 350         //
 351         WX_CLEAR_ARRAY(m_aItems);
 352
 353         //
 354         // Then create new ones
 355         //
 356         for (size_t ui = 0; ui < (size_t)m_nNumItems; ui++)
 357         {
 358             wxOwnerDrawn*           pNewItem = CreateItem(ui);
 359
 360             pNewItem->SetName(raChoices[ui]);
 361             m_aItems.Add(pNewItem);
 362             ::WinSendMsg(GetHwnd(), LM_SETITEMHANDLE, MPFROMLONG(ui), MPFROMP(pNewItem));
 363         }
 364     }
 365 #endif // wxUSE_OWNER_DRAWN
 366     ::WinShowWindow(GetHwnd(), TRUE);
 367 } // end of wxListBox::DoSetItems
 368
 369 void wxListBox::Clear()
 370 {
 371 #if wxUSE_OWNER_DRAWN
 372     size_t                          lUiCount = m_aItems.Count();
 373
 374     while (lUiCount-- != 0)
 375     {
 376         delete m_aItems[lUiCount];
 377     }
 378
 379     m_aItems.Clear();
 380 #else // !wxUSE_OWNER_DRAWN
 381     if (HasClientObjectData())
 382     {
 383         for (size_t n = 0; n < (size_t)m_lNumItems; n++)
 384         {
 385             delete GetClientObject(n);
 386         }
 387     }
 388 #endif // wxUSE_OWNER_DRAWN/!wxUSE_OWNER_DRAWN
 389     ::WinSendMsg(GetHwnd(), LM_DELETEALL, (MPARAM)0, (MPARAM)0);
 390
 391     m_nNumItems = 0;
 392 } // end of wxListBox::Clear
 393
 394 void wxListBox::DoSetSelection(
 395   int                               N
 396 , bool                              bSelect
 397 )
 398 {
 399     wxCHECK_RET( N >= 0 && N < m_nNumItems,
 400                  wxT("invalid index in wxListBox::SetSelection") );
 401     ::WinSendMsg( GetHwnd()
 402                  ,LM_SELECTITEM
 403                  ,MPFROMLONG(N)
 404                  ,(MPARAM)bSelect
 405                 );
 406     if(m_windowStyle & wxLB_OWNERDRAW)
 407         Refresh();
 408 } // end of wxListBox::SetSelection
 409
 410 bool wxListBox::IsSelected(
 411   int                               N
 412 ) const
 413 {
 414     wxCHECK_MSG( N >= 0 && N < m_nNumItems, false,
 415                  wxT("invalid index in wxListBox::Selected") );
 416
 417     LONG                            lItem;
 418
 419     if (GetWindowStyleFlag() & wxLB_EXTENDED)
 420     {
 421         if (N == 0)
 422             lItem = LONGFROMMR(::WinSendMsg(GetHwnd(), LM_QUERYSELECTION, (MPARAM)LIT_FIRST, (MPARAM)0));
 423         else
 424             lItem = LONGFROMMR(::WinSendMsg(GetHwnd(), LM_QUERYSELECTION, (MPARAM)(N - 1), (MPARAM)0));
 425     }
 426     else
 427     {
 428         lItem = LONGFROMMR(::WinSendMsg(GetHwnd(), LM_QUERYSELECTION, (MPARAM)LIT_FIRST, (MPARAM)0));
 429     }
 430     return (lItem == (LONG)N && lItem != LIT_NONE);
 431 } // end of wxListBox::IsSelected
 432
 433 wxClientData* wxListBox::DoGetItemClientObject(
 434   int                               n
 435 ) const
 436 {
 437     return (wxClientData *)DoGetItemClientData(n);
 438 }
 439
 440 void* wxListBox::DoGetItemClientData(
 441   int                               n
 442 ) const
 443 {
 444     wxCHECK_MSG( n >= 0 && n < m_nNumItems, NULL,
 445                  wxT("invalid index in wxListBox::GetClientData") );
 446
 447     return((void *)::WinSendMsg(GetHwnd(), LM_QUERYITEMHANDLE, MPFROMLONG(n), (MPARAM)0));
 448 } // end of wxListBox::DoGetItemClientData
 449
 450 void wxListBox::DoSetItemClientObject(
 451   int                               n
 452 , wxClientData*                     pClientData
 453 )
 454 {
 455     DoSetItemClientData( n
 456                         ,pClientData
 457                        );
 458 } // end of wxListBox::DoSetItemClientObject
 459
 460 void wxListBox::DoSetItemClientData(
 461   int                               n
 462 , void*                             pClientData
 463 )
 464 {
 465     wxCHECK_RET( n >= 0 && n < m_nNumItems,
 466                  wxT("invalid index in wxListBox::SetClientData") );
 467
 468 #if wxUSE_OWNER_DRAWN
 469     if ( m_windowStyle & wxLB_OWNERDRAW )
 470     {
 471         //
 472         // Client data must be pointer to wxOwnerDrawn, otherwise we would crash
 473         // in OnMeasure/OnDraw.
 474         //
 475         wxFAIL_MSG(wxT("Can't use client data with owner-drawn listboxes"));
 476     }
 477 #endif // wxUSE_OWNER_DRAWN
 478
 479     ::WinSendMsg(GetHwnd(), LM_SETITEMHANDLE, MPFROMLONG(n), MPFROMP(pClientData));
 480 } // end of wxListBox::DoSetItemClientData
 481
 482 bool wxListBox::HasMultipleSelection() const
 483 {
 484     return (m_windowStyle & wxLB_MULTIPLE) || (m_windowStyle & wxLB_EXTENDED);
 485 } // end of wxListBox::HasMultipleSelection
 486
 487 int wxListBox::GetSelections( wxArrayInt& raSelections ) const
 488 {
 489     int                             nCount = 0;
 490     LONG                            lItem;
 491
 492
 493     raSelections.Empty();
 494     if (HasMultipleSelection())
 495     {
 496         lItem = LONGFROMMR(::WinSendMsg( GetHwnd()
 497                                         ,LM_QUERYSELECTION
 498                                         ,(MPARAM)LIT_FIRST
 499                                         ,(MPARAM)0
 500                                        )
 501                           );
 502         if (lItem != LIT_NONE)
 503         {
 504             nCount++;
 505             while ((lItem = LONGFROMMR(::WinSendMsg( GetHwnd()
 506                                                     ,LM_QUERYSELECTION
 507                                                     ,(MPARAM)lItem
 508                                                     ,(MPARAM)0
 509                                                    )
 510                                       )) != LIT_NONE)
 511             {
 512                 nCount++;
 513             }
 514             raSelections.Alloc(nCount);
 515             lItem = LONGFROMMR(::WinSendMsg( GetHwnd()
 516                                             ,LM_QUERYSELECTION
 517                                             ,(MPARAM)LIT_FIRST
 518                                             ,(MPARAM)0
 519                                            )
 520                               );
 521
 522             raSelections.Add((int)lItem);
 523             while ((lItem = LONGFROMMR(::WinSendMsg( GetHwnd()
 524                                                     ,LM_QUERYSELECTION
 525                                                     ,(MPARAM)lItem
 526                                                     ,(MPARAM)0
 527                                                    )
 528                                       )) != LIT_NONE)
 529             {
 530                 raSelections.Add((int)lItem);
 531             }
 532             return nCount;
 533         }
 534     }
 535     else  // single-selection listbox
 536     {
 537         lItem = LONGFROMMR(::WinSendMsg( GetHwnd()
 538                                         ,LM_QUERYSELECTION
 539                                         ,(MPARAM)LIT_FIRST
 540                                         ,(MPARAM)0
 541                                        )
 542                           );
 543         raSelections.Add((int)lItem);
 544         return 1;
 545     }
 546     return 0;
 547 } // end of wxListBox::GetSelections
 548
 549 int wxListBox::GetSelection() const
 550 {
 551     wxCHECK_MSG( !HasMultipleSelection(),
 552                  -1,
 553                  wxT("GetSelection() can't be used with multiple-selection "
 554                     "listboxes, use GetSelections() instead.") );
 555
 556     return(LONGFROMMR(::WinSendMsg( GetHwnd()
 557                                    ,LM_QUERYSELECTION
 558                                    ,(MPARAM)LIT_FIRST
 559                                    ,(MPARAM)0
 560                                   )
 561                      ));
 562 } // end of wxListBox::GetSelection
 563
 564 wxString wxListBox::GetString(
 565   int                               N
 566 ) const
 567 {
 568     LONG                            lLen = 0;
 569     wxChar*                         zBuf;
 570     wxString                        sResult;
 571
 572     wxCHECK_MSG( N >= 0 && N < m_nNumItems, wxEmptyString,
 573                  wxT("invalid index in wxListBox::GetClientData") );
 574
 575     lLen = LONGFROMMR(::WinSendMsg(GetHwnd(), LM_QUERYITEMTEXTLENGTH, (MPARAM)N, (MPARAM)0));
 576     zBuf = new wxChar[lLen + 1];
 577     ::WinSendMsg(GetHwnd(), LM_QUERYITEMTEXT, MPFROM2SHORT((SHORT)N, (SHORT)lLen), (MPARAM)zBuf);
 578     zBuf[lLen] = '\0';
 579     sResult = zBuf;
 580     delete [] zBuf;
 581     return sResult;
 582 } // end of wxListBox::GetString
 583
 584 void wxListBox::DoInsertItems(
 585   const wxArrayString&              asItems
 586 , int                               nPos
 587 )
 588 {
 589     wxCHECK_RET( nPos >= 0 && nPos <= m_nNumItems,
 590                  wxT("invalid index in wxListBox::InsertItems") );
 591
 592     int                             nItems = asItems.GetCount();
 593
 594     for (int i = 0; i < nItems; i++)
 595     {
 596         int                         nIndex = (int)::WinSendMsg( GetHwnd()
 597                                                                ,LM_INSERTITEM
 598                                                                ,MPFROMLONG((LONG)(i + nPos))
 599                                                                ,(MPARAM)asItems[i].c_str()
 600                                                               );
 601
 602         wxOwnerDrawn*               pNewItem = CreateItem(nIndex);
 603
 604         pNewItem->SetName(asItems[i]);
 605         pNewItem->SetFont(GetFont());
 606         m_aItems.Insert(pNewItem, nIndex);
 607         ::WinSendMsg( GetHwnd()
 608                      ,LM_SETITEMHANDLE
 609                      ,(MPARAM)((LONG)nIndex)
 610                      ,MPFROMP(pNewItem)
 611                     );
 612         m_nNumItems += nItems;
 613     }
 614 } // end of wxListBox::DoInsertItems
 615
 616 void wxListBox::SetString(
 617   int                               N
 618 , const wxString&                   rsString
 619 )
 620 {
 621     wxCHECK_RET( N >= 0 && N < m_nNumItems,
 622                  wxT("invalid index in wxListBox::SetString") );
 623
 624     //
 625     // Remember the state of the item
 626     //
 627     bool                            bWasSelected = IsSelected(N);
 628     void*                           pOldData = NULL;
 629     wxClientData*                   pOldObjData = NULL;
 630
 631     if (m_clientDataItemsType == wxClientData_Void)
 632         pOldData = GetClientData(N);
 633     else if (m_clientDataItemsType == wxClientData_Object)
 634         pOldObjData = GetClientObject(N);
 635
 636     //
 637     // Delete and recreate it
 638     //
 639     ::WinSendMsg( GetHwnd()
 640                  ,LM_DELETEITEM
 641                  ,(MPARAM)N
 642                  ,(MPARAM)0
 643                 );
 644
 645     int                             nNewN = N;
 646
 647     if (N == m_nNumItems - 1)
 648         nNewN = -1;
 649
 650     ::WinSendMsg( GetHwnd()
 651                  ,LM_INSERTITEM
 652                  ,(MPARAM)nNewN
 653                  ,(MPARAM)rsString.c_str()
 654                 );
 655
 656     //
 657     // Restore the client data
 658     //
 659     if (pOldData)
 660         SetClientData( N
 661                       ,pOldData
 662                      );
 663     else if (pOldObjData)
 664         SetClientObject( N
 665                         ,pOldObjData
 666                        );
 667
 668     //
 669     // We may have lost the selection
 670     //
 671     if (bWasSelected)
 672         Select(N);
 673
 674 #if wxUSE_OWNER_DRAWN
 675     if (m_windowStyle & wxLB_OWNERDRAW)
 676         //
 677         // Update item's text
 678         //
 679         m_aItems[N]->SetName(rsString);
 680 #endif  //USE_OWNER_DRAWN
 681 } // end of wxListBox::SetString
 682
 683 int wxListBox::GetCount() const
 684 {
 685     return m_nNumItems;
 686 }
 687
 688 // ----------------------------------------------------------------------------
 689 // helpers
 690 // ----------------------------------------------------------------------------
 691
 692 wxSize wxListBox::DoGetBestSize() const
 693 {
 694     //
 695     // Find the widest string
 696     //
 697     int                             nLine;
 698     int                             nListbox = 0;
 699     int                             nCx;
 700     int                             nCy;
 701     wxFont                          vFont = (wxFont)GetFont();
 702
 703     for (int i = 0; i < m_nNumItems; i++)
 704     {
 705         wxString                    vStr(GetString(i));
 706
 707         GetTextExtent( vStr
 708                       ,&nLine
 709                       ,NULL
 710                      );
 711         if (nLine > nListbox)
 712             nListbox = nLine;
 713     }
 714
 715     //
 716     // Give it some reasonable default value if there are no strings in the
 717     // list.
 718     //
 719     if (nListbox == 0)
 720         nListbox = 100;
 721
 722     //
 723     // The listbox should be slightly larger than the widest string
 724     //
 725     wxGetCharSize( GetHWND()
 726                   ,&nCx
 727                   ,&nCy
 728                   ,&vFont
 729                  );
 730     nListbox += 3 * nCx;
 731
 732     int                             hListbox = EDIT_HEIGHT_FROM_CHAR_HEIGHT(nCy) * (wxMax(m_nNumItems, 7));
 733
 734     return wxSize( nListbox
 735                   ,hListbox
 736                  );
 737 } // end of wxListBox::DoGetBestSize
 738
 739 // ----------------------------------------------------------------------------
 740 // callbacks
 741 // ----------------------------------------------------------------------------
 742
 743 bool wxListBox::OS2Command(
 744   WXUINT                            uParam
 745 , WXWORD                            WXUNUSED(wId))
 746 {
 747     wxEventType                     eEvtType;
 748
 749     if (uParam == LN_SELECT)
 750     {
 751         eEvtType = wxEVT_COMMAND_LISTBOX_SELECTED;
 752     }
 753     else if (uParam == LN_ENTER)
 754     {
 755         eEvtType = wxEVT_COMMAND_LISTBOX_DOUBLECLICKED;
 756     }
 757     else
 758     {
 759         //
 760         // Some event we're not interested in
 761         //
 762         return false;
 763     }
 764     wxCommandEvent                  vEvent( eEvtType
 765                                            ,m_windowId
 766                                           );
 767
 768     vEvent.SetEventObject(this);
 769
 770     wxArrayInt                      aSelections;
 771     int                             n;
 772     int                             nCount = GetSelections(aSelections);
 773
 774     if (nCount > 0)
 775     {
 776         n = aSelections[0];
 777         if (HasClientObjectData())
 778             vEvent.SetClientObject(GetClientObject(n));
 779         else if ( HasClientUntypedData() )
 780             vEvent.SetClientData(GetClientData(n));
 781         vEvent.SetString(GetString(n));
 782     }
 783     else
 784     {
 785         n = -1;
 786     }
 787     vEvent.SetInt(n);
 788     return GetEventHandler()->ProcessEvent(vEvent);
 789 } // end of wxListBox::OS2Command
 790
 791 // ----------------------------------------------------------------------------
 792 // wxCheckListBox support
 793 // ----------------------------------------------------------------------------
 794
 795 #if wxUSE_OWNER_DRAWN
 796
 797 //
 798 // Drawing
 799 // -------
 800 //
 801 #define OWNER_DRAWN_LISTBOX_EXTRA_SPACE    (1)
 802
 803 long wxListBox::OS2OnMeasure(
 804   WXMEASUREITEMSTRUCT*              pItem
 805 )
 806 {
 807     if (!pItem)
 808         pItem = (WXMEASUREITEMSTRUCT*)new OWNERITEM;
 809
 810     POWNERITEM                      pMeasureStruct = (POWNERITEM)pItem;
 811     wxScreenDC                      vDc;
 812
 813     //
 814     // Only owner-drawn control should receive this message
 815     //
 816     wxCHECK( ((m_windowStyle & wxLB_OWNERDRAW) == wxLB_OWNERDRAW), FALSE );
 817
 818     vDc.SetFont(GetFont());
 819
 820     wxCoord                         vHeight;
 821     wxCoord                         vWidth;
 822
 823     GetSize( &vWidth
 824             ,NULL
 825            );
 826
 827     pMeasureStruct->rclItem.xRight = (USHORT)vWidth;
 828     pMeasureStruct->rclItem.xLeft  = 0;
 829     pMeasureStruct->rclItem.yTop   = 0;
 830     pMeasureStruct->rclItem.yBottom = 0;
 831
 832     vHeight = (wxCoord)(vDc.GetCharHeight() * 2.5);
 833     pMeasureStruct->rclItem.yTop  = (USHORT)vHeight;
 834
 835     return long(MRFROM2SHORT((USHORT)vHeight, (USHORT)vWidth));
 836 } // end of wxListBox::OS2OnMeasure
 837
 838 bool wxListBox::OS2OnDraw (
 839   WXDRAWITEMSTRUCT*                 pItem
 840 )
 841 {
 842     POWNERITEM                      pDrawStruct = (POWNERITEM)pItem;
 843     LONG                            lItemID = pDrawStruct->idItem;
 844     int                             eAction = 0;
 845     int                             eStatus = 0;
 846
 847     //
 848     // Only owner-drawn control should receive this message
 849     //
 850     wxCHECK(((m_windowStyle & wxLB_OWNERDRAW) == wxLB_OWNERDRAW), false);
 851
 852
 853     //
 854     // The item may be -1 for an empty listbox
 855     //
 856     if (lItemID == -1L)
 857         return false;
 858
 859     wxListBoxItem*                   pData = (wxListBoxItem*)PVOIDFROMMR( ::WinSendMsg( GetHwnd()
 860                                                                                        ,LM_QUERYITEMHANDLE
 861                                                                                        ,MPFROMLONG(pDrawStruct->idItem)
 862                                                                                        ,(MPARAM)0
 863                                                                                       )
 864                                                                         );
 865
 866     wxCHECK(pData, false );
 867
 868     wxDC    vDc;
 869     wxPoint pt1( pDrawStruct->rclItem.xLeft, pDrawStruct->rclItem.yTop );
 870     wxPoint pt2( pDrawStruct->rclItem.xRight, pDrawStruct->rclItem.yBottom );
 871     wxRect  vRect( pt1, pt2 );
 872
 873     vDc.SetHPS(pDrawStruct->hps);
 874
 875     if (pDrawStruct->fsAttribute == pDrawStruct->fsAttributeOld)
 876     {
 877         //
 878         // Entire Item needs to be redrawn (either it has reappeared from
 879         // behind another window or is being displayed for the first time
 880         //
 881         eAction = wxOwnerDrawn::wxODDrawAll;
 882
 883         if (pDrawStruct->fsAttribute & MIA_HILITED)
 884         {
 885             //
 886             // If it is currently selected we let the system handle it
 887             //
 888             eStatus |= wxOwnerDrawn::wxODSelected;
 889         }
 890         if (pDrawStruct->fsAttribute & MIA_CHECKED)
 891         {
 892             //
 893             // If it is currently checked we draw our own
 894             //
 895             eStatus |= wxOwnerDrawn::wxODChecked;
 896             pDrawStruct->fsAttributeOld = pDrawStruct->fsAttribute &= ~MIA_CHECKED;
 897         }
 898         if (pDrawStruct->fsAttribute & MIA_DISABLED)
 899         {
 900             //
 901             // If it is currently disabled we let the system handle it
 902             //
 903             eStatus |= wxOwnerDrawn::wxODDisabled;
 904         }
 905         //
 906         // Don't really care about framed (indicationg focus) or NoDismiss
 907         //
 908     }
 909     else
 910     {
 911         if (pDrawStruct->fsAttribute & MIA_HILITED)
 912         {
 913             eAction = wxOwnerDrawn::wxODDrawAll;
 914             eStatus |= wxOwnerDrawn::wxODSelected;
 915             //
 916             // Keep the system from trying to highlight with its bogus colors
 917             //
 918             pDrawStruct->fsAttributeOld = pDrawStruct->fsAttribute &= ~MIA_HILITED;
 919         }
 920         else if (!(pDrawStruct->fsAttribute & MIA_HILITED))
 921         {
 922             eAction = wxOwnerDrawn::wxODDrawAll;
 923             eStatus = 0;
 924             //
 925             // Keep the system from trying to highlight with its bogus colors
 926             //
 927             pDrawStruct->fsAttribute = pDrawStruct->fsAttributeOld &= ~MIA_HILITED;
 928         }
 929         else
 930         {
 931             //
 932             // For now we don't care about anything else
 933             // just ignore the entire message!
 934             //
 935             return true;
 936         }
 937     }
 938     return pData->OnDrawItem( vDc
 939                              ,vRect
 940                              ,(wxOwnerDrawn::wxODAction)eAction
 941                              ,(wxOwnerDrawn::wxODStatus)eStatus
 942                             );
 943 } // end of wxListBox::OS2OnDraw
 944
 945 #endif // ndef for wxUSE_OWNER_DRAWN
 946
 947 #endif // ndef for wxUSE_LISTBOX