src/os2/combobox.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/os2/combobox.cpp
   3 // Purpose:     wxComboBox class
   4 // Author:      David Webster
   5 // Modified by:
   6 // Created:     10/13/99
   7 // Copyright:   (c) David Webster
   8 // Licence:     wxWindows licence
   9 /////////////////////////////////////////////////////////////////////////////
  10
  11 // For compilers that support precompilation, includes "wx.h".
  12 #include "wx/wxprec.h"
  13
  14 #if wxUSE_COMBOBOX
  15
  16 #include "wx/combobox.h"
  17
  18 #ifndef WX_PRECOMP
  19     #include "wx/settings.h"
  20 #endif
  21
  22 #include "wx/clipbrd.h"
  23 #include "wx/os2/private.h"
  24
  25 #define OWNER_DRAWN_LISTBOX_EXTRA_SPACE    (1)
  26
  27 MRESULT EXPENTRY wxComboEditWndProc( HWND   hWnd
  28                                     ,UINT   uMessage
  29                                     ,MPARAM wParam
  30                                     ,MPARAM lParam
  31                                    );
  32 //
  33 // The pointer to standard wnd proc
  34 //
  35 static WXFARPROC gfnWndprocEdit     = (WXFARPROC)NULL;
  36
  37 bool wxComboBox::OS2Command( WXUINT uParam, WXWORD WXUNUSED(wId) )
  38 {
  39     long lSel = GetSelection();
  40     wxString sValue;
  41
  42     switch (uParam)
  43     {
  44         case CBN_LBSELECT:
  45             if (lSel > -1)
  46             {
  47                 wxCommandEvent vEvent( wxEVT_COMBOBOX, GetId() );
  48
  49                 vEvent.SetInt(lSel);
  50                 vEvent.SetEventObject(this);
  51                 vEvent.SetString(GetStringSelection());
  52
  53                 ProcessCommand(vEvent);
  54             }
  55             break;
  56
  57         case CBN_EFCHANGE:
  58             {
  59                 wxCommandEvent vEvent( wxEVT_TEXT, GetId() );
  60
  61                 if (lSel == -1L)
  62                     sValue = GetValue();
  63                 else
  64                     sValue = GetStringSelection();
  65                 vEvent.SetString(sValue);
  66                 vEvent.SetEventObject(this);
  67                 ProcessCommand(vEvent);
  68             }
  69             break;
  70     }
  71     //
  72     // There is no return value for the CBN_ notifications, so always return
  73     // false from here to pass the message to DefWindowProc()
  74     //
  75     return false;
  76 } // end of wxComboBox::OS2Command
  77
  78 bool wxComboBox::Create(
  79   wxWindow*                         pParent
  80 , wxWindowID                        vId
  81 , const wxString&                   rsValue
  82 , const wxPoint&                    rPos
  83 , const wxSize&                     rSize
  84 , const wxArrayString&              asChoices
  85 , long                              lStyle
  86 , const wxValidator&                rValidator
  87 , const wxString&                   rsName
  88 )
  89 {
  90     wxCArrayString chs(asChoices);
  91
  92     return Create(pParent, vId, rsValue, rPos, rSize, chs.GetCount(),
  93                   chs.GetStrings(), lStyle, rValidator, rsName);
  94 }
  95
  96 bool wxComboBox::Create(
  97   wxWindow*                         pParent
  98 , wxWindowID                        vId
  99 , const wxString&                   rsValue
 100 , const wxPoint&                    rPos
 101 , const wxSize&                     rSize
 102 , int                               n
 103 , const wxString                    asChoices[]
 104 , long                              lStyle
 105 , const wxValidator&                rValidator
 106 , const wxString&                   rsName
 107 )
 108 {
 109     m_isShown = false;
 110
 111     if (!CreateControl( pParent
 112                        ,vId
 113                        ,rPos
 114                        ,rSize
 115                        ,lStyle
 116                        ,rValidator
 117                        ,rsName
 118                       ))
 119         return false;
 120
 121     //
 122     // Get the right style
 123     //
 124     long                            lSstyle = 0L;
 125
 126     lSstyle = WS_TABSTOP   |
 127               WS_VISIBLE;
 128
 129     // clipping siblings does not yet work
 130     // if (lStyle & wxCLIP_SIBLINGS )
 131     //     lSstyle |= WS_CLIPSIBLINGS;
 132     if (lStyle & wxCB_READONLY)
 133         lSstyle |= CBS_DROPDOWNLIST;
 134     else if (lStyle & wxCB_SIMPLE)
 135         lSstyle |= CBS_SIMPLE; // A list (shown always) and edit control
 136     else
 137         lSstyle |= CBS_DROPDOWN;
 138
 139
 140     if (!OS2CreateControl( wxT("COMBOBOX")
 141                           ,lSstyle
 142                          ))
 143         return false;
 144
 145     //
 146     // A choice/combobox normally has a white background (or other, depending
 147     // on global settings) rather than inheriting the parent's background colour.
 148     //
 149     SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW));
 150
 151     for (int i = 0; i < n; i++)
 152     {
 153         Append(asChoices[i]);
 154     }
 155
 156     SetSize( rPos.x
 157             ,rPos.y
 158             ,rSize.x
 159             ,rSize.y
 160            );
 161
 162     // Set height to use with sizers i.e. without the dropdown listbox
 163     wxFont vFont = GetFont();
 164     int nEditHeight;
 165     wxGetCharSize( GetHWND(), NULL, &nEditHeight, &vFont );
 166     nEditHeight = EDIT_HEIGHT_FROM_CHAR_HEIGHT(nEditHeight);
 167     SetInitialSize(wxSize(-1,nEditHeight+4));   // +2x2 for the border
 168
 169     if (!rsValue.empty())
 170     {
 171         SetValue(rsValue);
 172     }
 173     gfnWndprocEdit = (WXFARPROC)::WinSubclassWindow( (HWND)GetHwnd()
 174                                                     ,(PFNWP)wxComboEditWndProc
 175                                                    );
 176     ::WinSetWindowULong(GetHwnd(), QWL_USER, (ULONG)this);
 177     Show(true);
 178     return true;
 179 } // end of wxComboBox::Create
 180
 181 wxString wxComboBox::GetValue() const
 182 {
 183     return HasFlag(wxCB_READONLY) ? GetStringSelection()
 184                                   : wxTextEntry::GetValue();
 185 }
 186
 187 void wxComboBox::SetValue(const wxString& value)
 188 {
 189     if ( HasFlag(wxCB_READONLY) )
 190         SetStringSelection(value);
 191     else
 192         wxTextEntry::SetValue(value);
 193 }
 194
 195 void wxComboBox::Clear()
 196 {
 197     wxChoice::Clear();
 198     if ( !HasFlag(wxCB_READONLY) )
 199         wxTextEntry::Clear();
 200 }
 201
 202 bool wxComboBox::IsEditable() const
 203 {
 204     return !HasFlag(wxCB_READONLY) && wxTextEntry::IsEditable();
 205 }
 206
 207 bool wxComboBox::ProcessEditMsg(
 208   WXUINT                            uMsg
 209 , WXWPARAM                          wParam
 210 , WXLPARAM                          lParam)
 211 {
 212     SHORT                           vFlag;
 213     switch (uMsg)
 214     {
 215         case WM_CHAR:
 216             vFlag = SHORT1FROMMP(wParam);
 217             switch(vFlag)
 218             {
 219                 case KC_CHAR:
 220                     return (HandleChar( wParam
 221                                        ,lParam
 222                                        ,true /* isASCII */
 223                                       ));
 224
 225                 case KC_PREVDOWN:
 226                     return (HandleKeyDown( wParam
 227                                           ,lParam
 228                                          ));
 229
 230                 case KC_KEYUP:
 231                     return (HandleKeyUp( wParam
 232                                         ,lParam
 233                                        ));
 234             }
 235             break;
 236
 237         case WM_SETFOCUS:
 238             if (SHORT1FROMMP((MPARAM)lParam) == TRUE)
 239                 return(HandleSetFocus((WXHWND)(HWND)wParam));
 240             else
 241                 return(HandleKillFocus((WXHWND)(HWND)wParam));
 242     }
 243     return false;
 244 } // end of wxComboBox::ProcessEditMsg
 245
 246 MRESULT EXPENTRY wxComboEditWndProc(
 247   HWND                              hWnd
 248 , UINT                              uMessage
 249 , MPARAM                            wParam
 250 , MPARAM                            lParam
 251 )
 252 {
 253     switch (uMessage)
 254     {
 255         //
 256         // Forward some messages to the combobox
 257         //
 258         case WM_SETFOCUS:
 259         case WM_CHAR:
 260             {
 261                 wxComboBox* pCombo = (wxComboBox *)::WinQueryWindowULong( hWnd
 262                                                                          ,QWL_USER
 263                                                                         );
 264
 265                 if (pCombo->ProcessEditMsg( uMessage
 266                                            ,wParam
 267                                            ,lParam
 268                                           ))
 269                     return ((MRESULT)0);
 270             }
 271             break;
 272
 273         //
 274         // TODO: Deal with tooltips here
 275         //
 276     }
 277     return (gfnWndprocEdit(hWnd, (ULONG)uMessage, (MPARAM)wParam, (MPARAM)lParam));
 278 } // end of wxComboEditWndProc
 279
 280 #endif
 281  // wxUSE_COMBOBOX