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)GetWindowLong32A(hwnd,4);
  64 }
  65
  66 LPHEADLIST ComboGetListHeader(HWND hwnd)
  67 {
  68   return (LPHEADLIST)GetWindowLong32A(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 = GetWindowLong32A(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( editName, NULL,
 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), NULL );
 180
 181   lboxrect.top+=lphc->LBoxTop;
 182   lphc->hWndLBox = CreateWindow16( className, NULL, 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                                 (LPVOID)(HWND32)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 = GetWindowLong32A(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   return (HWND)GetWindowLong32A(hwnd,0);
 785 }
 786
 787 LPHEADLIST CLBoxGetListHeader(HWND hwnd)
 788 {
 789   return ComboGetListHeader(CLBoxGetCombo(hwnd));
 790 }
 791
 792 /***********************************************************************
 793  *           CBLCreate
 794  */
 795 static LRESULT CBLCreate( HWND hwnd, WPARAM wParam, LPARAM lParam )
 796 {
 797   CREATESTRUCT16 *createStruct = (CREATESTRUCT16 *)PTR_SEG_TO_LIN(lParam);
 798   SetWindowLong32A(hwnd,0,(LONG)createStruct->lpCreateParams);
 799   return 0;
 800 }
 801
 802 /***********************************************************************
 803  *           CBLGetDlgCode
 804  */
 805 static LRESULT CBLGetDlgCode( HWND hwnd, WPARAM wParam, LPARAM lParam )
 806 {
 807   return DLGC_WANTARROWS | DLGC_WANTCHARS;
 808 }
 809
 810 /***********************************************************************
 811  *           CBLKeyDown
 812  */
 813 static LRESULT CBLKeyDown( HWND hwnd, WPARAM wParam, LPARAM lParam )
 814 {
 815   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
 816   WORD newFocused = lphl->ItemFocused;
 817
 818   switch(wParam) {
 819   case VK_HOME:
 820     newFocused = 0;
 821     break;
 822   case VK_END:
 823     newFocused = lphl->ItemsCount - 1;
 824     break;
 825   case VK_UP:
 826     if (newFocused > 0) newFocused--;
 827     break;
 828   case VK_DOWN:
 829     newFocused++;
 830     break;
 831   case VK_PRIOR:
 832     if (newFocused > lphl->ItemsVisible) {
 833       newFocused -= lphl->ItemsVisible;
 834     } else {
 835       newFocused = 0;
 836     }
 837     break;
 838   case VK_NEXT:
 839     newFocused += lphl->ItemsVisible;
 840     break;
 841   default:
 842     return 0;
 843   }
 844
 845   if (newFocused >= lphl->ItemsCount)
 846     newFocused = lphl->ItemsCount - 1;
 847
 848   ListBoxSetCurSel(lphl, newFocused);
 849   ListBoxSendNotification(lphl, CBN_SELCHANGE);
 850   SendMessage16(GetParent(hwnd), WM_COMMAND,ID_CLB,MAKELONG(0,CBN_SELCHANGE));
 851   lphl->ItemFocused = newFocused;
 852   ListBoxScrollToFocus(lphl);
 853   SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
 854   InvalidateRect32( hwnd, NULL, TRUE );
 855   return 0;
 856 }
 857
 858 /***********************************************************************
 859  *           CBLChar
 860  */
 861 static LRESULT CBLChar( HWND hwnd, WPARAM wParam, LPARAM lParam )
 862 {
 863   return 0;
 864 }
 865
 866 /***********************************************************************
 867  *           CBLPaint
 868  */
 869 static LRESULT CBLPaint( HWND hwnd, WPARAM wParam, LPARAM lParam )
 870 {
 871   LPHEADLIST   lphl = CLBoxGetListHeader(hwnd);
 872   LPLISTSTRUCT lpls;
 873   PAINTSTRUCT16  ps;
 874   HBRUSH       hBrush;
 875   HFONT        hOldFont;
 876   WND * wndPtr = WIN_FindWndPtr(hwnd);
 877   HWND  combohwnd = CLBoxGetCombo(hwnd);
 878   HDC16 hdc;
 879   RECT16 rect;
 880   int   i, top, height;
 881
 882   top = 0;
 883   hdc = BeginPaint16( hwnd, &ps );
 884
 885   if (!IsWindowVisible(hwnd) || !lphl->bRedrawFlag) {
 886     EndPaint16(hwnd, &ps);
 887     return 0;
 888   }
 889
 890   hOldFont = SelectObject(hdc, lphl->hFont);
 891   /* listboxes should be white */
 892   hBrush = GetStockObject(WHITE_BRUSH);
 893
 894   GetClientRect16(hwnd, &rect);
 895   FillRect16(hdc, &rect, hBrush);
 896   CBLCheckSize(hwnd);
 897
 898   lpls = lphl->lpFirst;
 899
 900   lphl->ItemsVisible = 0;
 901   for(i = 0; i < lphl->ItemsCount; i++) {
 902     if (lpls == NULL) break;
 903
 904     if (i >= lphl->FirstVisible) {
 905       height = lpls->mis.itemHeight;
 906       /* must have enough room to draw entire item */
 907       if (top > (rect.bottom-height+1)) break;
 908
 909       lpls->itemRect.top    = top;
 910       lpls->itemRect.bottom = top + height;
 911       lpls->itemRect.left   = rect.left;
 912       lpls->itemRect.right  = rect.right;
 913
 914       dprintf_listbox(stddeb,"drawing item: %d %d %d %d %d\n",
 915                       rect.left,top,rect.right,top+height,lpls->itemState);
 916       if (lphl->OwnerDrawn) {
 917         ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_DRAWENTIRE, 0);
 918         if (lpls->itemState)
 919           ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_SELECT, ODS_SELECTED);
 920       } else {
 921         ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_DRAWENTIRE,
 922                          lpls->itemState);
 923       }
 924       if ((lphl->ItemFocused == i) && GetFocus() == hwnd)
 925         ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_FOCUS, ODS_FOCUS);
 926
 927       top += height;
 928       lphl->ItemsVisible++;
 929     }
 930
 931     lpls = lpls->lpNext;
 932   }
 933
 934   if (wndPtr->dwStyle & WS_VSCROLL)
 935       SetScrollRange(hwnd, SB_VERT, 0, ListMaxFirstVisible(lphl), TRUE);
 936
 937   SelectObject(hdc,hOldFont);
 938   EndPaint16( hwnd, &ps );
 939   return 0;
 940
 941 }
 942
 943 /***********************************************************************
 944  *           CBLKillFocus
 945  */
 946 static LRESULT CBLKillFocus( HWND hwnd, WPARAM wParam, LPARAM lParam )
 947 {
 948 /*  SendMessage16(CLBoxGetCombo(hwnd),CB_SHOWDROPDOWN,0,0);*/
 949   return 0;
 950 }
 951
 952 /***********************************************************************
 953  *           CBLActivate
 954  */
 955 static LRESULT CBLActivate( HWND hwnd, WPARAM wParam, LPARAM lParam )
 956 {
 957   if (wParam == WA_INACTIVE)
 958     SendMessage16(CLBoxGetCombo(hwnd),CB_SHOWDROPDOWN,0,0);
 959   return 0;
 960 }
 961
 962 /***********************************************************************
 963  *           CBLLButtonDown
 964  */
 965 static LRESULT CBLLButtonDown( HWND hwnd, WPARAM wParam, LPARAM lParam )
 966 {
 967   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
 968   int        y;
 969   RECT16     rectsel;
 970
 971   SetFocus(hwnd);
 972   SetCapture(hwnd);
 973
 974   lphl->PrevFocused = lphl->ItemFocused;
 975
 976   y = ListBoxFindMouse(lphl, LOWORD(lParam), HIWORD(lParam));
 977   if (y == -1)
 978     return 0;
 979
 980   ListBoxSetCurSel(lphl, y);
 981   ListBoxGetItemRect(lphl, y, &rectsel);
 982
 983   InvalidateRect32( hwnd, NULL, TRUE );
 984   return 0;
 985 }
 986
 987 /***********************************************************************
 988  *           CBLLButtonUp
 989  */
 990 static LRESULT CBLLButtonUp( HWND hwnd, WPARAM wParam, LPARAM lParam )
 991 {
 992   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
 993
 994   if (GetCapture() == hwnd) ReleaseCapture();
 995
 996   if(!lphl)
 997      {
 998       fprintf(stdnimp,"CBLLButtonUp: CLBoxGetListHeader returned NULL!\n");
 999      }
1000   else if (lphl->PrevFocused != lphl->ItemFocused)
1001           {
1002                 SendMessage16(CLBoxGetCombo(hwnd),CB_SETCURSEL,lphl->ItemFocused,0);
1003                 SendMessage16(GetParent(hwnd), WM_COMMAND,ID_CLB,MAKELONG(0,CBN_SELCHANGE));
1004                 ListBoxSendNotification(lphl, CBN_SELCHANGE);
1005           }
1006
1007   SendMessage16(CLBoxGetCombo(hwnd),CB_SHOWDROPDOWN,0,0);
1008
1009   return 0;
1010 }
1011
1012 /***********************************************************************
1013  *           CBLMouseMove
1014  */
1015 static LRESULT CBLMouseMove( HWND hwnd, WPARAM wParam, LPARAM lParam )
1016 {
1017   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
1018   short y;
1019   WORD wRet;
1020   RECT16 rect, rectsel;
1021
1022   y = SHIWORD(lParam);
1023   wRet = ListBoxFindMouse(lphl, LOWORD(lParam), HIWORD(lParam));
1024   ListBoxGetItemRect(lphl, wRet, &rectsel);
1025   GetClientRect16(hwnd, &rect);
1026
1027   dprintf_combo(stddeb,"CBLMouseMove: hwnd %04x wp %x lp %lx  y %d  if %d wret %d %d,%d-%d,%d\n",
1028 hwnd,wParam,lParam,y,lphl->ItemFocused,wRet,rectsel.left,rectsel.top,rectsel.right,rectsel.bottom);
1029
1030   if ((wParam & MK_LBUTTON) != 0) {
1031     if (y < CBLMM_EDGE) {
1032       if (lphl->FirstVisible > 0) {
1033         lphl->FirstVisible--;
1034         SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
1035         ListBoxSetCurSel(lphl, wRet);
1036         InvalidateRect32( hwnd, NULL, TRUE );
1037         return 0;
1038       }
1039     }
1040     else if (y >= (rect.bottom-CBLMM_EDGE)) {
1041       if (lphl->FirstVisible < ListMaxFirstVisible(lphl)) {
1042         lphl->FirstVisible++;
1043         SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
1044         ListBoxSetCurSel(lphl, wRet);
1045         InvalidateRect32( hwnd, NULL, TRUE );
1046         return 0;
1047       }
1048     }
1049     else {
1050       if ((short) wRet == lphl->ItemFocused) return 0;
1051       ListBoxSetCurSel(lphl, wRet);
1052       InvalidateRect32( hwnd, NULL, TRUE );
1053     }
1054   }
1055
1056   return 0;
1057 }
1058
1059 /***********************************************************************
1060  *           CBLVScroll
1061  */
1062 static LRESULT CBLVScroll( HWND hwnd, WPARAM wParam, LPARAM lParam )
1063 {
1064   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
1065   int  y;
1066
1067   y = lphl->FirstVisible;
1068
1069   switch(wParam) {
1070   case SB_LINEUP:
1071     if (lphl->FirstVisible > 0)
1072       lphl->FirstVisible--;
1073     break;
1074
1075   case SB_LINEDOWN:
1076     lphl->FirstVisible++;
1077     break;
1078
1079   case SB_PAGEUP:
1080     if (lphl->FirstVisible > lphl->ItemsVisible) {
1081       lphl->FirstVisible -= lphl->ItemsVisible;
1082     } else {
1083       lphl->FirstVisible = 0;
1084     }
1085     break;
1086
1087   case SB_PAGEDOWN:
1088     lphl->FirstVisible += lphl->ItemsVisible;
1089     break;
1090
1091   case SB_THUMBTRACK:
1092     lphl->FirstVisible = LOWORD(lParam);
1093     break;
1094   }
1095
1096   if (lphl->FirstVisible > ListMaxFirstVisible(lphl))
1097     lphl->FirstVisible = ListMaxFirstVisible(lphl);
1098
1099   if (y != lphl->FirstVisible) {
1100     SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
1101     InvalidateRect32( hwnd, NULL, TRUE );
1102   }
1103
1104   return 0;
1105 }
1106
1107
1108 /***********************************************************************
1109  *             CBLCheckSize
1110  */
1111 static BOOL CBLCheckSize(HWND hwnd)
1112 {
1113   LPHEADCOMBO  lphc = ComboGetStorageHeader(hwnd);
1114   LPHEADLIST   lphl = ComboGetListHeader(hwnd);
1115   LPLISTSTRUCT lpls;
1116   HWND         hWndLBox;
1117   RECT16 cRect,wRect,lRect,lwRect;
1118   int totheight,dw;
1119   char className[80];
1120
1121   GetClassName32A(hwnd,className,80);
1122   fflush(stddeb);
1123   if (strncmp(className,"COMBOBOX",8)) return FALSE;
1124   if ((hWndLBox = lphc->hWndLBox) == 0) return FALSE;
1125   dprintf_combo(stddeb,"CBLCheckSize headers hw %04x  lb %04x  name %s\n",
1126                 hwnd,hWndLBox,className);
1127
1128   GetClientRect16(hwnd,&cRect);
1129   GetWindowRect16(hwnd,&wRect);
1130   GetClientRect16(hWndLBox,&lRect);
1131   GetWindowRect16(hWndLBox,&lwRect);
1132
1133   dprintf_combo(stddeb,"CBLCheckSize: init cRect %d,%d-%d,%d  wRect %d,%d-%d,%d\n",
1134                 cRect.left,cRect.top,cRect.right,cRect.bottom,
1135                 wRect.left,wRect.top,wRect.right,wRect.bottom);
1136   dprintf_combo(stddeb,"                   lRect %d,%d-%d,%d  lwRect %d,%d-%d,%d\n",
1137               lRect.left,lRect.top,lRect.right,lRect.bottom,
1138               lwRect.left,lwRect.top,lwRect.right,lwRect.bottom);
1139   fflush(stddeb);
1140
1141   totheight = 0;
1142   for (lpls=lphl->lpFirst; lpls != NULL; lpls=lpls->lpNext)
1143     totheight += lpls->mis.itemHeight;
1144
1145   dw = cRect.right-cRect.left+2*SYSMETRICS_CXBORDER+SYSMETRICS_CXVSCROLL;
1146   dw -= lwRect.right-lwRect.left;
1147   dw -= SYSMETRICS_CXVSCROLL;
1148
1149   /* TODO: This isn't really what windows does */
1150   if ((lRect.bottom-lRect.top < 3*lphl->StdItemHeight) || dw) {
1151     dprintf_combo(stddeb,"    Changing; totHeight %d  StdItemHght %d  dw %d\n",
1152                   totheight,lphl->StdItemHeight,dw);
1153     SetWindowPos(hWndLBox, 0, lRect.left, lRect.top,
1154                  lwRect.right-lwRect.left+dw, totheight+2*SYSMETRICS_CYBORDER,
1155                  SWP_NOMOVE | SWP_NOZORDER | SWP_NOREDRAW | SWP_NOACTIVATE );
1156   }
1157   return TRUE;
1158 }
1159
1160
1161 /***********************************************************************
1162  *           ComboLBoxWndProc
1163  */
1164 LRESULT ComboLBoxWndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
1165 {
1166     switch(message) {
1167      case WM_CREATE: return CBLCreate(hwnd, wParam, lParam);
1168      case WM_GETDLGCODE: return CBLGetDlgCode(hwnd, wParam, lParam);
1169      case WM_KEYDOWN: return CBLKeyDown(hwnd, wParam, lParam);
1170      case WM_CHAR: return CBLChar(hwnd, wParam, lParam);
1171      case WM_PAINT: return CBLPaint(hwnd, wParam, lParam);
1172      case WM_KILLFOCUS: return CBLKillFocus(hwnd, wParam, lParam);
1173      case WM_ACTIVATE: return CBLActivate(hwnd, wParam, lParam);
1174      case WM_LBUTTONDOWN: return CBLLButtonDown(hwnd, wParam, lParam);
1175      case WM_LBUTTONUP: return CBLLButtonUp(hwnd, wParam, lParam);
1176      case WM_MOUSEMOVE: return CBLMouseMove(hwnd, wParam, lParam);
1177      case WM_VSCROLL: return CBLVScroll(hwnd, wParam, lParam);
1178      case WM_SIZE: return CBLCheckSize(hwnd);
1179     }
1180     return DefWindowProc16(hwnd, message, wParam, lParam);
1181 }
1182
1183 /************************************************************************
1184  *                              DlgDirSelectComboBox    [USER.194]
1185  */
1186 BOOL DlgDirSelectComboBox(HWND hDlg, LPSTR lpStr, INT nIDLBox)
1187 {
1188         fprintf(stdnimp,"DlgDirSelectComboBox(%04x, '%s', %d) \n",
1189                                 hDlg, lpStr, nIDLBox);
1190         return TRUE;
1191 }
1192
1193 static INT32 COMBO_DlgDirList( HWND32 hDlg, LPARAM path, INT32 idCBox,
1194                                INT32 idStatic, UINT32 wType, BOOL32 unicode )
1195 {
1196     LRESULT res = 0;
1197
1198     if (idCBox)
1199     {
1200         SendDlgItemMessage32A( hDlg, idCBox, CB_RESETCONTENT, 0, 0 );
1201         if (unicode)
1202             res = SendDlgItemMessage32W( hDlg, idCBox, CB_DIR, wType, path );
1203         else
1204             res = SendDlgItemMessage32A( hDlg, idCBox, CB_DIR, wType, path );
1205     }
1206     if (idStatic)
1207     {
1208         char temp[512] = "A:\\";
1209         int drive = DRIVE_GetCurrentDrive();
1210         temp[0] += drive;
1211         lstrcpyn( temp + 3, DRIVE_GetDosCwd(drive), sizeof(temp)-3 );
1212         AnsiLower( temp );
1213         SetDlgItemText32A( hDlg, idStatic, temp );
1214     }
1215     return (res >= 0);
1216 }
1217
1218
1219 /***********************************************************************
1220  *           DlgDirListComboBox16   (USER.195)
1221  */
1222 INT16 DlgDirListComboBox16( HWND16 hDlg, LPCSTR path, INT16 idCBox,
1223                             INT16 idStatic, UINT16 wType )
1224 {
1225     dprintf_combo( stddeb,"DlgDirListComboBox16(%04x,'%s',%d,%d,%04x)\n",
1226                    hDlg, path, idCBox, idStatic, wType );
1227     return COMBO_DlgDirList( hDlg, (LPARAM)path, idCBox,
1228                              idStatic, wType, FALSE );
1229 }
1230
1231
1232 /***********************************************************************
1233  *           DlgDirListComboBox32A   (USER32.143)
1234  */
1235 INT32 DlgDirListComboBox32A( HWND32 hDlg, LPCSTR path, INT32 idCBox,
1236                              INT32 idStatic, UINT32 wType )
1237 {
1238     dprintf_combo( stddeb,"DlgDirListComboBox32A(%08x,'%s',%d,%d,%08X)\n",
1239                    hDlg, path, idCBox, idStatic, wType );
1240     return COMBO_DlgDirList( hDlg, (LPARAM)path, idCBox,
1241                              idStatic, wType, FALSE );
1242 }
1243
1244
1245 /***********************************************************************
1246  *           DlgDirListComboBox32W   (USER32.144)
1247  */
1248 INT32 DlgDirListComboBox32W( HWND32 hDlg, LPCWSTR path, INT32 idCBox,
1249                              INT32 idStatic, UINT32 wType )
1250 {
1251     dprintf_combo( stddeb,"DlgDirListComboBox32W(%08x,%p,%d,%d,%08X)\n",
1252                    hDlg, path, idCBox, idStatic, wType );
1253     return COMBO_DlgDirList( hDlg, (LPARAM)path, idCBox,
1254                              idStatic, wType, TRUE );
1255 }