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