src/msw/choice.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        choice.cpp
   3 // Purpose:     wxChoice
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart and Markus Holzem
   9 // Licence:     wxWindows license
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation "choice.h"
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __BORLANDC__
  20 #pragma hdrstop
  21 #endif
  22
  23 #ifndef WX_PRECOMP
  24 #include "wx/choice.h"
  25 #endif
  26
  27 #include "wx/msw/private.h"
  28
  29 #if !USE_SHARED_LIBRARY
  30 IMPLEMENT_DYNAMIC_CLASS(wxChoice, wxControl)
  31 #endif
  32
  33 bool wxChoice::MSWCommand(WXUINT param, WXWORD WXUNUSED(id))
  34 {
  35   if (param == CBN_SELCHANGE)
  36   {
  37     wxCommandEvent event(wxEVENT_TYPE_CHOICE_COMMAND, m_windowId);
  38     event.SetInt(GetSelection());
  39     event.SetEventObject(this);
  40     event.SetString(copystring(GetStringSelection()));
  41     ProcessCommand(event);
  42     delete[] event.GetString();
  43     return TRUE;
  44   }
  45   else return FALSE;
  46 }
  47
  48 bool wxChoice::Create(wxWindow *parent, wxWindowID id,
  49            const wxPoint& pos,
  50            const wxSize& size,
  51                    int n, const wxString choices[],
  52                    long style,
  53            const wxValidator& validator,
  54            const wxString& name)
  55 {
  56   SetName(name);
  57   SetValidator(validator);
  58   if (parent) parent->AddChild(this);
  59   SetBackgroundColour(parent->GetDefaultBackgroundColour()) ;
  60   SetForegroundColour(parent->GetDefaultForegroundColour()) ;
  61   no_strings = n;
  62
  63   m_windowStyle = style;
  64
  65   if ( id == -1 )
  66         m_windowId = (int)NewControlId();
  67   else
  68         m_windowId = id;
  69
  70   int x = pos.x;
  71   int y = pos.y;
  72   int width = size.x;
  73   int height = size.y;
  74
  75   long msStyle = WS_CHILD | CBS_DROPDOWNLIST | WS_HSCROLL | WS_VSCROLL
  76                    | WS_TABSTOP | WS_VISIBLE;
  77   if (m_windowStyle & wxCB_SORT)
  78     msStyle |= CBS_SORT;
  79
  80   bool want3D;
  81   WXDWORD exStyle = Determine3DEffects(WS_EX_CLIENTEDGE, &want3D) ;
  82
  83   // Even with extended styles, need to combine with WS_BORDER
  84   // for them to look right.
  85   if (want3D || (m_windowStyle & wxSIMPLE_BORDER) || (m_windowStyle & wxRAISED_BORDER) ||
  86        (m_windowStyle & wxSUNKEN_BORDER) || (m_windowStyle & wxDOUBLE_BORDER))
  87     msStyle |= WS_BORDER;
  88
  89   HWND wx_combo = CreateWindowEx(exStyle, "COMBOBOX", NULL,
  90                    msStyle,
  91                    0, 0, 0, 0, (HWND) parent->GetHWND(), (HMENU)m_windowId,
  92                    wxGetInstance(), NULL);
  93 /*
  94 #if CTL3D
  95   if (want3D)
  96   {
  97     m_useCtl3D = TRUE;
  98     Ctl3dSubclassCtl(wx_combo); // Does CTL3D affect the combobox? I think not.
  99   }
 100 #endif
 101 */
 102
 103   m_hWnd = (WXHWND) wx_combo;
 104
 105   // Subclass again for purposes of dialog editing mode
 106   SubclassWin((WXHWND) wx_combo);
 107
 108   SetFont(* parent->GetFont());
 109
 110   int i;
 111   for (i = 0; i < n; i++)
 112     SendMessage(wx_combo, CB_INSERTSTRING, i, (LONG)(const char *)choices[i]);
 113   SendMessage(wx_combo, CB_SETCURSEL, i, 0);
 114
 115   SetSize(x, y, width, height);
 116
 117   return TRUE;
 118 }
 119
 120 void wxChoice::Append(const wxString& item)
 121 {
 122   SendMessage((HWND) GetHWND(), CB_ADDSTRING, 0, (LONG)(const char *)item);
 123
 124   no_strings ++;
 125 }
 126
 127 void wxChoice::Delete(int n)
 128 {
 129   no_strings = (int)SendMessage((HWND) GetHWND(), CB_DELETESTRING, n, 0);
 130 }
 131
 132 void wxChoice::Clear(void)
 133 {
 134   SendMessage((HWND) GetHWND(), CB_RESETCONTENT, 0, 0);
 135
 136   no_strings = 0;
 137 }
 138
 139
 140 int wxChoice::GetSelection(void) const
 141 {
 142   return (int)SendMessage((HWND) GetHWND(), CB_GETCURSEL, 0, 0);
 143 }
 144
 145 void wxChoice::SetSelection(int n)
 146 {
 147   SendMessage((HWND) GetHWND(), CB_SETCURSEL, n, 0);
 148 }
 149
 150 int wxChoice::FindString(const wxString& s) const
 151 {
 152 #if defined(__WATCOMC__) && defined(__WIN386__)
 153   // For some reason, Watcom in WIN386 mode crashes in the CB_FINDSTRINGEXACT message.
 154   // Do it the long way instead.
 155   char buf[512];
 156   for (int i = 0; i < Number(); i++)
 157   {
 158     int len = (int)SendMessage((HWND) GetHWND(), CB_GETLBTEXT, i, (LPARAM)(LPSTR)buf);
 159     buf[len] = 0;
 160     if (strcmp(buf, (const char *)s) == 0)
 161       return i;
 162   }
 163   return -1;
 164 #else
 165  int pos = (int)SendMessage((HWND) GetHWND(), CB_FINDSTRINGEXACT, (WPARAM)-1, (LPARAM)(LPSTR)(const char *)s);
 166  if (pos == LB_ERR)
 167    return -1;
 168  else
 169    return pos;
 170 #endif
 171 }
 172
 173 wxString wxChoice::GetString(int n) const
 174 {
 175   int len = (int)SendMessage((HWND) GetHWND(), CB_GETLBTEXT, n, (long)wxBuffer);
 176   wxBuffer[len] = 0;
 177   return wxString(wxBuffer);
 178 }
 179
 180 void wxChoice::SetSize(int x, int y, int width, int height, int sizeFlags)
 181 {
 182   int currentX, currentY;
 183   GetPosition(&currentX, &currentY);
 184
 185   int x1 = x;
 186   int y1 = y;
 187   int w1 = width;
 188   int h1 = height;
 189
 190   if (x == -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
 191     x1 = currentX;
 192   if (y == -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
 193     y1 = currentY;
 194
 195   // If we're prepared to use the existing size, then...
 196   if (width == -1 && height == -1 && ((sizeFlags & wxSIZE_AUTO) != wxSIZE_AUTO))
 197   {
 198     GetSize(&w1, &h1);
 199   }
 200
 201   int cx; // button font dimensions
 202   int cy;
 203   wxGetCharSize(GetHWND(), &cx, &cy, GetFont());
 204
 205   float control_width, control_height;
 206
 207   // Ignore height parameter because height doesn't
 208   // mean 'initially displayed' height, it refers to the
 209   // drop-down menu as well. The wxWindows interpretation
 210   // is different; also, getting the size returns the
 211   // _displayed_ size (NOT the drop down menu size)
 212   // so setting-getting-setting size would not work.
 213   h1 = -1;
 214
 215   // Deal with default size (using -1 values)
 216   if (width <= 0)
 217   {
 218     // Find the longest string
 219     if (no_strings == 0)
 220       control_width = (float)100.0;
 221     else
 222     {
 223       int len, ht;
 224       float longest = (float)0.0;
 225       int i;
 226       for (i = 0; i < no_strings; i++)
 227       {
 228         wxString str(GetString(i));
 229         GetTextExtent(str, &len, &ht, NULL, NULL,GetFont());
 230         if ( len > longest) longest = len;
 231       }
 232
 233       control_width = (float)(int)(longest + cx*5);
 234     }
 235   }
 236
 237   // Choice drop-down list depends on number of items (limited to 10)
 238   if (h1 <= 0)
 239   {
 240     if (no_strings == 0)
 241       h1 = (int)(EDIT_CONTROL_FACTOR*cy*10.0);
 242     else h1 = (int)(EDIT_CONTROL_FACTOR*cy*(wxMin(10, no_strings) + 1));
 243   }
 244
 245   // If non-default width...
 246   if (width >= 0)
 247     control_width = (float)width;
 248
 249   control_height = (float)h1;
 250
 251   // Calculations may have made text size too small
 252   if (control_height <= 0)
 253     control_height = (float)(int)(cy*EDIT_CONTROL_FACTOR) ;
 254
 255   if (control_width <= 0)
 256     control_width = (float)100.0;
 257
 258   MoveWindow((HWND) GetHWND(), x1, y1,
 259                               (int)control_width, (int)control_height, TRUE);
 260 }
 261
 262 WXHBRUSH wxChoice::OnCtlColor(WXHDC pDC, WXHWND pWnd, WXUINT nCtlColor,
 263                         WXUINT message, WXWPARAM wParam, WXLPARAM lParam)
 264 {
 265         return 0;
 266 }
 267
 268 long wxChoice::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
 269 {
 270     switch (nMsg)
 271     {
 272 /*
 273       case WM_GETDLGCODE:
 274       {
 275         if (GetWindowStyleFlag() & wxPROCESS_ENTER)
 276           return DLGC_WANTALLKEYS;
 277         break;
 278       }
 279 */
 280 /*
 281       case WM_CHAR: // Always an ASCII character
 282       {
 283         if (wParam == VK_RETURN)
 284         {
 285           wxCommandEvent event(wxEVENT_TYPE_TEXT_ENTER_COMMAND);
 286           event.commandString = ((wxTextCtrl *)item)->GetValue();
 287           event.eventObject = item;
 288           item->ProcessCommand(event);
 289           return FALSE;
 290         }
 291         break;
 292       }
 293 */
 294       case WM_LBUTTONUP:
 295       {
 296         int x = (int)LOWORD(lParam);
 297         int y = (int)HIWORD(lParam);
 298
 299        // Ok, this is truly weird, but if a panel with a wxChoice loses the
 300        // focus, then you get a *fake* WM_LBUTTONUP message
 301        // with x = 65535 and y = 65535.
 302        // Filter out this nonsense.
 303        if (x == 65535 && y == 65535)
 304          return Default();
 305        break;
 306       }
 307     }
 308
 309   return wxWindow::MSWWindowProc(nMsg, wParam, lParam);
 310 }
 311
 312 wxString wxChoice::GetStringSelection (void) const
 313 {
 314   int sel = GetSelection ();
 315   if (sel > -1)
 316     return wxString(this->GetString (sel));
 317   else
 318     return wxString("");
 319 }
 320
 321 bool wxChoice::SetStringSelection (const wxString& s)
 322 {
 323   int sel = FindString (s);
 324   if (sel > -1)
 325     {
 326       SetSelection (sel);
 327       return TRUE;
 328     }
 329   else
 330     return FALSE;
 331 }
 332
 333 void wxChoice::Command(wxCommandEvent & event)
 334 {
 335   SetSelection (event.GetInt());
 336   ProcessCommand (event);
 337 }
 338
 339
 340