]> git.saurik.com Git - wxWidgets.git/blob - src/msw/choice.cpp
menu bar wasn't set properly internally after my previous change - fixed
[wxWidgets.git] / src / msw / choice.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: choice.cpp
3 // Purpose: wxChoice
4 // Author: Julian Smart
5 // Modified by: Vadim Zeitlin to derive from wxChoiceBase
6 // Created: 04/01/98
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart and Markus Holzem
9 // Licence: wxWindows license
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ============================================================================
13 // declarations
14 // ============================================================================
15
16 // ----------------------------------------------------------------------------
17 // headers
18 // ----------------------------------------------------------------------------
19
20 #ifdef __GNUG__
21 #pragma implementation "choice.h"
22 #endif
23
24 // For compilers that support precompilation, includes "wx.h".
25 #include "wx/wxprec.h"
26
27 #ifdef __BORLANDC__
28 #pragma hdrstop
29 #endif
30
31 #if wxUSE_CHOICE
32
33 #ifndef WX_PRECOMP
34 #include "wx/choice.h"
35 #include "wx/utils.h"
36 #include "wx/log.h"
37 #include "wx/brush.h"
38 #include "wx/settings.h"
39 #endif
40
41 #include "wx/msw/private.h"
42
43 IMPLEMENT_DYNAMIC_CLASS(wxChoice, wxControl)
44
45 // ============================================================================
46 // implementation
47 // ============================================================================
48
49 // ----------------------------------------------------------------------------
50 // creation
51 // ----------------------------------------------------------------------------
52
53 bool wxChoice::Create(wxWindow *parent,
54 wxWindowID id,
55 const wxPoint& pos,
56 const wxSize& size,
57 int n, const wxString choices[],
58 long style,
59 const wxValidator& validator,
60 const wxString& name)
61 {
62 if ( !CreateControl(parent, id, pos, size, style, validator, name) )
63 return FALSE;
64
65 long msStyle = WS_CHILD | CBS_DROPDOWNLIST | WS_TABSTOP | WS_VISIBLE | WS_HSCROLL | WS_VSCROLL /* | WS_CLIPSIBLINGS */;
66 if ( style & wxCB_SORT )
67 msStyle |= CBS_SORT;
68
69 if ( style & wxCLIP_SIBLINGS )
70 msStyle |= WS_CLIPSIBLINGS;
71
72
73 // Experience shows that wxChoice vs. wxComboBox distinction confuses
74 // quite a few people - try to help them
75 wxASSERT_MSG( !(style & wxCB_DROPDOWN) &&
76 !(style & wxCB_READONLY) &&
77 !(style & wxCB_SIMPLE),
78 _T("this style flag is ignored by wxChoice, you ")
79 _T("probably want to use a wxComboBox") );
80
81 if ( !MSWCreateControl(wxT("COMBOBOX"), msStyle) )
82 return FALSE;
83
84 // A choice/combobox normally has a white background (or other, depending
85 // on global settings) rather than inheriting the parent's background colour.
86 SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_WINDOW));
87
88 for ( int i = 0; i < n; i++ )
89 {
90 Append(choices[i]);
91 }
92
93 SetSize(pos.x, pos.y, size.x, size.y);
94
95 return TRUE;
96 }
97
98 wxChoice::~wxChoice()
99 {
100 Free();
101 }
102
103 // ----------------------------------------------------------------------------
104 // adding/deleting items to/from the list
105 // ----------------------------------------------------------------------------
106
107 int wxChoice::DoAppend(const wxString& item)
108 {
109 int n = (int)SendMessage(GetHwnd(), CB_ADDSTRING, 0, (LONG)item.c_str());
110 if ( n == CB_ERR )
111 {
112 wxLogLastError(wxT("SendMessage(CB_ADDSTRING)"));
113 }
114
115 return n;
116 }
117
118 void wxChoice::Delete(int n)
119 {
120 wxCHECK_RET( n < GetCount(), wxT("invalid item index in wxChoice::Delete") );
121
122 if ( HasClientObjectData() )
123 {
124 delete GetClientObject(n);
125 }
126
127 SendMessage(GetHwnd(), CB_DELETESTRING, n, 0);
128 }
129
130 void wxChoice::Clear()
131 {
132 Free();
133
134 SendMessage(GetHwnd(), CB_RESETCONTENT, 0, 0);
135 }
136
137 void wxChoice::Free()
138 {
139 if ( HasClientObjectData() )
140 {
141 size_t count = GetCount();
142 for ( size_t n = 0; n < count; n++ )
143 {
144 delete GetClientObject(n);
145 }
146 }
147 }
148
149 // ----------------------------------------------------------------------------
150 // selection
151 // ----------------------------------------------------------------------------
152
153 int wxChoice::GetSelection() const
154 {
155 return (int)SendMessage(GetHwnd(), CB_GETCURSEL, 0, 0);
156 }
157
158 void wxChoice::SetSelection(int n)
159 {
160 SendMessage(GetHwnd(), CB_SETCURSEL, n, 0);
161 }
162
163 // ----------------------------------------------------------------------------
164 // string list functions
165 // ----------------------------------------------------------------------------
166
167 int wxChoice::GetCount() const
168 {
169 return (int)SendMessage(GetHwnd(), CB_GETCOUNT, 0, 0);
170 }
171
172 int wxChoice::FindString(const wxString& s) const
173 {
174 #if defined(__WATCOMC__) && defined(__WIN386__)
175 // For some reason, Watcom in WIN386 mode crashes in the CB_FINDSTRINGEXACT message.
176 // wxChoice::Do it the long way instead.
177 int count = GetCount();
178 for ( int i = 0; i < count; i++ )
179 {
180 // as CB_FINDSTRINGEXACT is case insensitive, be case insensitive too
181 if ( GetString(i).IsSameAs(s, FALSE) )
182 return i;
183 }
184
185 return wxNOT_FOUND;
186 #else // !Watcom
187 int pos = (int)SendMessage(GetHwnd(), CB_FINDSTRINGEXACT,
188 (WPARAM)-1, (LPARAM)s.c_str());
189
190 return pos == LB_ERR ? wxNOT_FOUND : pos;
191 #endif // Watcom/!Watcom
192 }
193
194 void wxChoice::SetString(int WXUNUSED(n), const wxString& WXUNUSED(s))
195 {
196 wxFAIL_MSG(wxT("not implemented"));
197
198 #if 0 // should do this, but no Insert() so far
199 Delete(n);
200 Insert(n + 1, s);
201 #endif
202 }
203
204 wxString wxChoice::GetString(int n) const
205 {
206 size_t len = (size_t)::SendMessage(GetHwnd(), CB_GETLBTEXTLEN, n, 0);
207 wxString str;
208 if (len) {
209 if ( ::SendMessage(GetHwnd(), CB_GETLBTEXT, n,
210 (LPARAM)str.GetWriteBuf(len)) == CB_ERR ) {
211 wxLogLastError(wxT("SendMessage(CB_GETLBTEXT)"));
212 }
213 str.UngetWriteBuf();
214 }
215
216 return str;
217 }
218
219 // ----------------------------------------------------------------------------
220 // client data
221 // ----------------------------------------------------------------------------
222
223 void wxChoice::DoSetItemClientData( int n, void* clientData )
224 {
225 if ( SendMessage(GetHwnd(), CB_SETITEMDATA, n, (LPARAM)clientData) == CB_ERR )
226 {
227 wxLogLastError(wxT("CB_SETITEMDATA"));
228 }
229 }
230
231 void* wxChoice::DoGetItemClientData( int n ) const
232 {
233 LPARAM rc = SendMessage(GetHwnd(), CB_GETITEMDATA, n, 0);
234 if ( rc == CB_ERR )
235 {
236 wxLogLastError(wxT("CB_GETITEMDATA"));
237
238 // unfortunately, there is no way to return an error code to the user
239 rc = (LPARAM) NULL;
240 }
241
242 return (void *)rc;
243 }
244
245 void wxChoice::DoSetItemClientObject( int n, wxClientData* clientData )
246 {
247 DoSetItemClientData(n, clientData);
248 }
249
250 wxClientData* wxChoice::DoGetItemClientObject( int n ) const
251 {
252 return (wxClientData *)DoGetItemClientData(n);
253 }
254
255 // ----------------------------------------------------------------------------
256 // wxMSW specific helpers
257 // ----------------------------------------------------------------------------
258
259 void wxChoice::DoMoveWindow(int x, int y, int width, int height)
260 {
261 // here is why this is necessary: if the width is negative, the combobox
262 // window proc makes the window of the size width*height instead of
263 // interpreting height in the usual manner (meaning the height of the drop
264 // down list - usually the height specified in the call to MoveWindow()
265 // will not change the height of combo box per se)
266 //
267 // this behaviour is not documented anywhere, but this is just how it is
268 // here (NT 4.4) and, anyhow, the check shouldn't hurt - however without
269 // the check, constraints/sizers using combos may break the height
270 // constraint will have not at all the same value as expected
271 if ( width < 0 )
272 return;
273
274 wxControl::DoMoveWindow(x, y, width, height);
275 }
276
277 void wxChoice::DoSetSize(int x, int y,
278 int width, int WXUNUSED(height),
279 int sizeFlags)
280 {
281 // Ignore height parameter because height doesn't mean 'initially
282 // displayed' height, it refers to the drop-down menu as well. The
283 // wxWindows interpretation is different; also, getting the size returns
284 // the _displayed_ size (NOT the drop down menu size) so
285 // setting-getting-setting size would not work.
286 wxControl::DoSetSize(x, y, width, -1, sizeFlags);
287 }
288
289 wxSize wxChoice::DoGetBestSize() const
290 {
291 // find the widest string
292 int wLine;
293 int wChoice = 0;
294 int nItems = GetCount();
295 for ( int i = 0; i < nItems; i++ )
296 {
297 wxString str(GetString(i));
298 GetTextExtent(str, &wLine, NULL);
299 if ( wLine > wChoice )
300 wChoice = wLine;
301 }
302
303 // give it some reasonable default value if there are no strings in the
304 // list
305 if ( wChoice == 0 )
306 wChoice = 100;
307
308 // the combobox should be larger than the widest string
309 int cx, cy;
310 wxGetCharSize(GetHWND(), &cx, &cy, &GetFont());
311
312 wChoice += 5*cx;
313
314 // Choice drop-down list depends on number of items (limited to 10)
315 size_t nStrings = nItems == 0 ? 10 : wxMin(10, nItems) + 1;
316 int hChoice = EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy)*nStrings;
317
318 return wxSize(wChoice, hChoice);
319 }
320
321 long wxChoice::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
322 {
323 if ( nMsg == WM_LBUTTONUP )
324 {
325 int x = (int)LOWORD(lParam);
326 int y = (int)HIWORD(lParam);
327
328 // Ok, this is truly weird, but if a panel with a wxChoice loses the
329 // focus, then you get a *fake* WM_LBUTTONUP message with x = 65535 and
330 // y = 65535. Filter out this nonsense.
331 //
332 // VZ: I'd like to know how to reproduce this please...
333 if ( x == 65535 && y == 65535 )
334 return 0;
335 }
336
337 return wxWindow::MSWWindowProc(nMsg, wParam, lParam);
338 }
339
340 bool wxChoice::MSWCommand(WXUINT param, WXWORD WXUNUSED(id))
341 {
342 if ( param != CBN_SELCHANGE)
343 {
344 // "selection changed" is the only event we're after
345 return FALSE;
346 }
347
348 int n = GetSelection();
349 if (n > -1)
350 {
351 wxCommandEvent event(wxEVT_COMMAND_CHOICE_SELECTED, m_windowId);
352 event.SetInt(n);
353 event.SetEventObject(this);
354 event.SetString(GetStringSelection());
355 if ( HasClientObjectData() )
356 event.SetClientObject( GetClientObject(n) );
357 else if ( HasClientUntypedData() )
358 event.SetClientData( GetClientData(n) );
359 ProcessCommand(event);
360 }
361
362 return TRUE;
363 }
364
365 WXHBRUSH wxChoice::OnCtlColor(WXHDC pDC, WXHWND WXUNUSED(pWnd), WXUINT WXUNUSED(nCtlColor),
366 #if wxUSE_CTL3D
367 WXUINT message,
368 WXWPARAM wParam,
369 WXLPARAM lParam
370 #else
371 WXUINT WXUNUSED(message),
372 WXWPARAM WXUNUSED(wParam),
373 WXLPARAM WXUNUSED(lParam)
374 #endif
375 )
376 {
377 #if wxUSE_CTL3D
378 if ( m_useCtl3D )
379 {
380 HBRUSH hbrush = Ctl3dCtlColorEx(message, wParam, lParam);
381 return (WXHBRUSH) hbrush;
382 }
383 #endif // wxUSE_CTL3D
384
385 HDC hdc = (HDC)pDC;
386 if (GetParent()->GetTransparentBackground())
387 SetBkMode(hdc, TRANSPARENT);
388 else
389 SetBkMode(hdc, OPAQUE);
390
391 wxColour colBack = GetBackgroundColour();
392
393 if (!IsEnabled())
394 colBack = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_3DFACE);
395
396 ::SetBkColor(hdc, wxColourToRGB(colBack));
397 ::SetTextColor(hdc, wxColourToRGB(GetForegroundColour()));
398
399 wxBrush *brush = wxTheBrushList->FindOrCreateBrush(colBack, wxSOLID);
400
401 return (WXHBRUSH)brush->GetResourceHandle();
402 }
403
404 #endif // wxUSE_CHOICE