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