1 /////////////////////////////////////////////////////////////////////////////
4 // Author: David Webster
8 // Copyright: (c) David Webster
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 // For compilers that support precompilation, includes "wx.h".
13 #include "wx/wxprec.h"
16 #include "wx/choice.h"
21 #include "wx/os2/private.h"
23 #if !USE_SHARED_LIBRARY
24 IMPLEMENT_DYNAMIC_CLASS(wxChoice
, wxControl
)
27 bool wxChoice::Create(wxWindow
*parent
,
31 int n
, const wxString choices
[],
33 const wxValidator
& validator
,
36 if ( !CreateControl(parent
, id
, pos
, size
, style
, validator
, name
) )
40 long msStyle = WS_CHILD | CBS_DROPDOWNLIST | WS_TABSTOP | WS_VISIBLE | WS_HSCROLL | WS_VSCROLL;
41 if ( style & wxCB_SORT )
44 // the experience shows that wxChoice vs. wxComboBox distinction confuses
45 // quite a few people - try to help them
46 wxASSERT_MSG( !(style & wxCB_DROPDOWN) &&
47 !(style & wxCB_READONLY) &&
48 !(style & wxCB_SIMPLE),
49 wxT("this style flag is ignored by wxChoice, you "
50 "probably want to use a wxComboBox") );
52 if ( !OS2CreateControl(wxT("COMBOBOX"), msStyle) )
55 for ( int i = 0; i < n; i++ )
60 SetSize(pos
.x
, pos
.y
, size
.x
, size
.y
);
65 // ----------------------------------------------------------------------------
66 // adding/deleting items to/from the list
67 // ----------------------------------------------------------------------------
69 int wxChoice::DoAppend(const wxString
& item
)
73 int n = (int)SendMessage(GetHwnd(), CB_ADDSTRING, 0, (LONG)item.c_str());
76 wxLogLastError("SendMessage(CB_ADDSTRING)");
82 void wxChoice::Delete(int n
)
84 wxCHECK_RET( n
< GetCount(), wxT("invalid item index in wxChoice::Delete") );
86 // TODO: SendMessage(GetHwnd(), CB_DELETESTRING, n, 0);
89 void wxChoice::Clear()
91 // TODO: SendMessage(GetHwnd(), CB_RESETCONTENT, 0, 0);
94 // ----------------------------------------------------------------------------
96 // ----------------------------------------------------------------------------
98 int wxChoice::GetSelection() const
100 // TODO: return (int)SendMessage(GetHwnd(), CB_GETCURSEL, 0, 0);
104 void wxChoice::SetSelection(int n
)
106 // TODO: SendMessage(GetHwnd(), CB_SETCURSEL, n, 0);
109 // ----------------------------------------------------------------------------
110 // string list functions
111 // ----------------------------------------------------------------------------
113 int wxChoice::GetCount() const
115 // TODO: return (int)SendMessage(GetHwnd(), CB_GETCOUNT, 0, 0);
119 int wxChoice::FindString(const wxString
& s
) const
123 int pos = (int)SendMessage(GetHwnd(), CB_FINDSTRINGEXACT,
124 (WPARAM)-1, (LPARAM)s.c_str());
126 return pos == LB_ERR ? wxNOT_FOUND : pos;
131 wxString
wxChoice::GetString(int n
) const
133 size_t len
= 0; // TODO: (size_t)::SendMessage(GetHwnd(), CB_GETLBTEXTLEN, n, 0);
138 if ( ::SendMessage(GetHwnd(), CB_GETLBTEXT, n,
139 (LPARAM)str.GetWriteBuf(len)) == CB_ERR ) {
140 wxLogLastError("SendMessage(CB_GETLBTEXT)");
148 // ----------------------------------------------------------------------------
150 // ----------------------------------------------------------------------------
152 void wxChoice::DoSetClientData( int n
, void* clientData
)
156 if ( SendMessage(GetHwnd(), CB_SETITEMDATA, n, (LPARAM)clientData) == CB_ERR )
158 wxLogLastError(wxT("CB_SETITEMDATA"));
163 void* wxChoice::DoGetClientData( int n
) const
167 LPARAM rc = SendMessage(GetHwnd(), CB_GETITEMDATA, n, 0);
170 wxLogLastError(wxT("CB_GETITEMDATA"));
172 // unfortunately, there is no way to return an error code to the user
181 void wxChoice::DoSetClientObject( int n
, wxClientData
* clientData
)
183 DoSetClientData(n
, clientData
);
186 wxClientData
* wxChoice::DoGetClientObject( int n
) const
188 // TODO: return (wxClientData *)DoGetClientData(n);
192 // ----------------------------------------------------------------------------
193 // wxOS2 specific helpers
194 // ----------------------------------------------------------------------------
196 void wxChoice::DoSetSize(int x
, int y
,
197 int width
, int height
,
200 // Ignore height parameter because height doesn't mean 'initially
201 // displayed' height, it refers to the drop-down menu as well. The
202 // wxWindows interpretation is different; also, getting the size returns
203 // the _displayed_ size (NOT the drop down menu size) so
204 // setting-getting-setting size would not work.
205 wxControl::DoSetSize(x
, y
, width
, -1, sizeFlags
);
208 wxSize
wxChoice::DoGetBestSize()
210 // find the widest string
213 int nItems
= GetCount();
214 for ( int i
= 0; i
< nItems
; i
++ )
216 wxString
str(GetString(i
));
217 GetTextExtent(str
, &wLine
, NULL
);
218 if ( wLine
> wChoice
)
222 // give it some reasonable default value if there are no strings in the
227 // the combobox should be larger than the widest string
229 wxGetCharSize(GetHWND(), &cx
, &cy
, &GetFont());
233 // Choice drop-down list depends on number of items (limited to 10)
234 size_t nStrings
= nItems
== 0 ? 10 : wxMin(10, nItems
) + 1;
235 int hChoice
= EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy
)*nStrings
;
237 return wxSize(wChoice
, hChoice
);
240 MRESULT
wxChoice::OS2WindowProc(HWND hwnd
, WXUINT nMsg
, WXWPARAM wParam
, WXLPARAM lParam
)
244 if ( nMsg == WM_LBUTTONUP )
246 int x = (int)LOWORD(lParam);
247 int y = (int)HIWORD(lParam);
249 // Ok, this is truly weird, but if a panel with a wxChoice loses the
250 // focus, then you get a *fake* WM_LBUTTONUP message with x = 65535 and
251 // y = 65535. Filter out this nonsense.
253 // VZ: I'd like to know how to reproduce this please...
254 if ( x == 65535 && y == 65535 )
258 return wxWindow::OS2WindowProc(hwnd
, nMsg
, wParam
, lParam
);
261 bool wxChoice::OS2Command(WXUINT param
, WXWORD
WXUNUSED(id
))
265 if ( param != CBN_SELCHANGE)
267 // "selection changed" is the only event we're after
271 wxCommandEvent
event(wxEVT_COMMAND_CHOICE_SELECTED
, m_windowId
);
272 event
.SetInt(GetSelection());
273 event
.SetEventObject(this);
274 // TODO: event.SetString(GetStringSelection());
275 ProcessCommand(event
);