]>
Commit | Line | Data |
---|---|---|
0e320a79 DW |
1 | /////////////////////////////////////////////////////////////////////////////// |
2 | // Name: listbox.cpp | |
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 |
0e320a79 DW |
9 | // Licence: wxWindows licence |
10 | /////////////////////////////////////////////////////////////////////////////// | |
11 | ||
fb9010ed DW |
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" | |
0e320a79 | 17 | |
fb9010ed | 18 | #ifndef WX_PRECOMP |
0e320a79 DW |
19 | #include "wx/listbox.h" |
20 | #include "wx/settings.h" | |
fb9010ed DW |
21 | #include "wx/brush.h" |
22 | #include "wx/font.h" | |
23 | #include "wx/dc.h" | |
1a75e76f | 24 | #include "wx/dcscreen.h" |
fb9010ed | 25 | #include "wx/utils.h" |
a4a16252 | 26 | #include "wx/scrolwin.h" |
fb9010ed DW |
27 | #endif |
28 | ||
29 | #define INCL_M | |
30 | #include <os2.h> | |
31 | ||
0e320a79 DW |
32 | #include "wx/dynarray.h" |
33 | #include "wx/log.h" | |
34 | ||
7e99520b DW |
35 | #if wxUSE_LISTBOX |
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 | ||
49 | class wxListBoxItem : public wxOwnerDrawn | |
50 | { | |
51 | public: | |
49dc8caa | 52 | wxListBoxItem(const wxString& rsStr = ""); |
fb9010ed DW |
53 | }; |
54 | ||
49dc8caa DW |
55 | wxListBoxItem::wxListBoxItem( |
56 | const wxString& rsStr | |
57 | ) | |
58 | : wxOwnerDrawn( rsStr | |
59 | ,FALSE | |
60 | ) | |
fb9010ed | 61 | { |
49dc8caa DW |
62 | // |
63 | // No bitmaps/checkmarks | |
64 | // | |
fb9010ed | 65 | SetMarginWidth(0); |
49dc8caa | 66 | } // end of wxListBoxItem::wxListBoxItem |
fb9010ed | 67 | |
49dc8caa DW |
68 | wxOwnerDrawn* wxListBox::CreateItem( |
69 | size_t n | |
70 | ) | |
fb9010ed DW |
71 | { |
72 | return new wxListBoxItem(); | |
49dc8caa | 73 | } // end of wxListBox::CreateItem |
fb9010ed DW |
74 | |
75 | #endif //USE_OWNER_DRAWN | |
76 | ||
0e320a79 DW |
77 | // ============================================================================ |
78 | // list box control implementation | |
79 | // ============================================================================ | |
80 | ||
81 | // Listbox item | |
82 | wxListBox::wxListBox() | |
83 | { | |
49dc8caa DW |
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 | , int n | |
94 | , const wxString asChoices[] | |
95 | , long lStyle | |
5d4b632b | 96 | #if wxUSE_VALIDATORS |
49dc8caa | 97 | , const wxValidator& rValidator |
5d4b632b | 98 | #endif |
49dc8caa DW |
99 | , const wxString& rsName |
100 | ) | |
0e320a79 | 101 | { |
49dc8caa DW |
102 | m_nNumItems = 0; |
103 | m_hWnd = 0; | |
104 | m_nSelected = 0; | |
0e320a79 | 105 | |
49dc8caa | 106 | SetName(rsName); |
5d4b632b | 107 | #if wxUSE_VALIDATORS |
49dc8caa | 108 | SetValidator(rValidator); |
5d4b632b | 109 | #endif |
0e320a79 | 110 | |
49dc8caa DW |
111 | if (pParent) |
112 | pParent->AddChild(this); | |
113 | ||
114 | wxSystemSettings vSettings; | |
115 | ||
116 | SetBackgroundColour(vSettings.GetSystemColour(wxSYS_COLOUR_WINDOW)); | |
117 | SetForegroundColour(pParent->GetForegroundColour()); | |
0e320a79 | 118 | |
49dc8caa | 119 | m_windowId = (vId == -1) ? (int)NewControlId() : vId; |
0e320a79 | 120 | |
49dc8caa DW |
121 | int nX = rPos.x; |
122 | int nY = rPos.y; | |
123 | int nWidth = rSize.x; | |
124 | int nHeight = rSize.y; | |
0e320a79 | 125 | |
49dc8caa | 126 | m_windowStyle = lStyle; |
fb9010ed | 127 | |
49dc8caa DW |
128 | lStyle = WS_VISIBLE; |
129 | ||
130 | if (m_windowStyle & wxCLIP_SIBLINGS ) | |
131 | lStyle |= WS_CLIPSIBLINGS; | |
fb9010ed | 132 | if (m_windowStyle & wxLB_MULTIPLE) |
49dc8caa | 133 | lStyle |= LS_MULTIPLESEL; |
fb9010ed | 134 | else if (m_windowStyle & wxLB_EXTENDED) |
49dc8caa | 135 | lStyle |= LS_EXTENDEDSEL; |
fb9010ed | 136 | if (m_windowStyle & wxLB_HSCROLL) |
49dc8caa DW |
137 | lStyle |= LS_HORZSCROLL; |
138 | if (m_windowStyle & wxLB_OWNERDRAW) | |
139 | lStyle |= LS_OWNERDRAW; | |
fb9010ed | 140 | |
49dc8caa | 141 | // |
fb9010ed DW |
142 | // Without this style, you get unexpected heights, so e.g. constraint layout |
143 | // doesn't work properly | |
49dc8caa DW |
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) | |
fb9010ed | 159 | { |
49dc8caa | 160 | return FALSE; |
fb9010ed DW |
161 | } |
162 | ||
49dc8caa DW |
163 | // |
164 | // Subclass again for purposes of dialog editing mode | |
165 | // | |
fb9010ed DW |
166 | SubclassWin(m_hWnd); |
167 | ||
49dc8caa | 168 | LONG lUi; |
0e320a79 | 169 | |
49dc8caa DW |
170 | for (lUi = 0; lUi < (LONG)n; lUi++) |
171 | { | |
172 | Append(asChoices[lUi]); | |
173 | } | |
b3260bce DW |
174 | wxFont* pTextFont = new wxFont( 10 |
175 | ,wxMODERN | |
176 | ,wxNORMAL | |
177 | ,wxNORMAL | |
178 | ); | |
179 | SetFont(*pTextFont); | |
e58dab20 | 180 | |
5d44b24e DW |
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 | ||
49dc8caa DW |
203 | SetSize( nX |
204 | ,nY | |
205 | ,nWidth | |
206 | ,nHeight | |
207 | ); | |
b3260bce | 208 | delete pTextFont; |
dcd307ee | 209 | return TRUE; |
49dc8caa | 210 | } // end of wxListBox::Create |
0e320a79 DW |
211 | |
212 | wxListBox::~wxListBox() | |
213 | { | |
fb9010ed | 214 | #if wxUSE_OWNER_DRAWN |
49dc8caa DW |
215 | size_t lUiCount = m_aItems.Count(); |
216 | ||
217 | while (lUiCount-- != 0) | |
218 | { | |
219 | delete m_aItems[lUiCount]; | |
fb9010ed DW |
220 | } |
221 | #endif // wxUSE_OWNER_DRAWN | |
49dc8caa | 222 | } // end of wxListBox::~wxListBox |
fb9010ed DW |
223 | |
224 | void wxListBox::SetupColours() | |
225 | { | |
a756f210 | 226 | SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW)); |
fb9010ed | 227 | SetForegroundColour(GetParent()->GetForegroundColour()); |
49dc8caa | 228 | } // end of wxListBox::SetupColours |
0e320a79 | 229 | |
dcd307ee DW |
230 | // ---------------------------------------------------------------------------- |
231 | // implementation of wxListBoxBase methods | |
232 | // ---------------------------------------------------------------------------- | |
233 | ||
49dc8caa DW |
234 | void wxListBox::DoSetFirstItem( |
235 | int N | |
236 | ) | |
0e320a79 | 237 | { |
49dc8caa | 238 | wxCHECK_RET( N >= 0 && N < m_nNumItems, |
fb9010ed DW |
239 | wxT("invalid index in wxListBox::SetFirstItem") ); |
240 | ||
49dc8caa DW |
241 | ::WinSendMsg(GetHwnd(), LM_SETTOPINDEX, MPFROMLONG(N), (MPARAM)0); |
242 | } // end of wxListBox::DoSetFirstItem | |
0e320a79 | 243 | |
49dc8caa DW |
244 | void wxListBox::Delete( |
245 | int N | |
246 | ) | |
0e320a79 | 247 | { |
49dc8caa | 248 | wxCHECK_RET( N >= 0 && N < m_nNumItems, |
fb9010ed DW |
249 | wxT("invalid index in wxListBox::Delete") ); |
250 | ||
dcd307ee DW |
251 | #if wxUSE_OWNER_DRAWN |
252 | delete m_aItems[N]; | |
893758d5 | 253 | m_aItems.RemoveAt(N); |
dcd307ee | 254 | #else // !wxUSE_OWNER_DRAWN |
49dc8caa | 255 | if (HasClientObjectData()) |
dcd307ee DW |
256 | { |
257 | delete GetClientObject(N); | |
258 | } | |
259 | #endif // wxUSE_OWNER_DRAWN/!wxUSE_OWNER_DRAWN | |
260 | ||
49dc8caa DW |
261 | ::WinSendMsg(GetHwnd(), LM_DELETEITEM, (MPARAM)N, (MPARAM)0); |
262 | m_nNumItems--; | |
263 | } // end of wxListBox::DoSetFirstItem | |
0e320a79 | 264 | |
49dc8caa DW |
265 | int wxListBox::DoAppend( |
266 | const wxString& rsItem | |
267 | ) | |
0e320a79 | 268 | { |
49dc8caa DW |
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++; | |
fb9010ed DW |
278 | |
279 | #if wxUSE_OWNER_DRAWN | |
49dc8caa DW |
280 | if (m_windowStyle & wxLB_OWNERDRAW) |
281 | { | |
282 | wxOwnerDrawn* pNewItem = CreateItem(nIndex); // dummy argument | |
f5ea767e DW |
283 | wxScreenDC vDc; |
284 | wxCoord vHeight; | |
285 | ||
49dc8caa DW |
286 | |
287 | pNewItem->SetName(rsItem); | |
3437f881 | 288 | m_aItems.Insert(pNewItem, nIndex); |
49dc8caa DW |
289 | ::WinSendMsg(GetHwnd(), LM_SETITEMHANDLE, (MPARAM)((SHORT)nIndex), MPFROMP(pNewItem)); |
290 | pNewItem->SetFont(GetFont()); | |
fb9010ed DW |
291 | } |
292 | #endif | |
49dc8caa DW |
293 | return nIndex; |
294 | } // end of wxListBox::DoAppend | |
0e320a79 | 295 | |
49dc8caa DW |
296 | void wxListBox::DoSetItems( |
297 | const wxArrayString& raChoices | |
298 | , void** ppClientData | |
299 | ) | |
0e320a79 | 300 | { |
49dc8caa DW |
301 | BOOL bHideAndShow = IsShown(); |
302 | int nCount = 0; | |
303 | int i; | |
304 | SHORT nIndexType = 0; | |
0e320a79 | 305 | |
49dc8caa | 306 | if (bHideAndShow) |
fb9010ed | 307 | { |
49dc8caa DW |
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) | |
dcd307ee DW |
322 | { |
323 | #if wxUSE_OWNER_DRAWN | |
49dc8caa | 324 | wxASSERT_MSG(ppClientData[i] == NULL, |
dcd307ee DW |
325 | wxT("Can't use client data with owner-drawn listboxes")); |
326 | #else // !wxUSE_OWNER_DRAWN | |
49dc8caa | 327 | ::WinSendMsg(WinUtil_GetHwnd(), LM_SETITEMHANDLE, MPFROMLONG(lCount), MPFROMP(ppClientData[i])); |
dcd307ee DW |
328 | #endif // wxUSE_OWNER_DRAWN/!wxUSE_OWNER_DRAWN |
329 | } | |
fb9010ed | 330 | } |
fb9010ed DW |
331 | |
332 | #if wxUSE_OWNER_DRAWN | |
49dc8caa DW |
333 | if ( m_windowStyle & wxLB_OWNERDRAW ) |
334 | { | |
335 | // | |
336 | // First delete old items | |
337 | // | |
3437f881 | 338 | WX_CLEAR_ARRAY(m_aItems); |
fb9010ed | 339 | |
49dc8caa DW |
340 | // |
341 | // Then create new ones | |
342 | // | |
3437f881 | 343 | for (size_t ui = 0; ui < (size_t)m_nNumItems; ui++) |
49dc8caa | 344 | { |
3437f881 | 345 | wxOwnerDrawn* pNewItem = CreateItem(ui); |
49dc8caa | 346 | |
3437f881 | 347 | pNewItem->SetName(raChoices[ui]); |
fb9010ed | 348 | m_aItems.Add(pNewItem); |
3437f881 | 349 | ::WinSendMsg(GetHwnd(), LM_SETITEMHANDLE, MPFROMLONG(ui), MPFROMP(pNewItem)); |
fb9010ed DW |
350 | } |
351 | } | |
dcd307ee | 352 | #endif // wxUSE_OWNER_DRAWN |
49dc8caa DW |
353 | ::WinShowWindow(GetHwnd(), TRUE); |
354 | } // end of wxListBox::DoSetItems | |
0e320a79 | 355 | |
49dc8caa DW |
356 | int wxListBox::FindString( |
357 | const wxString& rsString | |
358 | ) const | |
359 | { | |
360 | int nPos; | |
361 | LONG lTextLength; | |
362 | PSZ zStr; | |
dcd307ee | 363 | |
0e320a79 | 364 | |
49dc8caa DW |
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 | |
0e320a79 DW |
379 | |
380 | void wxListBox::Clear() | |
381 | { | |
fb9010ed | 382 | #if wxUSE_OWNER_DRAWN |
49dc8caa DW |
383 | size_t lUiCount = m_aItems.Count(); |
384 | ||
385 | while (lUiCount-- != 0) | |
386 | { | |
387 | delete m_aItems[lUiCount]; | |
fb9010ed DW |
388 | } |
389 | ||
390 | m_aItems.Clear(); | |
dcd307ee | 391 | #else // !wxUSE_OWNER_DRAWN |
49dc8caa | 392 | if (HasClientObjectData()) |
dcd307ee | 393 | { |
49dc8caa | 394 | for (size_t n = 0; n < (size_t)m_lNumItems; n++) |
dcd307ee DW |
395 | { |
396 | delete GetClientObject(n); | |
397 | } | |
398 | } | |
399 | #endif // wxUSE_OWNER_DRAWN/!wxUSE_OWNER_DRAWN | |
49dc8caa | 400 | ::WinSendMsg(GetHwnd(), LM_DELETEALL, (MPARAM)0, (MPARAM)0); |
dcd307ee | 401 | |
49dc8caa DW |
402 | m_nNumItems = 0; |
403 | } // end of wxListBox::Clear | |
fb9010ed | 404 | |
49dc8caa DW |
405 | void wxListBox::SetSelection( |
406 | int N | |
407 | , bool bSelect | |
408 | ) | |
0e320a79 | 409 | { |
49dc8caa | 410 | wxCHECK_RET( N >= 0 && N < m_nNumItems, |
fb9010ed | 411 | wxT("invalid index in wxListBox::SetSelection") ); |
49dc8caa DW |
412 | ::WinSendMsg( GetHwnd() |
413 | ,LM_SELECTITEM | |
414 | ,MPFROMLONG(N) | |
415 | ,(MPARAM)bSelect | |
416 | ); | |
1de4baa3 DW |
417 | if(m_windowStyle & wxLB_OWNERDRAW) |
418 | Refresh(); | |
49dc8caa DW |
419 | } // end of wxListBox::SetSelection |
420 | ||
421 | bool wxListBox::IsSelected( | |
422 | int N | |
423 | ) const | |
424 | { | |
425 | wxCHECK_MSG( N >= 0 && N < m_nNumItems, FALSE, | |
fb9010ed DW |
426 | wxT("invalid index in wxListBox::Selected") ); |
427 | ||
49dc8caa | 428 | LONG lItem; |
0e320a79 | 429 | |
70a2c656 DW |
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); | |
49dc8caa DW |
442 | } // end of wxListBox::IsSelected |
443 | ||
444 | wxClientData* wxListBox::DoGetItemClientObject( | |
445 | int n | |
446 | ) const | |
0e320a79 | 447 | { |
dcd307ee | 448 | return (wxClientData *)DoGetItemClientData(n); |
0e320a79 DW |
449 | } |
450 | ||
49dc8caa DW |
451 | void* wxListBox::DoGetItemClientData( |
452 | int n | |
453 | ) const | |
0e320a79 | 454 | { |
49dc8caa | 455 | wxCHECK_MSG( n >= 0 && n < m_nNumItems, NULL, |
fb9010ed DW |
456 | wxT("invalid index in wxListBox::GetClientData") ); |
457 | ||
49dc8caa DW |
458 | return((void *)::WinSendMsg(GetHwnd(), LM_QUERYITEMHANDLE, MPFROMLONG(n), (MPARAM)0)); |
459 | } // end of wxListBox::DoGetItemClientData | |
0e320a79 | 460 | |
49dc8caa DW |
461 | void wxListBox::DoSetItemClientObject( |
462 | int n | |
463 | , wxClientData* pClientData | |
464 | ) | |
0e320a79 | 465 | { |
49dc8caa DW |
466 | DoSetItemClientData( n |
467 | ,pClientData | |
468 | ); | |
469 | } // end of wxListBox::DoSetItemClientObject | |
dcd307ee | 470 | |
49dc8caa DW |
471 | void wxListBox::DoSetItemClientData( |
472 | int n | |
473 | , void* pClientData | |
474 | ) | |
dcd307ee | 475 | { |
49dc8caa | 476 | wxCHECK_RET( n >= 0 && n < m_nNumItems, |
fb9010ed DW |
477 | wxT("invalid index in wxListBox::SetClientData") ); |
478 | ||
dcd307ee DW |
479 | #if wxUSE_OWNER_DRAWN |
480 | if ( m_windowStyle & wxLB_OWNERDRAW ) | |
481 | { | |
49dc8caa DW |
482 | // |
483 | // Client data must be pointer to wxOwnerDrawn, otherwise we would crash | |
dcd307ee | 484 | // in OnMeasure/OnDraw. |
49dc8caa | 485 | // |
dcd307ee DW |
486 | wxFAIL_MSG(wxT("Can't use client data with owner-drawn listboxes")); |
487 | } | |
488 | #endif // wxUSE_OWNER_DRAWN | |
489 | ||
49dc8caa DW |
490 | ::WinSendMsg(GetHwnd(), LM_SETITEMHANDLE, MPFROMLONG(n), MPFROMP(pClientData)); |
491 | } // end of wxListBox::DoSetItemClientData | |
dcd307ee DW |
492 | |
493 | bool wxListBox::HasMultipleSelection() const | |
494 | { | |
495 | return (m_windowStyle & wxLB_MULTIPLE) || (m_windowStyle & wxLB_EXTENDED); | |
49dc8caa | 496 | } // end of wxListBox::HasMultipleSelection |
0e320a79 | 497 | |
49dc8caa DW |
498 | int wxListBox::GetSelections( |
499 | wxArrayInt& raSelections | |
500 | ) const | |
0e320a79 | 501 | { |
49dc8caa DW |
502 | int nCount = 0; |
503 | LONG lItem; | |
0e320a79 | 504 | |
fb9010ed | 505 | |
49dc8caa DW |
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; | |
fb9010ed | 546 | } |
49dc8caa | 547 | return 0; |
0e320a79 DW |
548 | } |
549 | else // single-selection listbox | |
550 | { | |
49dc8caa DW |
551 | lItem = LONGFROMMR(::WinSendMsg( GetHwnd() |
552 | ,LM_QUERYSELECTION | |
553 | ,(MPARAM)LIT_FIRST | |
554 | ,(MPARAM)0 | |
555 | ) | |
556 | ); | |
557 | raSelections.Add((int)lItem); | |
0e320a79 DW |
558 | return 1; |
559 | } | |
dcd307ee | 560 | return 0; |
49dc8caa | 561 | } // end of wxListBox::GetSelections |
0e320a79 | 562 | |
0e320a79 DW |
563 | int wxListBox::GetSelection() const |
564 | { | |
dcd307ee | 565 | wxCHECK_MSG( !HasMultipleSelection(), |
fb9010ed DW |
566 | -1, |
567 | wxT("GetSelection() can't be used with multiple-selection " | |
568 | "listboxes, use GetSelections() instead.") ); | |
569 | ||
49dc8caa DW |
570 | return(LONGFROMMR(::WinSendMsg( GetHwnd() |
571 | ,LM_QUERYSELECTION | |
572 | ,(MPARAM)LIT_FIRST | |
573 | ,(MPARAM)0 | |
574 | ) | |
575 | )); | |
576 | } // end of wxListBox::GetSelection | |
0e320a79 | 577 | |
49dc8caa DW |
578 | wxString wxListBox::GetString( |
579 | int N | |
580 | ) const | |
0e320a79 | 581 | { |
49dc8caa DW |
582 | LONG lLen = 0; |
583 | char* zBuf; | |
584 | wxString sResult; | |
fb9010ed | 585 | |
49dc8caa DW |
586 | wxCHECK_MSG( N >= 0 && N < m_nNumItems, "", |
587 | wxT("invalid index in wxListBox::GetClientData") ); | |
0e320a79 | 588 | |
49dc8caa DW |
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 | ||
598 | void wxListBox::DoInsertItems( | |
599 | const wxArrayString& asItems | |
600 | , int nPos | |
601 | ) | |
602 | { | |
603 | wxCHECK_RET( nPos >= 0 && nPos <= m_nNumItems, | |
dcd307ee DW |
604 | wxT("invalid index in wxListBox::InsertItems") ); |
605 | ||
49dc8caa | 606 | int nItems = asItems.GetCount(); |
dcd307ee | 607 | |
49dc8caa | 608 | for (int i = 0; i < nItems; i++) |
3437f881 DW |
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 | } | |
49dc8caa | 628 | } // end of wxListBox::DoInsertItems |
dcd307ee | 629 | |
49dc8caa DW |
630 | void wxListBox::SetString( |
631 | int N | |
632 | , const wxString& rsString | |
633 | ) | |
dcd307ee | 634 | { |
49dc8caa | 635 | wxCHECK_RET( N >= 0 && N < m_nNumItems, |
dcd307ee DW |
636 | wxT("invalid index in wxListBox::SetString") ); |
637 | ||
49dc8caa DW |
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) | |
dcd307ee DW |
686 | Select(N); |
687 | ||
688 | #if wxUSE_OWNER_DRAWN | |
49dc8caa DW |
689 | if (m_windowStyle & wxLB_OWNERDRAW) |
690 | // | |
691 | // Update item's text | |
692 | // | |
693 | m_aItems[N]->SetName(rsString); | |
dcd307ee | 694 | #endif //USE_OWNER_DRAWN |
49dc8caa | 695 | } // end of wxListBox::SetString |
dcd307ee DW |
696 | |
697 | int wxListBox::GetCount() const | |
698 | { | |
49dc8caa | 699 | return m_nNumItems; |
dcd307ee DW |
700 | } |
701 | ||
702 | // ---------------------------------------------------------------------------- | |
703 | // helpers | |
704 | // ---------------------------------------------------------------------------- | |
705 | ||
e78c4d50 | 706 | wxSize wxListBox::DoGetBestSize() const |
fb9010ed | 707 | { |
49dc8caa DW |
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++) | |
fb9010ed | 717 | { |
49dc8caa DW |
718 | wxString vStr(GetString(i)); |
719 | ||
720 | GetTextExtent( vStr | |
721 | ,&nLine | |
722 | ,NULL | |
723 | ); | |
724 | if (nLine > nListbox) | |
725 | nListbox = nLine; | |
fb9010ed DW |
726 | } |
727 | ||
49dc8caa DW |
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 | |
fb9010ed | 751 | |
dcd307ee DW |
752 | // ---------------------------------------------------------------------------- |
753 | // callbacks | |
754 | // ---------------------------------------------------------------------------- | |
755 | ||
49dc8caa DW |
756 | bool wxListBox::OS2Command( |
757 | WXUINT uParam | |
758 | , WXWORD WXUNUSED(wId)) | |
0e320a79 | 759 | { |
49dc8caa | 760 | wxEventType eEvtType; |
dcd307ee | 761 | |
49dc8caa DW |
762 | if (uParam == LN_SELECT) |
763 | { | |
764 | eEvtType = wxEVT_COMMAND_LISTBOX_SELECTED; | |
dcd307ee | 765 | } |
49dc8caa | 766 | if (uParam == LN_ENTER) |
0e320a79 | 767 | { |
49dc8caa | 768 | eEvtType = wxEVT_COMMAND_LISTBOX_DOUBLECLICKED; |
0e320a79 | 769 | } |
fb9010ed | 770 | else |
49dc8caa DW |
771 | { |
772 | // | |
773 | // Some event we're not interested in | |
774 | // | |
775 | return FALSE; | |
776 | } | |
777 | wxCommandEvent vEvent( eEvtType | |
778 | ,m_windowId | |
779 | ); | |
fb9010ed | 780 | |
49dc8caa | 781 | vEvent.SetEventObject(this); |
fb9010ed | 782 | |
49dc8caa DW |
783 | wxArrayInt aSelections; |
784 | int n; | |
785 | int nCount = GetSelections(aSelections); | |
fb9010ed | 786 | |
49dc8caa DW |
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 | |
fb9010ed | 803 | |
dcd307ee DW |
804 | // ---------------------------------------------------------------------------- |
805 | // wxCheckListBox support | |
806 | // ---------------------------------------------------------------------------- | |
fb9010ed DW |
807 | |
808 | #if wxUSE_OWNER_DRAWN | |
809 | ||
49dc8caa DW |
810 | // |
811 | // Drawing | |
fb9010ed | 812 | // ------- |
49dc8caa | 813 | // |
fb9010ed DW |
814 | #define OWNER_DRAWN_LISTBOX_EXTRA_SPACE (1) |
815 | ||
f5ea767e | 816 | long wxListBox::OS2OnMeasure( |
1de4baa3 DW |
817 | WXMEASUREITEMSTRUCT* pItem |
818 | ) | |
fb9010ed | 819 | { |
1de4baa3 DW |
820 | if (!pItem) |
821 | pItem = (WXMEASUREITEMSTRUCT*)new OWNERITEM; | |
822 | ||
823 | POWNERITEM pMeasureStruct = (POWNERITEM)pItem; | |
824 | wxScreenDC vDc; | |
825 | ||
49dc8caa | 826 | // |
1de4baa3 | 827 | // Only owner-drawn control should receive this message |
49dc8caa | 828 | // |
1de4baa3 DW |
829 | wxCHECK( ((m_windowStyle & wxLB_OWNERDRAW) == wxLB_OWNERDRAW), FALSE ); |
830 | ||
831 | vDc.SetFont(GetFont()); | |
832 | ||
833 | wxCoord vHeight; | |
f5ea767e DW |
834 | wxCoord vWidth; |
835 | ||
836 | GetSize( &vWidth | |
837 | ,NULL | |
838 | ); | |
1de4baa3 | 839 | |
f5ea767e | 840 | pMeasureStruct->rclItem.xRight = (USHORT)vWidth; |
1de4baa3 DW |
841 | pMeasureStruct->rclItem.xLeft = 0; |
842 | pMeasureStruct->rclItem.yTop = 0; | |
843 | pMeasureStruct->rclItem.yBottom = 0; | |
844 | ||
845 | vHeight = vDc.GetCharHeight() * 2.5; | |
f5ea767e | 846 | pMeasureStruct->rclItem.yTop = (USHORT)vHeight; |
1de4baa3 | 847 | |
f5ea767e | 848 | return long(MRFROM2SHORT((USHORT)vHeight, (USHORT)vWidth)); |
1de4baa3 | 849 | } // end of wxListBox::OS2OnMeasure |
fb9010ed | 850 | |
1de4baa3 DW |
851 | bool wxListBox::OS2OnDraw ( |
852 | WXDRAWITEMSTRUCT* pItem | |
853 | ) | |
fb9010ed | 854 | { |
1de4baa3 DW |
855 | POWNERITEM pDrawStruct = (POWNERITEM)pItem; |
856 | LONG lItemID = pDrawStruct->idItem; | |
857 | int eAction = 0; | |
858 | int eStatus = 0; | |
859 | ||
49dc8caa | 860 | // |
1de4baa3 | 861 | // Only owner-drawn control should receive this message |
49dc8caa | 862 | // |
1de4baa3 DW |
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 | ||
49dc8caa DW |
962 | #endif // ndef for wxUSE_OWNER_DRAWN |
963 | ||
964 | #endif // ndef for wxUSE_LISTBOX | |
7e99520b | 965 |