]>
Commit | Line | Data |
---|---|---|
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 | ||
e4db172a WS |
17 | #include "wx/listbox.h" |
18 | ||
fb9010ed | 19 | #ifndef WX_PRECOMP |
ad9835c9 | 20 | #include "wx/dynarray.h" |
ad9835c9 WS |
21 | #include "wx/settings.h" |
22 | #include "wx/brush.h" | |
23 | #include "wx/font.h" | |
24 | #include "wx/dc.h" | |
25 | #include "wx/dcscreen.h" | |
26 | #include "wx/utils.h" | |
27 | #include "wx/scrolwin.h" | |
e4db172a | 28 | #include "wx/log.h" |
cdccdfab | 29 | #include "wx/window.h" |
fb9010ed DW |
30 | #endif |
31 | ||
ad9835c9 WS |
32 | #include "wx/os2/private.h" |
33 | ||
fb9010ed DW |
34 | #define INCL_M |
35 | #include <os2.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 | ||
49 | class wxListBoxItem : public wxOwnerDrawn | |
50 | { | |
51 | public: | |
0fba44b4 | 52 | wxListBoxItem(const wxString& rsStr = wxEmptyString); |
fb9010ed DW |
53 | }; |
54 | ||
49dc8caa DW |
55 | wxListBoxItem::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 | 68 | wxOwnerDrawn* 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 | |
80 | wxListBox::wxListBox() | |
81 | { | |
49dc8caa DW |
82 | m_nNumItems = 0; |
83 | m_nSelected = 0; | |
84 | } // end of wxListBox::wxListBox | |
85 | ||
584ad2a3 MB |
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 | ||
8228b893 WS |
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 ) | |
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 | |
225 | wxListBox::~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 | |
237 | void 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 | 247 | void 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 | |
aa61d352 | 255 | void wxListBox::Delete(unsigned int n) |
0e320a79 | 256 | { |
aa61d352 | 257 | wxCHECK_RET( IsValid(n), |
fb9010ed DW |
258 | wxT("invalid index in wxListBox::Delete") ); |
259 | ||
dcd307ee | 260 | #if wxUSE_OWNER_DRAWN |
aa61d352 VZ |
261 | delete m_aItems[n]; |
262 | m_aItems.RemoveAt(n); | |
dcd307ee | 263 | #else // !wxUSE_OWNER_DRAWN |
49dc8caa | 264 | if (HasClientObjectData()) |
dcd307ee | 265 | { |
aa61d352 | 266 | delete GetClientObject(n); |
dcd307ee DW |
267 | } |
268 | #endif // wxUSE_OWNER_DRAWN/!wxUSE_OWNER_DRAWN | |
269 | ||
aa61d352 | 270 | ::WinSendMsg(GetHwnd(), LM_DELETEITEM, (MPARAM)n, (MPARAM)0); |
49dc8caa DW |
271 | m_nNumItems--; |
272 | } // end of wxListBox::DoSetFirstItem | |
0e320a79 | 273 | |
8228b893 | 274 | int 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 |
303 | void 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(); | |
aa61d352 | 315 | for (unsigned int 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 | // | |
aa61d352 | 345 | for (unsigned int ui = 0; ui < m_nNumItems; ui++) |
49dc8caa | 346 | { |
aa61d352 | 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 |
358 | void wxListBox::Clear() |
359 | { | |
fb9010ed | 360 | #if wxUSE_OWNER_DRAWN |
aa61d352 | 361 | unsigned int 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 | { |
aa61d352 | 372 | for (unsigned int n = 0; n < 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 | 383 | void 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 | 396 | bool 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 | ||
aa61d352 | 417 | wxClientData* wxListBox::DoGetItemClientObject(unsigned int n) const |
0e320a79 | 418 | { |
dcd307ee | 419 | return (wxClientData *)DoGetItemClientData(n); |
0e320a79 DW |
420 | } |
421 | ||
aa61d352 | 422 | void* wxListBox::DoGetItemClientData(unsigned 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 | |
aa61d352 | 430 | void wxListBox::DoSetItemClientObject(unsigned int n, wxClientData* pClientData) |
0e320a79 | 431 | { |
8228b893 | 432 | DoSetItemClientData(n, pClientData); |
49dc8caa | 433 | } // end of wxListBox::DoSetItemClientObject |
dcd307ee | 434 | |
aa61d352 | 435 | void wxListBox::DoSetItemClientData(unsigned 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 | |
454 | bool wxListBox::HasMultipleSelection() const | |
455 | { | |
456 | return (m_windowStyle & wxLB_MULTIPLE) || (m_windowStyle & wxLB_EXTENDED); | |
49dc8caa | 457 | } // end of wxListBox::HasMultipleSelection |
0e320a79 | 458 | |
6670f564 | 459 | int 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 |
521 | int 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 | |
aa61d352 | 536 | wxString wxListBox::GetString(unsigned int n) const |
0e320a79 | 537 | { |
8228b893 WS |
538 | LONG lLen = 0; |
539 | wxChar* zBuf; | |
540 | wxString sResult; | |
fb9010ed | 541 | |
aa61d352 | 542 | wxCHECK_MSG( IsValid(n), wxEmptyString, |
49dc8caa | 543 | wxT("invalid index in wxListBox::GetClientData") ); |
0e320a79 | 544 | |
aa61d352 | 545 | lLen = LONGFROMMR(::WinSendMsg(GetHwnd(), LM_QUERYITEMTEXTLENGTH, (MPARAM)n, (MPARAM)0)); |
0fba44b4 | 546 | zBuf = new wxChar[lLen + 1]; |
aa61d352 | 547 | ::WinSendMsg(GetHwnd(), LM_QUERYITEMTEXT, MPFROM2SHORT((SHORT)n, (SHORT)lLen), (MPARAM)zBuf); |
49dc8caa DW |
548 | zBuf[lLen] = '\0'; |
549 | sResult = zBuf; | |
550 | delete [] zBuf; | |
551 | return sResult; | |
552 | } // end of wxListBox::GetString | |
553 | ||
aa61d352 | 554 | void wxListBox::DoInsertItems(const wxArrayString& asItems, unsigned int nPos) |
49dc8caa | 555 | { |
8228b893 | 556 | wxCHECK_RET( IsValidInsert(nPos), |
dcd307ee DW |
557 | wxT("invalid index in wxListBox::InsertItems") ); |
558 | ||
aa61d352 | 559 | unsigned int nItems = asItems.GetCount(); |
dcd307ee | 560 | |
aa61d352 | 561 | for (unsigned int i = 0; i < nItems; i++) |
3437f881 | 562 | { |
8228b893 WS |
563 | int nIndex = (int)::WinSendMsg( GetHwnd(), |
564 | LM_INSERTITEM, | |
565 | MPFROMLONG((LONG)(i + nPos)), | |
566 | (MPARAM)asItems[i].c_str() ); | |
3437f881 | 567 | |
8228b893 | 568 | wxOwnerDrawn* pNewItem = CreateItem(nIndex); |
3437f881 DW |
569 | |
570 | pNewItem->SetName(asItems[i]); | |
571 | pNewItem->SetFont(GetFont()); | |
572 | m_aItems.Insert(pNewItem, nIndex); | |
573 | ::WinSendMsg( GetHwnd() | |
574 | ,LM_SETITEMHANDLE | |
9923c37d | 575 | ,(MPARAM)((LONG)nIndex) |
3437f881 DW |
576 | ,MPFROMP(pNewItem) |
577 | ); | |
578 | m_nNumItems += nItems; | |
579 | } | |
49dc8caa | 580 | } // end of wxListBox::DoInsertItems |
dcd307ee | 581 | |
aa61d352 | 582 | void wxListBox::SetString(unsigned int n, const wxString& rsString) |
dcd307ee | 583 | { |
aa61d352 | 584 | wxCHECK_RET( IsValid(n), |
dcd307ee DW |
585 | wxT("invalid index in wxListBox::SetString") ); |
586 | ||
49dc8caa DW |
587 | // |
588 | // Remember the state of the item | |
589 | // | |
aa61d352 | 590 | bool bWasSelected = IsSelected(n); |
8228b893 WS |
591 | void* pOldData = NULL; |
592 | wxClientData* pOldObjData = NULL; | |
49dc8caa DW |
593 | |
594 | if (m_clientDataItemsType == wxClientData_Void) | |
aa61d352 | 595 | pOldData = GetClientData(n); |
49dc8caa | 596 | else if (m_clientDataItemsType == wxClientData_Object) |
aa61d352 | 597 | pOldObjData = GetClientObject(n); |
49dc8caa DW |
598 | |
599 | // | |
600 | // Delete and recreate it | |
601 | // | |
602 | ::WinSendMsg( GetHwnd() | |
603 | ,LM_DELETEITEM | |
aa61d352 | 604 | ,(MPARAM)n |
49dc8caa DW |
605 | ,(MPARAM)0 |
606 | ); | |
607 | ||
aa61d352 | 608 | int nNewN = n; |
49dc8caa | 609 | |
020e385d | 610 | if (n == (m_nNumItems - 1)) |
49dc8caa DW |
611 | nNewN = -1; |
612 | ||
613 | ::WinSendMsg( GetHwnd() | |
614 | ,LM_INSERTITEM | |
615 | ,(MPARAM)nNewN | |
616 | ,(MPARAM)rsString.c_str() | |
617 | ); | |
618 | ||
619 | // | |
620 | // Restore the client data | |
621 | // | |
622 | if (pOldData) | |
aa61d352 | 623 | SetClientData(n, pOldData); |
49dc8caa | 624 | else if (pOldObjData) |
aa61d352 | 625 | SetClientObject(n, pOldObjData); |
49dc8caa DW |
626 | |
627 | // | |
628 | // We may have lost the selection | |
629 | // | |
630 | if (bWasSelected) | |
aa61d352 | 631 | Select(n); |
dcd307ee DW |
632 | |
633 | #if wxUSE_OWNER_DRAWN | |
49dc8caa DW |
634 | if (m_windowStyle & wxLB_OWNERDRAW) |
635 | // | |
636 | // Update item's text | |
637 | // | |
aa61d352 | 638 | m_aItems[n]->SetName(rsString); |
dcd307ee | 639 | #endif //USE_OWNER_DRAWN |
49dc8caa | 640 | } // end of wxListBox::SetString |
dcd307ee | 641 | |
aa61d352 | 642 | unsigned int wxListBox::GetCount() const |
dcd307ee | 643 | { |
49dc8caa | 644 | return m_nNumItems; |
dcd307ee DW |
645 | } |
646 | ||
647 | // ---------------------------------------------------------------------------- | |
648 | // helpers | |
649 | // ---------------------------------------------------------------------------- | |
650 | ||
e78c4d50 | 651 | wxSize wxListBox::DoGetBestSize() const |
fb9010ed | 652 | { |
49dc8caa DW |
653 | // |
654 | // Find the widest string | |
655 | // | |
8228b893 WS |
656 | int nLine; |
657 | int nListbox = 0; | |
658 | int nCx; | |
659 | int nCy; | |
660 | wxFont vFont = (wxFont)GetFont(); | |
49dc8caa | 661 | |
aa61d352 | 662 | for (unsigned int i = 0; i < m_nNumItems; i++) |
fb9010ed | 663 | { |
8228b893 | 664 | wxString vStr(GetString(i)); |
49dc8caa | 665 | |
8228b893 | 666 | GetTextExtent( vStr, &nLine, NULL ); |
49dc8caa DW |
667 | if (nLine > nListbox) |
668 | nListbox = nLine; | |
fb9010ed DW |
669 | } |
670 | ||
49dc8caa DW |
671 | // |
672 | // Give it some reasonable default value if there are no strings in the | |
673 | // list. | |
674 | // | |
675 | if (nListbox == 0) | |
676 | nListbox = 100; | |
677 | ||
678 | // | |
679 | // The listbox should be slightly larger than the widest string | |
680 | // | |
681 | wxGetCharSize( GetHWND() | |
682 | ,&nCx | |
683 | ,&nCy | |
0d598bae | 684 | ,&vFont |
49dc8caa DW |
685 | ); |
686 | nListbox += 3 * nCx; | |
687 | ||
8228b893 | 688 | int hListbox = EDIT_HEIGHT_FROM_CHAR_HEIGHT(nCy) * (wxMax(m_nNumItems, 7)); |
49dc8caa DW |
689 | |
690 | return wxSize( nListbox | |
691 | ,hListbox | |
692 | ); | |
693 | } // end of wxListBox::DoGetBestSize | |
fb9010ed | 694 | |
dcd307ee DW |
695 | // ---------------------------------------------------------------------------- |
696 | // callbacks | |
697 | // ---------------------------------------------------------------------------- | |
698 | ||
49dc8caa DW |
699 | bool wxListBox::OS2Command( |
700 | WXUINT uParam | |
701 | , WXWORD WXUNUSED(wId)) | |
0e320a79 | 702 | { |
49dc8caa | 703 | wxEventType eEvtType; |
dcd307ee | 704 | |
49dc8caa DW |
705 | if (uParam == LN_SELECT) |
706 | { | |
707 | eEvtType = wxEVT_COMMAND_LISTBOX_SELECTED; | |
dcd307ee | 708 | } |
d6701f32 | 709 | else if (uParam == LN_ENTER) |
0e320a79 | 710 | { |
49dc8caa | 711 | eEvtType = wxEVT_COMMAND_LISTBOX_DOUBLECLICKED; |
0e320a79 | 712 | } |
fb9010ed | 713 | else |
49dc8caa DW |
714 | { |
715 | // | |
716 | // Some event we're not interested in | |
717 | // | |
ec157c8f | 718 | return false; |
49dc8caa DW |
719 | } |
720 | wxCommandEvent vEvent( eEvtType | |
721 | ,m_windowId | |
722 | ); | |
fb9010ed | 723 | |
49dc8caa | 724 | vEvent.SetEventObject(this); |
fb9010ed | 725 | |
8228b893 WS |
726 | wxArrayInt aSelections; |
727 | int n; | |
728 | int nCount = GetSelections(aSelections); | |
fb9010ed | 729 | |
49dc8caa DW |
730 | if (nCount > 0) |
731 | { | |
732 | n = aSelections[0]; | |
733 | if (HasClientObjectData()) | |
734 | vEvent.SetClientObject(GetClientObject(n)); | |
735 | else if ( HasClientUntypedData() ) | |
736 | vEvent.SetClientData(GetClientData(n)); | |
737 | vEvent.SetString(GetString(n)); | |
738 | } | |
739 | else | |
740 | { | |
741 | n = -1; | |
742 | } | |
687706f5 | 743 | vEvent.SetInt(n); |
49dc8caa DW |
744 | return GetEventHandler()->ProcessEvent(vEvent); |
745 | } // end of wxListBox::OS2Command | |
fb9010ed | 746 | |
dcd307ee DW |
747 | // ---------------------------------------------------------------------------- |
748 | // wxCheckListBox support | |
749 | // ---------------------------------------------------------------------------- | |
fb9010ed DW |
750 | |
751 | #if wxUSE_OWNER_DRAWN | |
752 | ||
49dc8caa DW |
753 | // |
754 | // Drawing | |
fb9010ed | 755 | // ------- |
49dc8caa | 756 | // |
fb9010ed DW |
757 | #define OWNER_DRAWN_LISTBOX_EXTRA_SPACE (1) |
758 | ||
8228b893 | 759 | long wxListBox::OS2OnMeasure(WXMEASUREITEMSTRUCT* pItem) |
fb9010ed | 760 | { |
1de4baa3 DW |
761 | if (!pItem) |
762 | pItem = (WXMEASUREITEMSTRUCT*)new OWNERITEM; | |
763 | ||
764 | POWNERITEM pMeasureStruct = (POWNERITEM)pItem; | |
765 | wxScreenDC vDc; | |
766 | ||
49dc8caa | 767 | // |
1de4baa3 | 768 | // Only owner-drawn control should receive this message |
49dc8caa | 769 | // |
1de4baa3 DW |
770 | wxCHECK( ((m_windowStyle & wxLB_OWNERDRAW) == wxLB_OWNERDRAW), FALSE ); |
771 | ||
772 | vDc.SetFont(GetFont()); | |
773 | ||
774 | wxCoord vHeight; | |
f5ea767e DW |
775 | wxCoord vWidth; |
776 | ||
777 | GetSize( &vWidth | |
778 | ,NULL | |
779 | ); | |
1de4baa3 | 780 | |
f5ea767e | 781 | pMeasureStruct->rclItem.xRight = (USHORT)vWidth; |
1de4baa3 DW |
782 | pMeasureStruct->rclItem.xLeft = 0; |
783 | pMeasureStruct->rclItem.yTop = 0; | |
784 | pMeasureStruct->rclItem.yBottom = 0; | |
785 | ||
9923c37d | 786 | vHeight = (wxCoord)(vDc.GetCharHeight() * 2.5); |
f5ea767e | 787 | pMeasureStruct->rclItem.yTop = (USHORT)vHeight; |
1de4baa3 | 788 | |
f5ea767e | 789 | return long(MRFROM2SHORT((USHORT)vHeight, (USHORT)vWidth)); |
1de4baa3 | 790 | } // end of wxListBox::OS2OnMeasure |
fb9010ed | 791 | |
1de4baa3 DW |
792 | bool wxListBox::OS2OnDraw ( |
793 | WXDRAWITEMSTRUCT* pItem | |
794 | ) | |
fb9010ed | 795 | { |
1de4baa3 DW |
796 | POWNERITEM pDrawStruct = (POWNERITEM)pItem; |
797 | LONG lItemID = pDrawStruct->idItem; | |
798 | int eAction = 0; | |
799 | int eStatus = 0; | |
800 | ||
49dc8caa | 801 | // |
1de4baa3 | 802 | // Only owner-drawn control should receive this message |
49dc8caa | 803 | // |
ec157c8f | 804 | wxCHECK(((m_windowStyle & wxLB_OWNERDRAW) == wxLB_OWNERDRAW), false); |
1de4baa3 DW |
805 | |
806 | ||
807 | // | |
808 | // The item may be -1 for an empty listbox | |
809 | // | |
810 | if (lItemID == -1L) | |
ec157c8f | 811 | return false; |
1de4baa3 DW |
812 | |
813 | wxListBoxItem* pData = (wxListBoxItem*)PVOIDFROMMR( ::WinSendMsg( GetHwnd() | |
814 | ,LM_QUERYITEMHANDLE | |
815 | ,MPFROMLONG(pDrawStruct->idItem) | |
816 | ,(MPARAM)0 | |
817 | ) | |
818 | ); | |
819 | ||
ec157c8f | 820 | wxCHECK(pData, false ); |
1de4baa3 | 821 | |
6670f564 WS |
822 | wxDC vDc; |
823 | wxPoint pt1( pDrawStruct->rclItem.xLeft, pDrawStruct->rclItem.yTop ); | |
824 | wxPoint pt2( pDrawStruct->rclItem.xRight, pDrawStruct->rclItem.yBottom ); | |
825 | wxRect vRect( pt1, pt2 ); | |
1de4baa3 DW |
826 | |
827 | vDc.SetHPS(pDrawStruct->hps); | |
828 | ||
829 | if (pDrawStruct->fsAttribute == pDrawStruct->fsAttributeOld) | |
830 | { | |
831 | // | |
832 | // Entire Item needs to be redrawn (either it has reappeared from | |
833 | // behind another window or is being displayed for the first time | |
834 | // | |
835 | eAction = wxOwnerDrawn::wxODDrawAll; | |
836 | ||
837 | if (pDrawStruct->fsAttribute & MIA_HILITED) | |
838 | { | |
839 | // | |
840 | // If it is currently selected we let the system handle it | |
841 | // | |
842 | eStatus |= wxOwnerDrawn::wxODSelected; | |
843 | } | |
844 | if (pDrawStruct->fsAttribute & MIA_CHECKED) | |
845 | { | |
846 | // | |
847 | // If it is currently checked we draw our own | |
848 | // | |
849 | eStatus |= wxOwnerDrawn::wxODChecked; | |
850 | pDrawStruct->fsAttributeOld = pDrawStruct->fsAttribute &= ~MIA_CHECKED; | |
851 | } | |
852 | if (pDrawStruct->fsAttribute & MIA_DISABLED) | |
853 | { | |
854 | // | |
855 | // If it is currently disabled we let the system handle it | |
856 | // | |
857 | eStatus |= wxOwnerDrawn::wxODDisabled; | |
858 | } | |
859 | // | |
860 | // Don't really care about framed (indicationg focus) or NoDismiss | |
861 | // | |
862 | } | |
863 | else | |
864 | { | |
865 | if (pDrawStruct->fsAttribute & MIA_HILITED) | |
866 | { | |
867 | eAction = wxOwnerDrawn::wxODDrawAll; | |
868 | eStatus |= wxOwnerDrawn::wxODSelected; | |
869 | // | |
870 | // Keep the system from trying to highlight with its bogus colors | |
871 | // | |
872 | pDrawStruct->fsAttributeOld = pDrawStruct->fsAttribute &= ~MIA_HILITED; | |
873 | } | |
874 | else if (!(pDrawStruct->fsAttribute & MIA_HILITED)) | |
875 | { | |
876 | eAction = wxOwnerDrawn::wxODDrawAll; | |
877 | eStatus = 0; | |
878 | // | |
879 | // Keep the system from trying to highlight with its bogus colors | |
880 | // | |
881 | pDrawStruct->fsAttribute = pDrawStruct->fsAttributeOld &= ~MIA_HILITED; | |
882 | } | |
883 | else | |
884 | { | |
885 | // | |
886 | // For now we don't care about anything else | |
887 | // just ignore the entire message! | |
888 | // | |
ec157c8f | 889 | return true; |
1de4baa3 DW |
890 | } |
891 | } | |
892 | return pData->OnDrawItem( vDc | |
893 | ,vRect | |
894 | ,(wxOwnerDrawn::wxODAction)eAction | |
895 | ,(wxOwnerDrawn::wxODStatus)eStatus | |
896 | ); | |
897 | } // end of wxListBox::OS2OnDraw | |
898 | ||
49dc8caa DW |
899 | #endif // ndef for wxUSE_OWNER_DRAWN |
900 | ||
8228b893 | 901 | #endif // wxUSE_LISTBOX |