]>
Commit | Line | Data |
---|---|---|
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/window.h" | |
18 | #include "wx/os2/private.h" | |
19 | ||
20 | #ifndef WX_PRECOMP | |
21 | #include "wx/listbox.h" | |
22 | #include "wx/settings.h" | |
23 | #include "wx/brush.h" | |
24 | #include "wx/font.h" | |
25 | #include "wx/dc.h" | |
26 | #include "wx/dcscreen.h" | |
27 | #include "wx/utils.h" | |
28 | #include "wx/scrolwin.h" | |
29 | #endif | |
30 | ||
31 | #define INCL_M | |
32 | #include <os2.h> | |
33 | ||
34 | #include "wx/dynarray.h" | |
35 | #include "wx/log.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(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 (size_t 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 (size_t 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 | size_t 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 (size_t n = 0; n < (size_t)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(int n) const | |
418 | { | |
419 | return (wxClientData *)DoGetItemClientData(n); | |
420 | } | |
421 | ||
422 | void* wxListBox::DoGetItemClientData(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(int n, wxClientData* pClientData) | |
431 | { | |
432 | DoSetItemClientData(n, pClientData); | |
433 | } // end of wxListBox::DoSetItemClientObject | |
434 | ||
435 | void wxListBox::DoSetItemClientData(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( 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, | |
555 | int nPos ) | |
556 | { | |
557 | wxCHECK_RET( IsValidInsert(nPos), | |
558 | wxT("invalid index in wxListBox::InsertItems") ); | |
559 | ||
560 | size_t nItems = asItems.GetCount(); | |
561 | ||
562 | for (size_t i = 0; i < nItems; i++) | |
563 | { | |
564 | int nIndex = (int)::WinSendMsg( GetHwnd(), | |
565 | LM_INSERTITEM, | |
566 | MPFROMLONG((LONG)(i + nPos)), | |
567 | (MPARAM)asItems[i].c_str() ); | |
568 | ||
569 | wxOwnerDrawn* pNewItem = CreateItem(nIndex); | |
570 | ||
571 | pNewItem->SetName(asItems[i]); | |
572 | pNewItem->SetFont(GetFont()); | |
573 | m_aItems.Insert(pNewItem, nIndex); | |
574 | ::WinSendMsg( GetHwnd() | |
575 | ,LM_SETITEMHANDLE | |
576 | ,(MPARAM)((LONG)nIndex) | |
577 | ,MPFROMP(pNewItem) | |
578 | ); | |
579 | m_nNumItems += nItems; | |
580 | } | |
581 | } // end of wxListBox::DoInsertItems | |
582 | ||
583 | void wxListBox::SetString(int N, const wxString& rsString) | |
584 | { | |
585 | wxCHECK_RET( IsValid(N), | |
586 | wxT("invalid index in wxListBox::SetString") ); | |
587 | ||
588 | // | |
589 | // Remember the state of the item | |
590 | // | |
591 | bool bWasSelected = IsSelected(N); | |
592 | void* pOldData = NULL; | |
593 | wxClientData* pOldObjData = NULL; | |
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 | ||
611 | if (N == m_nNumItems - 1) | |
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) | |
636 | Select(N); | |
637 | ||
638 | #if wxUSE_OWNER_DRAWN | |
639 | if (m_windowStyle & wxLB_OWNERDRAW) | |
640 | // | |
641 | // Update item's text | |
642 | // | |
643 | m_aItems[N]->SetName(rsString); | |
644 | #endif //USE_OWNER_DRAWN | |
645 | } // end of wxListBox::SetString | |
646 | ||
647 | size_t wxListBox::GetCount() const | |
648 | { | |
649 | return m_nNumItems; | |
650 | } | |
651 | ||
652 | // ---------------------------------------------------------------------------- | |
653 | // helpers | |
654 | // ---------------------------------------------------------------------------- | |
655 | ||
656 | wxSize wxListBox::DoGetBestSize() const | |
657 | { | |
658 | // | |
659 | // Find the widest string | |
660 | // | |
661 | int nLine; | |
662 | int nListbox = 0; | |
663 | int nCx; | |
664 | int nCy; | |
665 | wxFont vFont = (wxFont)GetFont(); | |
666 | ||
667 | for (size_t i = 0; i < m_nNumItems; i++) | |
668 | { | |
669 | wxString vStr(GetString(i)); | |
670 | ||
671 | GetTextExtent( vStr, &nLine, NULL ); | |
672 | if (nLine > nListbox) | |
673 | nListbox = nLine; | |
674 | } | |
675 | ||
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 | |
689 | ,&vFont | |
690 | ); | |
691 | nListbox += 3 * nCx; | |
692 | ||
693 | int hListbox = EDIT_HEIGHT_FROM_CHAR_HEIGHT(nCy) * (wxMax(m_nNumItems, 7)); | |
694 | ||
695 | return wxSize( nListbox | |
696 | ,hListbox | |
697 | ); | |
698 | } // end of wxListBox::DoGetBestSize | |
699 | ||
700 | // ---------------------------------------------------------------------------- | |
701 | // callbacks | |
702 | // ---------------------------------------------------------------------------- | |
703 | ||
704 | bool wxListBox::OS2Command( | |
705 | WXUINT uParam | |
706 | , WXWORD WXUNUSED(wId)) | |
707 | { | |
708 | wxEventType eEvtType; | |
709 | ||
710 | if (uParam == LN_SELECT) | |
711 | { | |
712 | eEvtType = wxEVT_COMMAND_LISTBOX_SELECTED; | |
713 | } | |
714 | else if (uParam == LN_ENTER) | |
715 | { | |
716 | eEvtType = wxEVT_COMMAND_LISTBOX_DOUBLECLICKED; | |
717 | } | |
718 | else | |
719 | { | |
720 | // | |
721 | // Some event we're not interested in | |
722 | // | |
723 | return false; | |
724 | } | |
725 | wxCommandEvent vEvent( eEvtType | |
726 | ,m_windowId | |
727 | ); | |
728 | ||
729 | vEvent.SetEventObject(this); | |
730 | ||
731 | wxArrayInt aSelections; | |
732 | int n; | |
733 | int nCount = GetSelections(aSelections); | |
734 | ||
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 | } | |
748 | vEvent.SetInt(n); | |
749 | return GetEventHandler()->ProcessEvent(vEvent); | |
750 | } // end of wxListBox::OS2Command | |
751 | ||
752 | // ---------------------------------------------------------------------------- | |
753 | // wxCheckListBox support | |
754 | // ---------------------------------------------------------------------------- | |
755 | ||
756 | #if wxUSE_OWNER_DRAWN | |
757 | ||
758 | // | |
759 | // Drawing | |
760 | // ------- | |
761 | // | |
762 | #define OWNER_DRAWN_LISTBOX_EXTRA_SPACE (1) | |
763 | ||
764 | long wxListBox::OS2OnMeasure(WXMEASUREITEMSTRUCT* pItem) | |
765 | { | |
766 | if (!pItem) | |
767 | pItem = (WXMEASUREITEMSTRUCT*)new OWNERITEM; | |
768 | ||
769 | POWNERITEM pMeasureStruct = (POWNERITEM)pItem; | |
770 | wxScreenDC vDc; | |
771 | ||
772 | // | |
773 | // Only owner-drawn control should receive this message | |
774 | // | |
775 | wxCHECK( ((m_windowStyle & wxLB_OWNERDRAW) == wxLB_OWNERDRAW), FALSE ); | |
776 | ||
777 | vDc.SetFont(GetFont()); | |
778 | ||
779 | wxCoord vHeight; | |
780 | wxCoord vWidth; | |
781 | ||
782 | GetSize( &vWidth | |
783 | ,NULL | |
784 | ); | |
785 | ||
786 | pMeasureStruct->rclItem.xRight = (USHORT)vWidth; | |
787 | pMeasureStruct->rclItem.xLeft = 0; | |
788 | pMeasureStruct->rclItem.yTop = 0; | |
789 | pMeasureStruct->rclItem.yBottom = 0; | |
790 | ||
791 | vHeight = (wxCoord)(vDc.GetCharHeight() * 2.5); | |
792 | pMeasureStruct->rclItem.yTop = (USHORT)vHeight; | |
793 | ||
794 | return long(MRFROM2SHORT((USHORT)vHeight, (USHORT)vWidth)); | |
795 | } // end of wxListBox::OS2OnMeasure | |
796 | ||
797 | bool wxListBox::OS2OnDraw ( | |
798 | WXDRAWITEMSTRUCT* pItem | |
799 | ) | |
800 | { | |
801 | POWNERITEM pDrawStruct = (POWNERITEM)pItem; | |
802 | LONG lItemID = pDrawStruct->idItem; | |
803 | int eAction = 0; | |
804 | int eStatus = 0; | |
805 | ||
806 | // | |
807 | // Only owner-drawn control should receive this message | |
808 | // | |
809 | wxCHECK(((m_windowStyle & wxLB_OWNERDRAW) == wxLB_OWNERDRAW), false); | |
810 | ||
811 | ||
812 | // | |
813 | // The item may be -1 for an empty listbox | |
814 | // | |
815 | if (lItemID == -1L) | |
816 | return false; | |
817 | ||
818 | wxListBoxItem* pData = (wxListBoxItem*)PVOIDFROMMR( ::WinSendMsg( GetHwnd() | |
819 | ,LM_QUERYITEMHANDLE | |
820 | ,MPFROMLONG(pDrawStruct->idItem) | |
821 | ,(MPARAM)0 | |
822 | ) | |
823 | ); | |
824 | ||
825 | wxCHECK(pData, false ); | |
826 | ||
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 ); | |
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 | // | |
894 | return true; | |
895 | } | |
896 | } | |
897 | return pData->OnDrawItem( vDc | |
898 | ,vRect | |
899 | ,(wxOwnerDrawn::wxODAction)eAction | |
900 | ,(wxOwnerDrawn::wxODStatus)eStatus | |
901 | ); | |
902 | } // end of wxListBox::OS2OnDraw | |
903 | ||
904 | #endif // ndef for wxUSE_OWNER_DRAWN | |
905 | ||
906 | #endif // wxUSE_LISTBOX |