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