controls/combo.c

   1 /*
   2  * Combo controls
   3  *
   4  * Copyright 1993 Martin Ayotte
   5  * Copyright 1995 Bernd Schmidt
   6  * Copyright 1996 Albrecht Kleine  [some fixes]
   7  *
   8  */
   9
  10 #include <stdio.h>
  11 #include <stdlib.h>
  12 #include <string.h>
  13 #include <sys/types.h>
  14 #include <sys/stat.h>
  15
  16 #include "windows.h"
  17 #include "sysmetrics.h"
  18 #include "combo.h"
  19 #include "stackframe.h"
  20 #include "user.h"
  21 #include "win.h"
  22 #include "graphics.h"
  23 #include "heap.h"
  24 #include "listbox.h"
  25 #include "dos_fs.h"
  26 #include "drive.h"
  27 #include "stddebug.h"
  28 #include "debug.h"
  29 #include "xmalloc.h"
  30
  31  /*
  32   * Note: Combos are probably implemented in a different way by Windows.
  33   * Using a message spy for Windows, you can see some undocumented
  34   * messages being passed between ComboBox and ComboLBox.
  35   * I hope no programs rely on the implementation of combos.
  36   */
  37
  38 #define ID_EDIT  1
  39 #define ID_CLB   2
  40 #define CBLMM_EDGE   4    /* distance inside box which is same as moving mouse
  41                              outside box, to trigger scrolling of CBL */
  42
  43 static BOOL CBCheckSize(HWND hwnd);
  44 static BOOL CBLCheckSize(HWND hwnd);
  45
  46 static HBITMAP hComboBit = 0;
  47 static WORD CBitHeight, CBitWidth;
  48
  49 static int COMBO_Init()
  50 {
  51   BITMAP bm;
  52
  53   dprintf_combo(stddeb, "COMBO_Init\n");
  54   hComboBit = LoadBitmap(0, MAKEINTRESOURCE(OBM_COMBO));
  55   GetObject(hComboBit, sizeof(BITMAP), (LPSTR)&bm);
  56   CBitHeight = bm.bmHeight;
  57   CBitWidth = bm.bmWidth;
  58   return 0;
  59 }
  60
  61 LPHEADCOMBO ComboGetStorageHeader(HWND hwnd)
  62 {
  63   return (LPHEADCOMBO)GetWindowLong(hwnd,4);
  64 }
  65
  66 LPHEADLIST ComboGetListHeader(HWND hwnd)
  67 {
  68   return (LPHEADLIST)GetWindowLong(hwnd,0);
  69 }
  70
  71 int CreateComboStruct(HWND hwnd, LONG style)
  72 {
  73   LPHEADCOMBO lphc;
  74
  75   lphc = (LPHEADCOMBO)xmalloc(sizeof(HEADCOMBO));
  76   SetWindowLong32A(hwnd,4,(LONG)lphc);
  77   lphc->hWndEdit = 0;
  78   lphc->hWndLBox = 0;
  79   lphc->dwState = 0;
  80   lphc->LastSel = -1;
  81   lphc->dwStyle = style;
  82   lphc->DropDownVisible = FALSE;
  83   return TRUE;
  84 }
  85
  86 void ComboUpdateWindow(HWND hwnd, LPHEADLIST lphl, LPHEADCOMBO lphc, BOOL repaint)
  87 {
  88   WND *wndPtr = WIN_FindWndPtr(hwnd);
  89
  90   if (wndPtr->dwStyle & WS_VSCROLL)
  91     SetScrollRange(lphc->hWndLBox,SB_VERT,0,ListMaxFirstVisible(lphl),TRUE);
  92   if (repaint && lphl->bRedrawFlag) InvalidateRect32( hwnd, NULL, TRUE );
  93 }
  94
  95 /***********************************************************************
  96  *           CBNCCreate
  97  */
  98 static LRESULT CBNCCreate(HWND hwnd, WPARAM wParam, LPARAM lParam)
  99 {
 100   CREATESTRUCT16 *createStruct;
 101
 102   if (!hComboBit) COMBO_Init();
 103
 104   createStruct = (CREATESTRUCT16 *)PTR_SEG_TO_LIN(lParam);
 105   createStruct->style |= WS_BORDER;
 106   SetWindowLong32A(hwnd, GWL_STYLE, createStruct->style);
 107
 108   dprintf_combo(stddeb,"ComboBox WM_NCCREATE!\n");
 109   return DefWindowProc16(hwnd, WM_NCCREATE, wParam, lParam);
 110
 111 }
 112
 113 /***********************************************************************
 114  *           CBCreate
 115  */
 116 static LRESULT CBCreate(HWND hwnd, WPARAM wParam, LPARAM lParam)
 117 {
 118   LPHEADLIST   lphl;
 119   LPHEADCOMBO  lphc;
 120   LONG         style = 0;
 121   LONG         cstyle = GetWindowLong(hwnd,GWL_STYLE);
 122   RECT16       rect,lboxrect;
 123   WND*         wndPtr = WIN_FindWndPtr(hwnd);
 124   char className[] = "COMBOLBOX";  /* Hack so that class names are > 0x10000 */
 125   char editName[] = "EDIT";
 126   HWND hwndp=0;
 127
 128   /* translate combo into listbox styles */
 129   cstyle |= WS_BORDER;
 130   if (cstyle & CBS_OWNERDRAWFIXED) style |= LBS_OWNERDRAWFIXED;
 131   if (cstyle & CBS_OWNERDRAWVARIABLE) style |= LBS_OWNERDRAWVARIABLE;
 132   if (cstyle & CBS_SORT) style |= LBS_SORT;
 133   if (cstyle & CBS_HASSTRINGS) style |= LBS_HASSTRINGS;
 134   style |= LBS_NOTIFY;
 135   CreateListBoxStruct(hwnd, ODT_COMBOBOX, style, GetParent(hwnd));
 136   CreateComboStruct(hwnd,cstyle);
 137
 138   lphl = ComboGetListHeader(hwnd);
 139   lphc = ComboGetStorageHeader(hwnd);
 140
 141   GetClientRect16(hwnd,&rect);
 142   lphc->LBoxTop = lphl->StdItemHeight;
 143
 144   switch(cstyle & 3)
 145   {
 146    case CBS_SIMPLE:            /* edit control, list always visible  */
 147      lboxrect=rect;
 148      dprintf_combo(stddeb,"CBS_SIMPLE\n");
 149      style= WS_BORDER |  WS_CHILD | WS_VISIBLE | WS_VSCROLL;
 150      SetRectEmpty16(&lphc->RectButton);
 151      hwndp=hwnd;
 152      break;
 153
 154    case CBS_DROPDOWNLIST:      /* static control, dropdown listbox   */
 155    case CBS_DROPDOWN:          /* edit control, dropdown listbox     */
 156      GetWindowRect16(hwnd,&lboxrect);
 157      style = WS_POPUP | WS_BORDER | WS_VSCROLL;
 158      /* FIXME: WinSight says these should be CHILD windows with the TOPMOST flag
 159       * set. Wine doesn't support TOPMOST, and simply setting the WS_CHILD
 160       * flag doesn't work. */
 161      lphc->RectButton = rect;
 162      lphc->RectButton.left = lphc->RectButton.right - 6 - CBitWidth;
 163      lphc->RectButton.bottom = lphc->RectButton.top + lphl->StdItemHeight;
 164      SetWindowPos(hwnd, 0, 0, 0, rect.right -rect.left + 2*SYSMETRICS_CXBORDER,
 165                  lphl->StdItemHeight + 2*SYSMETRICS_CYBORDER,
 166                  SWP_NOMOVE | SWP_NOZORDER | SWP_NOSENDCHANGING);
 167      dprintf_combo(stddeb,(cstyle & 3)==CBS_DROPDOWN ? "CBS_DROPDOWN\n": "CBS_DROPDOWNLIST\n");
 168      break;
 169
 170    default: fprintf(stderr,"COMBOBOX error: bad class style!\n");
 171      return 0;
 172   }
 173
 174   if ((cstyle & 3) != CBS_DROPDOWNLIST)
 175       lphc->hWndEdit = CreateWindow16(MAKE_SEGPTR(editName), (SEGPTR)0,
 176                                   WS_CHILD | WS_CLIPCHILDREN | WS_VISIBLE | ES_LEFT,
 177                                   0, 0, rect.right-6-CBitWidth,
 178                                   lphl->StdItemHeight+2*SYSMETRICS_CYBORDER,
 179                                   hwnd, (HMENU)ID_EDIT, WIN_GetWindowInstance(hwnd), 0L);
 180
 181   lboxrect.top+=lphc->LBoxTop;
 182   lphc->hWndLBox = CreateWindow16(MAKE_SEGPTR(className), (SEGPTR)0, style |
 183                                 ((cstyle & WS_HSCROLL)? WS_HSCROLL : 0) |
 184                                 ((cstyle & WS_VSCROLL)? WS_VSCROLL : 0),
 185                                 lboxrect.left, lboxrect.top,
 186                                 lboxrect.right - lboxrect.left,
 187                                 lboxrect.bottom - lboxrect.top,
 188                                 hwndp,(HMENU)ID_CLB, WIN_GetWindowInstance(hwnd),
 189                                 (SEGPTR)hwnd );
 190
 191    wndPtr->dwStyle &= ~(WS_VSCROLL | WS_HSCROLL);
 192
 193    dprintf_combo( stddeb, "Combo Creation hwnd=%04x  LBox=%04x  Edit=%04x\n",
 194                   hwnd, lphc->hWndLBox, lphc->hWndEdit);
 195    dprintf_combo( stddeb, "  lbox %d,%d-%d,%d     button %d,%d-%d,%d\n",
 196                   lboxrect.left, lboxrect.top, lboxrect.right, lboxrect.bottom,
 197                   lphc->RectButton.left, lphc->RectButton.top,
 198                   lphc->RectButton.right, lphc->RectButton.bottom );
 199    dprintf_combo( stddeb, "   client %d,%d-%d,%d     window %d,%d-%d,%d\n",
 200                   wndPtr->rectClient.left, wndPtr->rectClient.top,
 201                   wndPtr->rectClient.right, wndPtr->rectClient.bottom,
 202                   wndPtr->rectWindow.left, wndPtr->rectWindow.top,
 203                   wndPtr->rectWindow.right, wndPtr->rectWindow.bottom );
 204    return 0;
 205 }
 206
 207 /***********************************************************************
 208  *           CBDestroy
 209  */
 210 static LRESULT CBDestroy(HWND hwnd, WPARAM wParam, LPARAM lParam)
 211 {
 212   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 213
 214   if (lphc->hWndEdit) DestroyWindow( lphc->hWndEdit );
 215   if (lphc->hWndLBox) DestroyWindow( lphc->hWndLBox );
 216   return 0;
 217 }
 218
 219 /***********************************************************************
 220  *           CBPaint
 221  */
 222 static LRESULT CBPaint(HWND hwnd, WPARAM wParam, LPARAM lParam)
 223 {
 224   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 225   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 226   LPLISTSTRUCT lpls;
 227   PAINTSTRUCT16  ps;
 228   HBRUSH hBrush;
 229   HFONT  hOldFont;
 230   HDC16 hdc;
 231   RECT16 rect;
 232
 233   hdc = BeginPaint16(hwnd, &ps);
 234
 235   GetClientRect16(hwnd, &rect);
 236   CBCheckSize(hwnd);
 237   /* 1 for button border */
 238   rect.right = lphc->RectButton.left - 1;
 239
 240   if (hComboBit != 0 && !IsRectEmpty16(&lphc->RectButton))
 241   {
 242     Rectangle(hdc,lphc->RectButton.left-1,lphc->RectButton.top-1,
 243               lphc->RectButton.right+1,lphc->RectButton.bottom+1);
 244     GRAPH_DrawReliefRect(hdc, &lphc->RectButton, 2, 2, FALSE);
 245     GRAPH_DrawBitmap(hdc, hComboBit,
 246                      lphc->RectButton.left + 2,lphc->RectButton.top + 2,
 247                      0, 0, CBitWidth, CBitHeight );
 248   }
 249   if (!IsWindowVisible(hwnd) || !lphl->bRedrawFlag
 250       || (lphc->dwStyle & 3) != CBS_DROPDOWNLIST)
 251   {
 252     /* we don't want to draw an entry when there is an edit control */
 253     EndPaint16(hwnd, &ps);
 254     return 0;
 255   }
 256
 257   hOldFont = SelectObject(hdc, lphl->hFont);
 258
 259 #ifdef WINELIB32
 260   hBrush = SendMessage32A(lphl->hParent, WM_CTLCOLORLISTBOX, hdc, hwnd);
 261 #else
 262   hBrush = SendMessage16(lphl->hParent, WM_CTLCOLOR, hdc,
 263                          MAKELONG(hwnd, CTLCOLOR_LISTBOX));
 264 #endif
 265   if (hBrush == 0) hBrush = GetStockObject(WHITE_BRUSH);
 266
 267   lpls = ListBoxGetItem(lphl,lphl->ItemFocused);
 268   if (lpls != NULL) {
 269     FillRect16(hdc, &rect, hBrush);
 270     ListBoxDrawItem (hwnd, lphl, hdc, lpls, &rect, ODA_DRAWENTIRE, 0);
 271     if (GetFocus() == hwnd)
 272     ListBoxDrawItem (hwnd,lphl, hdc, lpls, &rect, ODA_FOCUS, ODS_FOCUS);
 273   }
 274   else FillRect16(hdc, &rect, hBrush);
 275   SelectObject(hdc,hOldFont);
 276   EndPaint16(hwnd, &ps);
 277   return 0;
 278 }
 279
 280 /***********************************************************************
 281  *           CBGetDlgCode
 282  */
 283 static LRESULT CBGetDlgCode(HWND hwnd, WPARAM wParam, LPARAM lParam)
 284 {
 285   return DLGC_WANTARROWS | DLGC_WANTCHARS;
 286 }
 287
 288 /***********************************************************************
 289  *           CBLButtonDown
 290  */
 291 static LRESULT CBLButtonDown(HWND hwnd, WPARAM wParam, LPARAM lParam)
 292 {
 293   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 294   SendMessage16(hwnd,CB_SHOWDROPDOWN,!lphc->DropDownVisible,0);
 295   return 0;
 296 }
 297
 298 /***********************************************************************
 299  *           CBKeyDown
 300  */
 301 static LRESULT CBKeyDown(HWND hwnd, WPARAM wParam, LPARAM lParam)
 302 {
 303   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 304   WORD       newFocused = lphl->ItemFocused;
 305
 306   switch(wParam) {
 307   case VK_HOME:
 308     newFocused = 0;
 309     break;
 310   case VK_END:
 311     newFocused = lphl->ItemsCount - 1;
 312     break;
 313   case VK_UP:
 314     if (newFocused > 0) newFocused--;
 315     break;
 316   case VK_DOWN:
 317     newFocused++;
 318     break;
 319   default:
 320     return 0;
 321   }
 322
 323   if (newFocused >= lphl->ItemsCount)
 324     newFocused = lphl->ItemsCount - 1;
 325
 326   ListBoxSetCurSel(lphl, newFocused);
 327   SendMessage16(hwnd, WM_COMMAND,ID_CLB,MAKELONG(0,CBN_SELCHANGE));
 328   ListBoxSendNotification(lphl, CBN_SELCHANGE);
 329
 330   lphl->ItemFocused = newFocused;
 331   ListBoxScrollToFocus(lphl);
 332 /*  SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);*/
 333   InvalidateRect32( hwnd, NULL, TRUE );
 334
 335   return 0;
 336 }
 337
 338 /***********************************************************************
 339  *           CBChar
 340  */
 341 static LRESULT CBChar(HWND hwnd, WPARAM wParam, LPARAM lParam)
 342 {
 343   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 344   WORD       newFocused;
 345
 346   newFocused = ListBoxFindNextMatch(lphl, wParam);
 347   if (newFocused == (WORD)LB_ERR) return 0;
 348
 349   if (newFocused >= lphl->ItemsCount)
 350     newFocused = lphl->ItemsCount - 1;
 351
 352   ListBoxSetCurSel(lphl, newFocused);
 353   SendMessage16(hwnd, WM_COMMAND,ID_CLB,MAKELONG(0,CBN_SELCHANGE));
 354   ListBoxSendNotification(lphl, CBN_SELCHANGE);
 355   lphl->ItemFocused = newFocused;
 356   ListBoxScrollToFocus(lphl);
 357
 358 /*  SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);*/
 359   InvalidateRect32( hwnd, NULL, TRUE );
 360
 361   return 0;
 362 }
 363
 364 /***********************************************************************
 365  *           CBKillFocus
 366  */
 367 static LRESULT CBKillFocus(HWND hwnd, WPARAM wParam, LPARAM lParam)
 368 {
 369   return 0;
 370 }
 371
 372 /***********************************************************************
 373  *           CBSetFocus
 374  */
 375 static LRESULT CBSetFocus(HWND hwnd, WPARAM wParam, LPARAM lParam)
 376 {
 377   return 0;
 378 }
 379
 380 /***********************************************************************
 381  *           CBResetContent
 382  */
 383 static LRESULT CBResetContent(HWND hwnd, WPARAM wParam, LPARAM lParam)
 384 {
 385   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 386   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 387
 388   ListBoxResetContent(lphl);
 389   ComboUpdateWindow(hwnd, lphl, lphc, TRUE);
 390   return 0;
 391 }
 392
 393 /***********************************************************************
 394  *           CBDir
 395  */
 396 static LRESULT CBDir(HWND hwnd, WPARAM wParam, LPARAM lParam)
 397 {
 398   WORD wRet;
 399   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 400   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 401
 402   wRet = ListBoxDirectory(lphl, wParam, (LPSTR)PTR_SEG_TO_LIN(lParam));
 403   ComboUpdateWindow(hwnd, lphl, lphc, TRUE);
 404   return wRet;
 405 }
 406
 407 /***********************************************************************
 408  *           CBInsertString
 409  */
 410 static LRESULT CBInsertString(HWND hwnd, WPARAM wParam, LPARAM lParam)
 411 {
 412   WORD  wRet;
 413   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 414   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 415
 416   if (lphl->HasStrings)
 417     wRet = ListBoxInsertString(lphl, wParam, (LPSTR)PTR_SEG_TO_LIN(lParam));
 418   else
 419     wRet = ListBoxInsertString(lphl, wParam, (LPSTR)lParam);
 420   ComboUpdateWindow(hwnd, lphl, lphc, TRUE);
 421   return wRet;
 422 }
 423
 424 /***********************************************************************
 425  *           CBAddString
 426  */
 427 static LRESULT CBAddString(HWND hwnd, WPARAM wParam, LPARAM lParam)
 428 {
 429   WORD  wRet;
 430   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 431   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 432
 433   if (lphl->HasStrings)
 434     wRet = ListBoxAddString(lphl, (LPSTR)PTR_SEG_TO_LIN(lParam));
 435   else
 436     wRet = ListBoxAddString(lphl, (LPSTR)lParam);
 437
 438   ComboUpdateWindow(hwnd, lphl, lphc, TRUE);
 439   return wRet;
 440 }
 441
 442 /***********************************************************************
 443  *           CBDeleteString
 444  */
 445 static LRESULT CBDeleteString(HWND hwnd, WPARAM wParam, LPARAM lParam)
 446 {
 447   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 448   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 449   LONG lRet = ListBoxDeleteString(lphl,wParam);
 450
 451   ComboUpdateWindow(hwnd, lphl, lphc, TRUE);
 452   return lRet;
 453 }
 454
 455 /***********************************************************************
 456  *           CBSelectString
 457  */
 458 static LRESULT CBSelectString(HWND hwnd, WPARAM wParam, LPARAM lParam)
 459 {
 460   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 461   WORD  wRet;
 462
 463   wRet = ListBoxFindString(lphl, wParam, (SEGPTR)lParam);
 464
 465   /* XXX add functionality here */
 466
 467   return 0;
 468 }
 469
 470 /***********************************************************************
 471  *           CBFindString
 472  */
 473 static LRESULT CBFindString(HWND hwnd, WPARAM wParam, LPARAM lParam)
 474 {
 475   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 476   return ListBoxFindString(lphl, wParam, (SEGPTR)lParam);
 477 }
 478
 479 /***********************************************************************
 480  *           CBGetCount
 481  */
 482 static LRESULT CBGetCount(HWND hwnd, WPARAM wParam, LPARAM lParam)
 483 {
 484   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 485   return lphl->ItemsCount;
 486 }
 487
 488 /***********************************************************************
 489  *           CBSetCurSel
 490  */
 491 static LRESULT CBSetCurSel(HWND hwnd, WPARAM wParam, LPARAM lParam)
 492 {
 493   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 494   WORD  wRet;
 495
 496   wRet = ListBoxSetCurSel(lphl, wParam);
 497
 498   dprintf_combo(stddeb,"CBSetCurSel: hwnd %04x wp %x lp %lx wRet %d\n",
 499                 hwnd,wParam,lParam,wRet);
 500 /*  SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);*/
 501   InvalidateRect32( hwnd, NULL, TRUE );
 502
 503   return wRet;
 504 }
 505
 506 /***********************************************************************
 507  *           CBGetCurSel
 508  */
 509 static LRESULT CBGetCurSel(HWND hwnd, WPARAM wParam, LPARAM lParam)
 510 {
 511   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 512   return lphl->ItemFocused;
 513 }
 514
 515 /***********************************************************************
 516  *           CBGetItemHeight
 517  */
 518 static LRESULT CBGetItemHeight(HWND hwnd, WPARAM wParam, LPARAM lParam)
 519 {
 520   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 521   LPLISTSTRUCT lpls = ListBoxGetItem (lphl, wParam);
 522
 523   if (lpls == NULL) return LB_ERR;
 524   return lpls->mis.itemHeight;
 525 }
 526
 527 /***********************************************************************
 528  *           CBSetItemHeight
 529  */
 530 static LRESULT CBSetItemHeight(HWND hwnd, WPARAM wParam, LPARAM lParam)
 531 {
 532   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 533   return ListBoxSetItemHeight(lphl, wParam, lParam);
 534 }
 535
 536 /***********************************************************************
 537  *           CBSetRedraw
 538  */
 539 static LRESULT CBSetRedraw(HWND hwnd, WPARAM wParam, LPARAM lParam)
 540 {
 541   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 542   lphl->bRedrawFlag = wParam;
 543   return 0;
 544 }
 545
 546 /***********************************************************************
 547  *           CBSetFont
 548  */
 549 static LRESULT CBSetFont(HWND hwnd, WPARAM wParam, LPARAM lParam)
 550 {
 551   LPHEADLIST  lphl = ComboGetListHeader(hwnd);
 552   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 553
 554   if (wParam == 0)
 555     lphl->hFont = GetStockObject(SYSTEM_FONT);
 556   else
 557     lphl->hFont = (HFONT)wParam;
 558   if (lphc->hWndEdit)
 559      SendMessage16(lphc->hWndEdit,WM_SETFONT,lphl->hFont,0);
 560   return 0;
 561 }
 562
 563 /***********************************************************************
 564  *           CBGetLBTextLen
 565  */
 566 static LRESULT CBGetLBTextLen(HWND hwnd, WPARAM wParam, LPARAM lParam)
 567 {
 568   LPHEADLIST   lphl = ComboGetListHeader(hwnd);
 569   LPLISTSTRUCT lpls = ListBoxGetItem(lphl,wParam);
 570
 571   if (lpls == NULL || !lphl->HasStrings) return LB_ERR;
 572   return strlen(lpls->itemText);
 573 }
 574
 575 /***********************************************************************
 576  *           CBGetLBText
 577  */
 578 static LRESULT CBGetLBText(HWND hwnd, WPARAM wParam, LPARAM lParam)
 579 {
 580   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 581   return ListBoxGetText(lphl, wParam, (LPSTR)PTR_SEG_TO_LIN(lParam));
 582 }
 583
 584 /***********************************************************************
 585  *           CBGetItemData
 586  */
 587 static LRESULT CBGetItemData(HWND hwnd, WPARAM wParam, LPARAM lParam)
 588 {
 589   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 590   return ListBoxGetItemData(lphl, wParam);
 591 }
 592
 593 /***********************************************************************
 594  *           CBSetItemData
 595  */
 596 static LRESULT CBSetItemData(HWND hwnd, WPARAM wParam, LPARAM lParam)
 597 {
 598   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 599   return ListBoxSetItemData(lphl, wParam, lParam);
 600 }
 601
 602 /***********************************************************************
 603  *           CBShowDropDown
 604  */
 605 static LRESULT CBShowDropDown(HWND hwnd, WPARAM wParam, LPARAM lParam)
 606 {
 607   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 608   RECT32 rect;
 609
 610   if ((lphc->dwStyle & 3) == CBS_SIMPLE) return LB_ERR;
 611
 612   wParam = !!wParam;
 613   if (wParam != lphc->DropDownVisible) {
 614     lphc->DropDownVisible = wParam;
 615     GetWindowRect32(hwnd,&rect);
 616     SetWindowPos(lphc->hWndLBox, 0, rect.left, rect.top+lphc->LBoxTop, 0, 0,
 617                  SWP_NOSIZE | (wParam ? SWP_SHOWWINDOW : SWP_HIDEWINDOW));
 618     if (!wParam) SetFocus(hwnd);
 619   }
 620   return 0;
 621 }
 622
 623
 624 /***********************************************************************
 625  *             CBCheckSize
 626  */
 627 static BOOL CBCheckSize(HWND hwnd)
 628 {
 629   LPHEADCOMBO  lphc = ComboGetStorageHeader(hwnd);
 630   LPHEADLIST   lphl = ComboGetListHeader(hwnd);
 631   LONG         cstyle = GetWindowLong(hwnd,GWL_STYLE);
 632   RECT16       cRect,wRect;
 633
 634   if (lphc->hWndLBox == 0) return FALSE;
 635
 636   GetClientRect16(hwnd,&cRect);
 637   GetWindowRect16(hwnd,&wRect);
 638
 639   dprintf_combo(stddeb,
 640          "CBCheckSize: hwnd %04x Rect %d,%d-%d,%d  wRect %d,%d-%d,%d\n",
 641                 hwnd,cRect.left,cRect.top,cRect.right,cRect.bottom,
 642                 wRect.left,wRect.top,wRect.right,wRect.bottom);
 643   if ((cstyle & 3) == CBS_SIMPLE  ) return TRUE ;
 644
 645   if ((cRect.bottom - cRect.top) >
 646       (lphl->StdItemHeight + 2*SYSMETRICS_CYBORDER)) {
 647     SetWindowPos(hwnd, 0, 0, 0,
 648                  cRect.right-cRect.left,
 649                  lphl->StdItemHeight+2*SYSMETRICS_CYBORDER,
 650                  SWP_NOMOVE | SWP_NOZORDER | SWP_NOREDRAW | SWP_NOACTIVATE );
 651     GetClientRect16(hwnd,&cRect);
 652     GetWindowRect16(hwnd,&wRect);
 653
 654     lphc->RectButton.right = cRect.right;
 655     lphc->RectButton.left = cRect.right - 2*SYSMETRICS_CXBORDER - 4
 656                             - CBitWidth;
 657     lphc->RectButton.top = cRect.top;
 658     lphc->RectButton.bottom = cRect.bottom;
 659   }
 660
 661   if (cRect.right < lphc->RectButton.left) {
 662     /* if the button is outside the window, move it in */
 663     if ((wRect.right - wRect.left - 2*SYSMETRICS_CXBORDER) == (cRect.right - cRect.left)) {
 664       lphc->RectButton.right = cRect.right;
 665       lphc->RectButton.left = cRect.right - 2*SYSMETRICS_CXBORDER - 4
 666                                - CBitWidth;
 667       lphc->RectButton.top = cRect.top;
 668       lphc->RectButton.bottom = cRect.bottom;
 669     }
 670     /* otherwise we need to make the client include the button */
 671     else
 672       SetWindowPos(hwnd, 0, 0, 0, lphc->RectButton.right,
 673                    lphl->StdItemHeight+2*SYSMETRICS_CYBORDER,
 674                    SWP_NOMOVE | SWP_NOZORDER | SWP_NOREDRAW | SWP_NOACTIVATE );
 675   }
 676
 677   CBLCheckSize(hwnd);
 678   return TRUE;
 679 }
 680
 681 /***********************************************************************
 682  *           CBCommand
 683  */
 684 static LRESULT CBCommand(HWND hwnd, WPARAM wParam, LPARAM lParam)
 685 {
 686   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 687   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 688   char       buffer[256];
 689   WORD       newFocused;
 690   WORD       id;
 691   if (lphc->hWndEdit)  /* interdependence only used for CBS_SIMPLE and CBS_DROPDOWN styles */
 692   {
 693    switch (wParam)
 694    {
 695     case ID_CLB:                                        /* update EDIT window */
 696                 if (HIWORD(lParam)==CBN_SELCHANGE)
 697                  if (lphl->HasStrings)
 698                  {
 699                   ListBoxGetText(lphl,lphl->ItemFocused, buffer);
 700                   dprintf_combo(stddeb,"CBCommand: update Edit: %s\n",buffer);
 701                   SetWindowText32A( lphc->hWndEdit, buffer );
 702                  }
 703                 break;
 704     case ID_EDIT:                                      /* update LISTBOX window */
 705                  id=GetWindowWord(hwnd,GWW_ID);
 706                  switch (HIWORD(lParam))
 707                  {
 708                   case EN_UPDATE:GetWindowText32A(lphc->hWndEdit,buffer,255);
 709                                  if (*buffer)
 710                                  {
 711                                   newFocused=ListBoxFindString(lphl, -1, MAKE_SEGPTR(buffer));
 712                                   dprintf_combo(stddeb,"CBCommand: new selection #%d is= %s\n",
 713                                                 newFocused,buffer);
 714                                   if (newFocused != (WORD)LB_ERR)
 715                                   {                             /* if found something */
 716                                    ListBoxSetCurSel(lphl, newFocused);
 717                                    ListBoxSendNotification(lphl, CBN_SELCHANGE);
 718                                    InvalidateRect32(hwnd, NULL, TRUE);
 719                                   }
 720                                  }
 721                                  SendMessage16(GetParent(hwnd),WM_COMMAND,id,
 722                                          MAKELONG(hwnd, CBN_EDITUPDATE));
 723                                  break;
 724                   case EN_CHANGE:SendMessage16(GetParent(hwnd),WM_COMMAND,id,
 725                                          MAKELONG(hwnd, CBN_EDITCHANGE));
 726                                  break;
 727                   case EN_ERRSPACE:SendMessage16(GetParent(hwnd),WM_COMMAND,id,
 728                                          MAKELONG(hwnd, CBN_ERRSPACE));
 729                                  break;
 730                 }
 731                 break;
 732    }
 733   }
 734   return 0;
 735 }
 736
 737
 738 /***********************************************************************
 739  *           ComboWndProc
 740  */
 741 LRESULT ComboBoxWndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
 742 {
 743     switch(message) {
 744      case WM_NCCREATE: return CBNCCreate(hwnd, wParam, lParam);
 745      case WM_CREATE: return CBCreate(hwnd, wParam, lParam);
 746      case WM_DESTROY: return CBDestroy(hwnd, wParam, lParam);
 747      case WM_GETDLGCODE: return CBGetDlgCode(hwnd, wParam, lParam);
 748      case WM_KEYDOWN: return CBKeyDown(hwnd, wParam, lParam);
 749      case WM_CHAR: return CBChar(hwnd, wParam, lParam);
 750      case WM_SETFONT: return CBSetFont(hwnd, wParam, lParam);
 751      case WM_SETREDRAW: return CBSetRedraw(hwnd, wParam, lParam);
 752      case WM_PAINT: return CBPaint(hwnd, wParam, lParam);
 753      case WM_LBUTTONDOWN: return CBLButtonDown(hwnd, wParam, lParam);
 754      case WM_SETFOCUS: return CBSetFocus(hwnd, wParam, lParam);
 755      case WM_KILLFOCUS: return CBKillFocus(hwnd, wParam, lParam);
 756      case WM_SIZE: return CBCheckSize(hwnd);
 757      case WM_COMMAND: return CBCommand(hwnd, wParam, lParam);
 758      case CB_RESETCONTENT: return CBResetContent(hwnd, wParam, lParam);
 759      case CB_DIR: return CBDir(hwnd, wParam, lParam);
 760      case CB_ADDSTRING: return CBAddString(hwnd, wParam, lParam);
 761      case CB_INSERTSTRING: return CBInsertString(hwnd, wParam, lParam);
 762      case CB_DELETESTRING: return CBDeleteString(hwnd, wParam, lParam);
 763      case CB_FINDSTRING: return CBFindString(hwnd, wParam, lParam);
 764      case CB_GETCOUNT: return CBGetCount(hwnd, wParam, lParam);
 765      case CB_GETCURSEL: return CBGetCurSel(hwnd, wParam, lParam);
 766      case CB_GETITEMDATA: return CBGetItemData(hwnd, wParam, lParam);
 767      case CB_GETITEMHEIGHT: return CBGetItemHeight(hwnd, wParam, lParam);
 768      case CB_GETLBTEXT: return CBGetLBText(hwnd, wParam, lParam);
 769      case CB_GETLBTEXTLEN: return CBGetLBTextLen(hwnd, wParam, lParam);
 770      case CB_SELECTSTRING: return CBSelectString(hwnd, wParam, lParam);
 771      case CB_SETITEMDATA: return CBSetItemData(hwnd, wParam, lParam);
 772      case CB_SETCURSEL: return CBSetCurSel(hwnd, wParam, lParam);
 773      case CB_SETITEMHEIGHT: return CBSetItemHeight(hwnd, wParam, lParam);
 774      case CB_SHOWDROPDOWN: return CBShowDropDown(hwnd, wParam, lParam);
 775     }
 776     return DefWindowProc16(hwnd, message, wParam, lParam);
 777 }
 778
 779 /*--------------------------------------------------------------------*/
 780 /* ComboLBox code starts here */
 781
 782 HWND CLBoxGetCombo(HWND hwnd)
 783 {
 784 #ifdef WINELIB32
 785   return (HWND)GetWindowLong(hwnd,0);
 786 #else
 787   return (HWND)GetWindowWord(hwnd,0);
 788 #endif
 789 }
 790
 791 LPHEADLIST CLBoxGetListHeader(HWND hwnd)
 792 {
 793   return ComboGetListHeader(CLBoxGetCombo(hwnd));
 794 }
 795
 796 /***********************************************************************
 797  *           CBLCreate
 798  */
 799 static LRESULT CBLCreate( HWND hwnd, WPARAM wParam, LPARAM lParam )
 800 {
 801   CREATESTRUCT16 *createStruct = (CREATESTRUCT16 *)PTR_SEG_TO_LIN(lParam);
 802 #ifdef WINELIB32
 803   SetWindowLong(hwnd,0,(LONG)createStruct->lpCreateParams);
 804 #else
 805   SetWindowWord(hwnd,0,LOWORD(createStruct->lpCreateParams));
 806 #endif
 807   return 0;
 808 }
 809
 810 /***********************************************************************
 811  *           CBLGetDlgCode
 812  */
 813 static LRESULT CBLGetDlgCode( HWND hwnd, WPARAM wParam, LPARAM lParam )
 814 {
 815   return DLGC_WANTARROWS | DLGC_WANTCHARS;
 816 }
 817
 818 /***********************************************************************
 819  *           CBLKeyDown
 820  */
 821 static LRESULT CBLKeyDown( HWND hwnd, WPARAM wParam, LPARAM lParam )
 822 {
 823   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
 824   WORD newFocused = lphl->ItemFocused;
 825
 826   switch(wParam) {
 827   case VK_HOME:
 828     newFocused = 0;
 829     break;
 830   case VK_END:
 831     newFocused = lphl->ItemsCount - 1;
 832     break;
 833   case VK_UP:
 834     if (newFocused > 0) newFocused--;
 835     break;
 836   case VK_DOWN:
 837     newFocused++;
 838     break;
 839   case VK_PRIOR:
 840     if (newFocused > lphl->ItemsVisible) {
 841       newFocused -= lphl->ItemsVisible;
 842     } else {
 843       newFocused = 0;
 844     }
 845     break;
 846   case VK_NEXT:
 847     newFocused += lphl->ItemsVisible;
 848     break;
 849   default:
 850     return 0;
 851   }
 852
 853   if (newFocused >= lphl->ItemsCount)
 854     newFocused = lphl->ItemsCount - 1;
 855
 856   ListBoxSetCurSel(lphl, newFocused);
 857   ListBoxSendNotification(lphl, CBN_SELCHANGE);
 858   SendMessage16(GetParent(hwnd), WM_COMMAND,ID_CLB,MAKELONG(0,CBN_SELCHANGE));
 859   lphl->ItemFocused = newFocused;
 860   ListBoxScrollToFocus(lphl);
 861   SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
 862   InvalidateRect32( hwnd, NULL, TRUE );
 863   return 0;
 864 }
 865
 866 /***********************************************************************
 867  *           CBLChar
 868  */
 869 static LRESULT CBLChar( HWND hwnd, WPARAM wParam, LPARAM lParam )
 870 {
 871   return 0;
 872 }
 873
 874 /***********************************************************************
 875  *           CBLPaint
 876  */
 877 static LRESULT CBLPaint( HWND hwnd, WPARAM wParam, LPARAM lParam )
 878 {
 879   LPHEADLIST   lphl = CLBoxGetListHeader(hwnd);
 880   LPLISTSTRUCT lpls;
 881   PAINTSTRUCT16  ps;
 882   HBRUSH       hBrush;
 883   HFONT        hOldFont;
 884   WND * wndPtr = WIN_FindWndPtr(hwnd);
 885   HWND  combohwnd = CLBoxGetCombo(hwnd);
 886   HDC16 hdc;
 887   RECT16 rect;
 888   int   i, top, height;
 889
 890   top = 0;
 891   hdc = BeginPaint16( hwnd, &ps );
 892
 893   if (!IsWindowVisible(hwnd) || !lphl->bRedrawFlag) {
 894     EndPaint16(hwnd, &ps);
 895     return 0;
 896   }
 897
 898   hOldFont = SelectObject(hdc, lphl->hFont);
 899   /* listboxes should be white */
 900   hBrush = GetStockObject(WHITE_BRUSH);
 901
 902   GetClientRect16(hwnd, &rect);
 903   FillRect16(hdc, &rect, hBrush);
 904   CBLCheckSize(hwnd);
 905
 906   lpls = lphl->lpFirst;
 907
 908   lphl->ItemsVisible = 0;
 909   for(i = 0; i < lphl->ItemsCount; i++) {
 910     if (lpls == NULL) break;
 911
 912     if (i >= lphl->FirstVisible) {
 913       height = lpls->mis.itemHeight;
 914       /* must have enough room to draw entire item */
 915       if (top > (rect.bottom-height+1)) break;
 916
 917       lpls->itemRect.top    = top;
 918       lpls->itemRect.bottom = top + height;
 919       lpls->itemRect.left   = rect.left;
 920       lpls->itemRect.right  = rect.right;
 921
 922       dprintf_listbox(stddeb,"drawing item: %d %d %d %d %d\n",
 923                       rect.left,top,rect.right,top+height,lpls->itemState);
 924       if (lphl->OwnerDrawn) {
 925         ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_DRAWENTIRE, 0);
 926         if (lpls->itemState)
 927           ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_SELECT, ODS_SELECTED);
 928       } else {
 929         ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_DRAWENTIRE,
 930                          lpls->itemState);
 931       }
 932       if ((lphl->ItemFocused == i) && GetFocus() == hwnd)
 933         ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_FOCUS, ODS_FOCUS);
 934
 935       top += height;
 936       lphl->ItemsVisible++;
 937     }
 938
 939     lpls = lpls->lpNext;
 940   }
 941
 942   if (wndPtr->dwStyle & WS_VSCROLL)
 943       SetScrollRange(hwnd, SB_VERT, 0, ListMaxFirstVisible(lphl), TRUE);
 944
 945   SelectObject(hdc,hOldFont);
 946   EndPaint16( hwnd, &ps );
 947   return 0;
 948
 949 }
 950
 951 /***********************************************************************
 952  *           CBLKillFocus
 953  */
 954 static LRESULT CBLKillFocus( HWND hwnd, WPARAM wParam, LPARAM lParam )
 955 {
 956 /*  SendMessage16(CLBoxGetCombo(hwnd),CB_SHOWDROPDOWN,0,0);*/
 957   return 0;
 958 }
 959
 960 /***********************************************************************
 961  *           CBLActivate
 962  */
 963 static LRESULT CBLActivate( HWND hwnd, WPARAM wParam, LPARAM lParam )
 964 {
 965   if (wParam == WA_INACTIVE)
 966     SendMessage16(CLBoxGetCombo(hwnd),CB_SHOWDROPDOWN,0,0);
 967   return 0;
 968 }
 969
 970 /***********************************************************************
 971  *           CBLLButtonDown
 972  */
 973 static LRESULT CBLLButtonDown( HWND hwnd, WPARAM wParam, LPARAM lParam )
 974 {
 975   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
 976   int        y;
 977   RECT16     rectsel;
 978
 979   SetFocus(hwnd);
 980   SetCapture(hwnd);
 981
 982   lphl->PrevFocused = lphl->ItemFocused;
 983
 984   y = ListBoxFindMouse(lphl, LOWORD(lParam), HIWORD(lParam));
 985   if (y == -1)
 986     return 0;
 987
 988   ListBoxSetCurSel(lphl, y);
 989   ListBoxGetItemRect(lphl, y, &rectsel);
 990
 991   InvalidateRect32( hwnd, NULL, TRUE );
 992   return 0;
 993 }
 994
 995 /***********************************************************************
 996  *           CBLLButtonUp
 997  */
 998 static LRESULT CBLLButtonUp( HWND hwnd, WPARAM wParam, LPARAM lParam )
 999 {
1000   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
1001
1002   if (GetCapture() == hwnd) ReleaseCapture();
1003
1004   if(!lphl)
1005      {
1006       fprintf(stdnimp,"CBLLButtonUp: CLBoxGetListHeader returned NULL!\n");
1007      }
1008   else if (lphl->PrevFocused != lphl->ItemFocused)
1009           {
1010                 SendMessage16(CLBoxGetCombo(hwnd),CB_SETCURSEL,lphl->ItemFocused,0);
1011                 SendMessage16(GetParent(hwnd), WM_COMMAND,ID_CLB,MAKELONG(0,CBN_SELCHANGE));
1012                 ListBoxSendNotification(lphl, CBN_SELCHANGE);
1013           }
1014
1015   SendMessage16(CLBoxGetCombo(hwnd),CB_SHOWDROPDOWN,0,0);
1016
1017   return 0;
1018 }
1019
1020 /***********************************************************************
1021  *           CBLMouseMove
1022  */
1023 static LRESULT CBLMouseMove( HWND hwnd, WPARAM wParam, LPARAM lParam )
1024 {
1025   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
1026   short y;
1027   WORD wRet;
1028   RECT16 rect, rectsel;
1029
1030   y = SHIWORD(lParam);
1031   wRet = ListBoxFindMouse(lphl, LOWORD(lParam), HIWORD(lParam));
1032   ListBoxGetItemRect(lphl, wRet, &rectsel);
1033   GetClientRect16(hwnd, &rect);
1034
1035   dprintf_combo(stddeb,"CBLMouseMove: hwnd %04x wp %x lp %lx  y %d  if %d wret %d %d,%d-%d,%d\n",
1036 hwnd,wParam,lParam,y,lphl->ItemFocused,wRet,rectsel.left,rectsel.top,rectsel.right,rectsel.bottom);
1037
1038   if ((wParam & MK_LBUTTON) != 0) {
1039     if (y < CBLMM_EDGE) {
1040       if (lphl->FirstVisible > 0) {
1041         lphl->FirstVisible--;
1042         SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
1043         ListBoxSetCurSel(lphl, wRet);
1044         InvalidateRect32( hwnd, NULL, TRUE );
1045         return 0;
1046       }
1047     }
1048     else if (y >= (rect.bottom-CBLMM_EDGE)) {
1049       if (lphl->FirstVisible < ListMaxFirstVisible(lphl)) {
1050         lphl->FirstVisible++;
1051         SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
1052         ListBoxSetCurSel(lphl, wRet);
1053         InvalidateRect32( hwnd, NULL, TRUE );
1054         return 0;
1055       }
1056     }
1057     else {
1058       if ((short) wRet == lphl->ItemFocused) return 0;
1059       ListBoxSetCurSel(lphl, wRet);
1060       InvalidateRect32( hwnd, NULL, TRUE );
1061     }
1062   }
1063
1064   return 0;
1065 }
1066
1067 /***********************************************************************
1068  *           CBLVScroll
1069  */
1070 static LRESULT CBLVScroll( HWND hwnd, WPARAM wParam, LPARAM lParam )
1071 {
1072   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
1073   int  y;
1074
1075   y = lphl->FirstVisible;
1076
1077   switch(wParam) {
1078   case SB_LINEUP:
1079     if (lphl->FirstVisible > 0)
1080       lphl->FirstVisible--;
1081     break;
1082
1083   case SB_LINEDOWN:
1084     lphl->FirstVisible++;
1085     break;
1086
1087   case SB_PAGEUP:
1088     if (lphl->FirstVisible > lphl->ItemsVisible) {
1089       lphl->FirstVisible -= lphl->ItemsVisible;
1090     } else {
1091       lphl->FirstVisible = 0;
1092     }
1093     break;
1094
1095   case SB_PAGEDOWN:
1096     lphl->FirstVisible += lphl->ItemsVisible;
1097     break;
1098
1099   case SB_THUMBTRACK:
1100     lphl->FirstVisible = LOWORD(lParam);
1101     break;
1102   }
1103
1104   if (lphl->FirstVisible > ListMaxFirstVisible(lphl))
1105     lphl->FirstVisible = ListMaxFirstVisible(lphl);
1106
1107   if (y != lphl->FirstVisible) {
1108     SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
1109     InvalidateRect32( hwnd, NULL, TRUE );
1110   }
1111
1112   return 0;
1113 }
1114
1115
1116 /***********************************************************************
1117  *             CBLCheckSize
1118  */
1119 static BOOL CBLCheckSize(HWND hwnd)
1120 {
1121   LPHEADCOMBO  lphc = ComboGetStorageHeader(hwnd);
1122   LPHEADLIST   lphl = ComboGetListHeader(hwnd);
1123   LPLISTSTRUCT lpls;
1124   HWND         hWndLBox;
1125   RECT16 cRect,wRect,lRect,lwRect;
1126   int totheight,dw;
1127   char className[80];
1128
1129   GetClassName32A(hwnd,className,80);
1130   fflush(stddeb);
1131   if (strncmp(className,"COMBOBOX",8)) return FALSE;
1132   if ((hWndLBox = lphc->hWndLBox) == 0) return FALSE;
1133   dprintf_combo(stddeb,"CBLCheckSize headers hw %04x  lb %04x  name %s\n",
1134                 hwnd,hWndLBox,className);
1135
1136   GetClientRect16(hwnd,&cRect);
1137   GetWindowRect16(hwnd,&wRect);
1138   GetClientRect16(hWndLBox,&lRect);
1139   GetWindowRect16(hWndLBox,&lwRect);
1140
1141   dprintf_combo(stddeb,"CBLCheckSize: init cRect %d,%d-%d,%d  wRect %d,%d-%d,%d\n",
1142                 cRect.left,cRect.top,cRect.right,cRect.bottom,
1143                 wRect.left,wRect.top,wRect.right,wRect.bottom);
1144   dprintf_combo(stddeb,"                   lRect %d,%d-%d,%d  lwRect %d,%d-%d,%d\n",
1145               lRect.left,lRect.top,lRect.right,lRect.bottom,
1146               lwRect.left,lwRect.top,lwRect.right,lwRect.bottom);
1147   fflush(stddeb);
1148
1149   totheight = 0;
1150   for (lpls=lphl->lpFirst; lpls != NULL; lpls=lpls->lpNext)
1151     totheight += lpls->mis.itemHeight;
1152
1153   dw = cRect.right-cRect.left+2*SYSMETRICS_CXBORDER+SYSMETRICS_CXVSCROLL;
1154   dw -= lwRect.right-lwRect.left;
1155   dw -= SYSMETRICS_CXVSCROLL;
1156
1157   /* TODO: This isn't really what windows does */
1158   if ((lRect.bottom-lRect.top < 3*lphl->StdItemHeight) || dw) {
1159     dprintf_combo(stddeb,"    Changing; totHeight %d  StdItemHght %d  dw %d\n",
1160                   totheight,lphl->StdItemHeight,dw);
1161     SetWindowPos(hWndLBox, 0, lRect.left, lRect.top,
1162                  lwRect.right-lwRect.left+dw, totheight+2*SYSMETRICS_CYBORDER,
1163                  SWP_NOMOVE | SWP_NOZORDER | SWP_NOREDRAW | SWP_NOACTIVATE );
1164   }
1165   return TRUE;
1166 }
1167
1168
1169 /***********************************************************************
1170  *           ComboLBoxWndProc
1171  */
1172 LRESULT ComboLBoxWndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
1173 {
1174     switch(message) {
1175      case WM_CREATE: return CBLCreate(hwnd, wParam, lParam);
1176      case WM_GETDLGCODE: return CBLGetDlgCode(hwnd, wParam, lParam);
1177      case WM_KEYDOWN: return CBLKeyDown(hwnd, wParam, lParam);
1178      case WM_CHAR: return CBLChar(hwnd, wParam, lParam);
1179      case WM_PAINT: return CBLPaint(hwnd, wParam, lParam);
1180      case WM_KILLFOCUS: return CBLKillFocus(hwnd, wParam, lParam);
1181      case WM_ACTIVATE: return CBLActivate(hwnd, wParam, lParam);
1182      case WM_LBUTTONDOWN: return CBLLButtonDown(hwnd, wParam, lParam);
1183      case WM_LBUTTONUP: return CBLLButtonUp(hwnd, wParam, lParam);
1184      case WM_MOUSEMOVE: return CBLMouseMove(hwnd, wParam, lParam);
1185      case WM_VSCROLL: return CBLVScroll(hwnd, wParam, lParam);
1186      case WM_SIZE: return CBLCheckSize(hwnd);
1187     }
1188     return DefWindowProc16(hwnd, message, wParam, lParam);
1189 }
1190
1191 /************************************************************************
1192  *                              DlgDirSelectComboBox    [USER.194]
1193  */
1194 BOOL DlgDirSelectComboBox(HWND hDlg, LPSTR lpStr, INT nIDLBox)
1195 {
1196         fprintf(stdnimp,"DlgDirSelectComboBox(%04x, '%s', %d) \n",
1197                                 hDlg, lpStr, nIDLBox);
1198         return TRUE;
1199 }
1200
1201 static INT32 COMBO_DlgDirList( HWND32 hDlg, LPARAM path, INT32 idCBox,
1202                                INT32 idStatic, UINT32 wType, BOOL32 unicode )
1203 {
1204     LRESULT res = 0;
1205
1206     if (idCBox)
1207     {
1208         SendDlgItemMessage32A( hDlg, idCBox, CB_RESETCONTENT, 0, 0 );
1209         if (unicode)
1210             res = SendDlgItemMessage32W( hDlg, idCBox, CB_DIR, wType, path );
1211         else
1212             res = SendDlgItemMessage32A( hDlg, idCBox, CB_DIR, wType, path );
1213     }
1214     if (idStatic)
1215     {
1216         char temp[512] = "A:\\";
1217         int drive = DRIVE_GetCurrentDrive();
1218         temp[0] += drive;
1219         lstrcpyn( temp + 3, DRIVE_GetDosCwd(drive), sizeof(temp)-3 );
1220         AnsiLower( temp );
1221         SetDlgItemText32A( hDlg, idStatic, temp );
1222     }
1223     return (res >= 0);
1224 }
1225
1226
1227 /***********************************************************************
1228  *           DlgDirListComboBox16   (USER.195)
1229  */
1230 INT16 DlgDirListComboBox16( HWND16 hDlg, LPCSTR path, INT16 idCBox,
1231                             INT16 idStatic, UINT16 wType )
1232 {
1233     dprintf_combo( stddeb,"DlgDirListComboBox16(%04x,'%s',%d,%d,%04x)\n",
1234                    hDlg, path, idCBox, idStatic, wType );
1235     return COMBO_DlgDirList( hDlg, (LPARAM)path, idCBox,
1236                              idStatic, wType, FALSE );
1237 }
1238
1239
1240 /***********************************************************************
1241  *           DlgDirListComboBox32A   (USER32.143)
1242  */
1243 INT32 DlgDirListComboBox32A( HWND32 hDlg, LPCSTR path, INT32 idCBox,
1244                              INT32 idStatic, UINT32 wType )
1245 {
1246     dprintf_combo( stddeb,"DlgDirListComboBox32A(%08x,'%s',%d,%d,%08X)\n",
1247                    hDlg, path, idCBox, idStatic, wType );
1248     return COMBO_DlgDirList( hDlg, (LPARAM)path, idCBox,
1249                              idStatic, wType, FALSE );
1250 }
1251
1252
1253 /***********************************************************************
1254  *           DlgDirListComboBox32W   (USER32.144)
1255  */
1256 INT32 DlgDirListComboBox32W( HWND32 hDlg, LPCWSTR path, INT32 idCBox,
1257                              INT32 idStatic, UINT32 wType )
1258 {
1259     dprintf_combo( stddeb,"DlgDirListComboBox32W(%08x,%p,%d,%d,%08X)\n",
1260                    hDlg, path, idCBox, idStatic, wType );
1261     return COMBO_DlgDirList( hDlg, (LPARAM)path, idCBox,
1262                              idStatic, wType, TRUE );
1263 }