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