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   BITMAP16 bm;
  52
  53   dprintf_combo(stddeb, "COMBO_Init\n");
  54   hComboBit = LoadBitmap16(0, MAKEINTRESOURCE(OBM_COMBO));
  55   GetObject16( hComboBit, sizeof(bm), &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   hBrush = SendMessage32A( lphl->hParent, WM_CTLCOLORLISTBOX, hdc, hwnd );
 260   if (hBrush == 0) hBrush = GetStockObject(WHITE_BRUSH);
 261
 262   lpls = ListBoxGetItem(lphl,lphl->ItemFocused);
 263   if (lpls != NULL) {
 264     FillRect16(hdc, &rect, hBrush);
 265     ListBoxDrawItem (hwnd, lphl, hdc, lpls, &rect, ODA_DRAWENTIRE, 0);
 266     if (GetFocus() == hwnd)
 267     ListBoxDrawItem (hwnd,lphl, hdc, lpls, &rect, ODA_FOCUS, ODS_FOCUS);
 268   }
 269   else FillRect16(hdc, &rect, hBrush);
 270   SelectObject(hdc,hOldFont);
 271   EndPaint16(hwnd, &ps);
 272   return 0;
 273 }
 274
 275 /***********************************************************************
 276  *           CBGetDlgCode
 277  */
 278 static LRESULT CBGetDlgCode(HWND hwnd, WPARAM wParam, LPARAM lParam)
 279 {
 280   return DLGC_WANTARROWS | DLGC_WANTCHARS;
 281 }
 282
 283 /***********************************************************************
 284  *           CBLButtonDown
 285  */
 286 static LRESULT CBLButtonDown(HWND hwnd, WPARAM wParam, LPARAM lParam)
 287 {
 288   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 289   SendMessage16(hwnd,CB_SHOWDROPDOWN,!lphc->DropDownVisible,0);
 290   return 0;
 291 }
 292
 293 /***********************************************************************
 294  *           CBKeyDown
 295  */
 296 static LRESULT CBKeyDown(HWND hwnd, WPARAM wParam, LPARAM lParam)
 297 {
 298   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 299   WORD       newFocused = lphl->ItemFocused;
 300
 301   switch(wParam) {
 302   case VK_HOME:
 303     newFocused = 0;
 304     break;
 305   case VK_END:
 306     newFocused = lphl->ItemsCount - 1;
 307     break;
 308   case VK_UP:
 309     if (newFocused > 0) newFocused--;
 310     break;
 311   case VK_DOWN:
 312     newFocused++;
 313     break;
 314   default:
 315     return 0;
 316   }
 317
 318   if (newFocused >= lphl->ItemsCount)
 319     newFocused = lphl->ItemsCount - 1;
 320
 321   ListBoxSetCurSel(lphl, newFocused);
 322   SendMessage16(hwnd, WM_COMMAND,ID_CLB,MAKELONG(0,CBN_SELCHANGE));
 323   ListBoxSendNotification(lphl, CBN_SELCHANGE);
 324
 325   lphl->ItemFocused = newFocused;
 326   ListBoxScrollToFocus(lphl);
 327 /*  SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);*/
 328   InvalidateRect32( hwnd, NULL, TRUE );
 329
 330   return 0;
 331 }
 332
 333 /***********************************************************************
 334  *           CBChar
 335  */
 336 static LRESULT CBChar(HWND hwnd, WPARAM wParam, LPARAM lParam)
 337 {
 338   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 339   WORD       newFocused;
 340
 341   newFocused = ListBoxFindNextMatch(lphl, wParam);
 342   if (newFocused == (WORD)LB_ERR) return 0;
 343
 344   if (newFocused >= lphl->ItemsCount)
 345     newFocused = lphl->ItemsCount - 1;
 346
 347   ListBoxSetCurSel(lphl, newFocused);
 348   SendMessage16(hwnd, WM_COMMAND,ID_CLB,MAKELONG(0,CBN_SELCHANGE));
 349   ListBoxSendNotification(lphl, CBN_SELCHANGE);
 350   lphl->ItemFocused = newFocused;
 351   ListBoxScrollToFocus(lphl);
 352
 353 /*  SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);*/
 354   InvalidateRect32( hwnd, NULL, TRUE );
 355
 356   return 0;
 357 }
 358
 359 /***********************************************************************
 360  *           CBKillFocus
 361  */
 362 static LRESULT CBKillFocus(HWND hwnd, WPARAM wParam, LPARAM lParam)
 363 {
 364   return 0;
 365 }
 366
 367 /***********************************************************************
 368  *           CBSetFocus
 369  */
 370 static LRESULT CBSetFocus(HWND hwnd, WPARAM wParam, LPARAM lParam)
 371 {
 372   return 0;
 373 }
 374
 375 /***********************************************************************
 376  *           CBResetContent
 377  */
 378 static LRESULT CBResetContent(HWND hwnd, WPARAM wParam, LPARAM lParam)
 379 {
 380   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 381   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 382
 383   ListBoxResetContent(lphl);
 384   ComboUpdateWindow(hwnd, lphl, lphc, TRUE);
 385   return 0;
 386 }
 387
 388 /***********************************************************************
 389  *           CBDir
 390  */
 391 static LRESULT CBDir(HWND hwnd, WPARAM wParam, LPARAM lParam)
 392 {
 393   WORD wRet;
 394   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 395   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 396
 397   wRet = ListBoxDirectory(lphl, wParam, (LPSTR)PTR_SEG_TO_LIN(lParam));
 398   ComboUpdateWindow(hwnd, lphl, lphc, TRUE);
 399   return wRet;
 400 }
 401
 402 /***********************************************************************
 403  *           CBInsertString
 404  */
 405 static LRESULT CBInsertString(HWND hwnd, WPARAM wParam, LPARAM lParam)
 406 {
 407   WORD  wRet;
 408   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 409   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 410
 411   if (lphl->HasStrings)
 412     wRet = ListBoxInsertString(lphl, wParam, (LPSTR)PTR_SEG_TO_LIN(lParam));
 413   else
 414     wRet = ListBoxInsertString(lphl, wParam, (LPSTR)lParam);
 415   ComboUpdateWindow(hwnd, lphl, lphc, TRUE);
 416   return wRet;
 417 }
 418
 419 /***********************************************************************
 420  *           CBAddString
 421  */
 422 static LRESULT CBAddString(HWND hwnd, WPARAM wParam, LPARAM lParam)
 423 {
 424   WORD  wRet;
 425   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 426   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 427
 428   wRet = ListBoxAddString(lphl, (SEGPTR)lParam);
 429
 430   ComboUpdateWindow(hwnd, lphl, lphc, TRUE);
 431   return wRet;
 432 }
 433
 434 /***********************************************************************
 435  *           CBDeleteString
 436  */
 437 static LRESULT CBDeleteString(HWND hwnd, WPARAM wParam, LPARAM lParam)
 438 {
 439   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 440   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 441   LONG lRet = ListBoxDeleteString(lphl,wParam);
 442
 443   ComboUpdateWindow(hwnd, lphl, lphc, TRUE);
 444   return lRet;
 445 }
 446
 447 /***********************************************************************
 448  *           CBSelectString
 449  */
 450 static LRESULT CBSelectString(HWND hwnd, WPARAM wParam, LPARAM lParam)
 451 {
 452   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 453   WORD  wRet;
 454
 455   wRet = ListBoxFindString(lphl, wParam, (SEGPTR)lParam);
 456
 457   /* XXX add functionality here */
 458
 459   return 0;
 460 }
 461
 462 /***********************************************************************
 463  *           CBFindString
 464  */
 465 static LRESULT CBFindString(HWND hwnd, WPARAM wParam, LPARAM lParam)
 466 {
 467   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 468   return ListBoxFindString(lphl, wParam, (SEGPTR)lParam);
 469 }
 470
 471 /***********************************************************************
 472  *           CBGetCount
 473  */
 474 static LRESULT CBGetCount(HWND hwnd, WPARAM wParam, LPARAM lParam)
 475 {
 476   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 477   return lphl->ItemsCount;
 478 }
 479
 480 /***********************************************************************
 481  *           CBSetCurSel
 482  */
 483 static LRESULT CBSetCurSel(HWND hwnd, WPARAM wParam, LPARAM lParam)
 484 {
 485   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 486   WORD  wRet;
 487
 488   wRet = ListBoxSetCurSel(lphl, wParam);
 489
 490   dprintf_combo(stddeb,"CBSetCurSel: hwnd %04x wp %x lp %lx wRet %d\n",
 491                 hwnd,wParam,lParam,wRet);
 492 /*  SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);*/
 493   InvalidateRect32( hwnd, NULL, TRUE );
 494
 495   return wRet;
 496 }
 497
 498 /***********************************************************************
 499  *           CBGetCurSel
 500  */
 501 static LRESULT CBGetCurSel(HWND hwnd, WPARAM wParam, LPARAM lParam)
 502 {
 503   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 504   return lphl->ItemFocused;
 505 }
 506
 507 /***********************************************************************
 508  *           CBGetItemHeight
 509  */
 510 static LRESULT CBGetItemHeight(HWND hwnd, WPARAM wParam, LPARAM lParam)
 511 {
 512   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 513   LPLISTSTRUCT lpls = ListBoxGetItem (lphl, wParam);
 514
 515   if (lpls == NULL) return LB_ERR;
 516   return lpls->mis.itemHeight;
 517 }
 518
 519 /***********************************************************************
 520  *           CBSetItemHeight
 521  */
 522 static LRESULT CBSetItemHeight(HWND hwnd, WPARAM wParam, LPARAM lParam)
 523 {
 524   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 525   return ListBoxSetItemHeight(lphl, wParam, lParam);
 526 }
 527
 528 /***********************************************************************
 529  *           CBSetRedraw
 530  */
 531 static LRESULT CBSetRedraw(HWND hwnd, WPARAM wParam, LPARAM lParam)
 532 {
 533   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 534   lphl->bRedrawFlag = wParam;
 535   return 0;
 536 }
 537
 538 /***********************************************************************
 539  *           CBSetFont
 540  */
 541 static LRESULT CBSetFont(HWND hwnd, WPARAM wParam, LPARAM lParam)
 542 {
 543   LPHEADLIST  lphl = ComboGetListHeader(hwnd);
 544   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 545
 546   if (wParam == 0)
 547     lphl->hFont = GetStockObject(SYSTEM_FONT);
 548   else
 549     lphl->hFont = (HFONT)wParam;
 550   if (lphc->hWndEdit)
 551      SendMessage16(lphc->hWndEdit,WM_SETFONT,lphl->hFont,0);
 552   return 0;
 553 }
 554
 555 /***********************************************************************
 556  *           CBGetLBTextLen
 557  */
 558 static LRESULT CBGetLBTextLen(HWND hwnd, WPARAM wParam, LPARAM lParam)
 559 {
 560   LPHEADLIST   lphl = ComboGetListHeader(hwnd);
 561   LPLISTSTRUCT lpls = ListBoxGetItem(lphl,wParam);
 562
 563   if (lpls == NULL || !lphl->HasStrings) return LB_ERR;
 564   return strlen(lpls->itemText);
 565 }
 566
 567 /***********************************************************************
 568  *           CBGetLBText
 569  */
 570 static LRESULT CBGetLBText(HWND hwnd, WPARAM wParam, LPARAM lParam)
 571 {
 572   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 573   return ListBoxGetText(lphl, wParam, (LPSTR)PTR_SEG_TO_LIN(lParam));
 574 }
 575
 576 /***********************************************************************
 577  *           CBGetItemData
 578  */
 579 static LRESULT CBGetItemData(HWND hwnd, WPARAM wParam, LPARAM lParam)
 580 {
 581   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 582   return ListBoxGetItemData(lphl, wParam);
 583 }
 584
 585 /***********************************************************************
 586  *           CBSetItemData
 587  */
 588 static LRESULT CBSetItemData(HWND hwnd, WPARAM wParam, LPARAM lParam)
 589 {
 590   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 591   return ListBoxSetItemData(lphl, wParam, lParam);
 592 }
 593
 594 /***********************************************************************
 595  *           CBShowDropDown
 596  */
 597 static LRESULT CBShowDropDown(HWND hwnd, WPARAM wParam, LPARAM lParam)
 598 {
 599   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 600   RECT32 rect;
 601
 602   if ((lphc->dwStyle & 3) == CBS_SIMPLE) return LB_ERR;
 603
 604   wParam = !!wParam;
 605   if (wParam != lphc->DropDownVisible) {
 606     lphc->DropDownVisible = wParam;
 607     GetWindowRect32(hwnd,&rect);
 608     SetWindowPos(lphc->hWndLBox, 0, rect.left, rect.top+lphc->LBoxTop, 0, 0,
 609                  SWP_NOSIZE | (wParam ? SWP_SHOWWINDOW : SWP_HIDEWINDOW));
 610     if (!wParam) SetFocus(hwnd);
 611   }
 612   return 0;
 613 }
 614
 615
 616 /***********************************************************************
 617  *             CBCheckSize
 618  */
 619 static BOOL CBCheckSize(HWND hwnd)
 620 {
 621   LPHEADCOMBO  lphc = ComboGetStorageHeader(hwnd);
 622   LPHEADLIST   lphl = ComboGetListHeader(hwnd);
 623   LONG         cstyle = GetWindowLong32A(hwnd,GWL_STYLE);
 624   RECT16       cRect,wRect;
 625
 626   if (lphc->hWndLBox == 0) return FALSE;
 627
 628   GetClientRect16(hwnd,&cRect);
 629   GetWindowRect16(hwnd,&wRect);
 630
 631   dprintf_combo(stddeb,
 632          "CBCheckSize: hwnd %04x Rect %d,%d-%d,%d  wRect %d,%d-%d,%d\n",
 633                 hwnd,cRect.left,cRect.top,cRect.right,cRect.bottom,
 634                 wRect.left,wRect.top,wRect.right,wRect.bottom);
 635   if ((cstyle & 3) == CBS_SIMPLE  ) return TRUE ;
 636
 637   if ((cRect.bottom - cRect.top) >
 638       (lphl->StdItemHeight + 2*SYSMETRICS_CYBORDER)) {
 639     SetWindowPos(hwnd, 0, 0, 0,
 640                  cRect.right-cRect.left,
 641                  lphl->StdItemHeight+2*SYSMETRICS_CYBORDER,
 642                  SWP_NOMOVE | SWP_NOZORDER | SWP_NOREDRAW | SWP_NOACTIVATE );
 643     GetClientRect16(hwnd,&cRect);
 644     GetWindowRect16(hwnd,&wRect);
 645
 646     lphc->RectButton.right = cRect.right;
 647     lphc->RectButton.left = cRect.right - 2*SYSMETRICS_CXBORDER - 4
 648                             - CBitWidth;
 649     lphc->RectButton.top = cRect.top;
 650     lphc->RectButton.bottom = cRect.bottom;
 651   }
 652
 653   if (cRect.right < lphc->RectButton.left) {
 654     /* if the button is outside the window, move it in */
 655     if ((wRect.right - wRect.left - 2*SYSMETRICS_CXBORDER) == (cRect.right - cRect.left)) {
 656       lphc->RectButton.right = cRect.right;
 657       lphc->RectButton.left = cRect.right - 2*SYSMETRICS_CXBORDER - 4
 658                                - CBitWidth;
 659       lphc->RectButton.top = cRect.top;
 660       lphc->RectButton.bottom = cRect.bottom;
 661     }
 662     /* otherwise we need to make the client include the button */
 663     else
 664       SetWindowPos(hwnd, 0, 0, 0, lphc->RectButton.right,
 665                    lphl->StdItemHeight+2*SYSMETRICS_CYBORDER,
 666                    SWP_NOMOVE | SWP_NOZORDER | SWP_NOREDRAW | SWP_NOACTIVATE );
 667   }
 668
 669   CBLCheckSize(hwnd);
 670   return TRUE;
 671 }
 672
 673 /***********************************************************************
 674  *           CBCommand
 675  */
 676 static LRESULT CBCommand(HWND hwnd, WPARAM wParam, LPARAM lParam)
 677 {
 678   LPHEADCOMBO lphc = ComboGetStorageHeader(hwnd);
 679   LPHEADLIST lphl = ComboGetListHeader(hwnd);
 680   char       buffer[256];
 681   WORD       newFocused;
 682   WORD       id;
 683   if (lphc->hWndEdit)  /* interdependence only used for CBS_SIMPLE and CBS_DROPDOWN styles */
 684   {
 685    switch (wParam)
 686    {
 687     case ID_CLB:                                        /* update EDIT window */
 688                 if (HIWORD(lParam)==CBN_SELCHANGE)
 689                  if (lphl->HasStrings)
 690                  {
 691                   ListBoxGetText(lphl,lphl->ItemFocused, buffer);
 692                   dprintf_combo(stddeb,"CBCommand: update Edit: %s\n",buffer);
 693                   SetWindowText32A( lphc->hWndEdit, buffer );
 694                  }
 695                 break;
 696     case ID_EDIT:                                      /* update LISTBOX window */
 697                  id=GetWindowWord(hwnd,GWW_ID);
 698                  switch (HIWORD(lParam))
 699                  {
 700                   case EN_UPDATE:GetWindowText32A(lphc->hWndEdit,buffer,255);
 701                                  if (*buffer)
 702                                  {
 703                                   newFocused=ListBoxFindString(lphl, -1, MAKE_SEGPTR(buffer));
 704                                   dprintf_combo(stddeb,"CBCommand: new selection #%d is= %s\n",
 705                                                 newFocused,buffer);
 706                                   if (newFocused != (WORD)LB_ERR)
 707                                   {                             /* if found something */
 708                                    ListBoxSetCurSel(lphl, newFocused);
 709                                    ListBoxSendNotification(lphl, CBN_SELCHANGE);
 710                                    InvalidateRect32(hwnd, NULL, TRUE);
 711                                   }
 712                                  }
 713                                  SendMessage16(GetParent(hwnd),WM_COMMAND,id,
 714                                          MAKELONG(hwnd, CBN_EDITUPDATE));
 715                                  break;
 716                   case EN_CHANGE:SendMessage16(GetParent(hwnd),WM_COMMAND,id,
 717                                          MAKELONG(hwnd, CBN_EDITCHANGE));
 718                                  break;
 719                   case EN_ERRSPACE:SendMessage16(GetParent(hwnd),WM_COMMAND,id,
 720                                          MAKELONG(hwnd, CBN_ERRSPACE));
 721                                  break;
 722                 }
 723                 break;
 724    }
 725   }
 726   return 0;
 727 }
 728
 729
 730 /***********************************************************************
 731  *           ComboWndProc
 732  */
 733 LRESULT ComboBoxWndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
 734 {
 735     switch(message) {
 736      case WM_NCCREATE: return CBNCCreate(hwnd, wParam, lParam);
 737      case WM_CREATE: return CBCreate(hwnd, wParam, lParam);
 738      case WM_DESTROY: return CBDestroy(hwnd, wParam, lParam);
 739      case WM_GETDLGCODE: return CBGetDlgCode(hwnd, wParam, lParam);
 740      case WM_KEYDOWN: return CBKeyDown(hwnd, wParam, lParam);
 741      case WM_CHAR: return CBChar(hwnd, wParam, lParam);
 742      case WM_SETFONT: return CBSetFont(hwnd, wParam, lParam);
 743      case WM_SETREDRAW: return CBSetRedraw(hwnd, wParam, lParam);
 744      case WM_PAINT: return CBPaint(hwnd, wParam, lParam);
 745      case WM_LBUTTONDOWN: return CBLButtonDown(hwnd, wParam, lParam);
 746      case WM_SETFOCUS: return CBSetFocus(hwnd, wParam, lParam);
 747      case WM_KILLFOCUS: return CBKillFocus(hwnd, wParam, lParam);
 748      case WM_SIZE: return CBCheckSize(hwnd);
 749      case WM_COMMAND: return CBCommand(hwnd, wParam, lParam);
 750      case CB_RESETCONTENT: return CBResetContent(hwnd, wParam, lParam);
 751      case CB_DIR: return CBDir(hwnd, wParam, lParam);
 752      case CB_ADDSTRING: return CBAddString(hwnd, wParam, lParam);
 753      case CB_INSERTSTRING: return CBInsertString(hwnd, wParam, lParam);
 754      case CB_DELETESTRING: return CBDeleteString(hwnd, wParam, lParam);
 755      case CB_FINDSTRING: return CBFindString(hwnd, wParam, lParam);
 756      case CB_GETCOUNT: return CBGetCount(hwnd, wParam, lParam);
 757      case CB_GETCURSEL: return CBGetCurSel(hwnd, wParam, lParam);
 758      case CB_GETITEMDATA: return CBGetItemData(hwnd, wParam, lParam);
 759      case CB_GETITEMHEIGHT: return CBGetItemHeight(hwnd, wParam, lParam);
 760      case CB_GETLBTEXT: return CBGetLBText(hwnd, wParam, lParam);
 761      case CB_GETLBTEXTLEN: return CBGetLBTextLen(hwnd, wParam, lParam);
 762      case CB_SELECTSTRING: return CBSelectString(hwnd, wParam, lParam);
 763      case CB_SETITEMDATA: return CBSetItemData(hwnd, wParam, lParam);
 764      case CB_SETCURSEL: return CBSetCurSel(hwnd, wParam, lParam);
 765      case CB_SETITEMHEIGHT: return CBSetItemHeight(hwnd, wParam, lParam);
 766      case CB_SHOWDROPDOWN: return CBShowDropDown(hwnd, wParam, lParam);
 767     }
 768     return DefWindowProc16(hwnd, message, wParam, lParam);
 769 }
 770
 771 /*--------------------------------------------------------------------*/
 772 /* ComboLBox code starts here */
 773
 774 HWND CLBoxGetCombo(HWND hwnd)
 775 {
 776   return (HWND)GetWindowLong32A(hwnd,0);
 777 }
 778
 779 LPHEADLIST CLBoxGetListHeader(HWND hwnd)
 780 {
 781   return ComboGetListHeader(CLBoxGetCombo(hwnd));
 782 }
 783
 784 /***********************************************************************
 785  *           CBLCreate
 786  */
 787 static LRESULT CBLCreate( HWND hwnd, WPARAM wParam, LPARAM lParam )
 788 {
 789   CREATESTRUCT16 *createStruct = (CREATESTRUCT16 *)PTR_SEG_TO_LIN(lParam);
 790   SetWindowLong32A(hwnd,0,(LONG)createStruct->lpCreateParams);
 791   return 0;
 792 }
 793
 794 /***********************************************************************
 795  *           CBLGetDlgCode
 796  */
 797 static LRESULT CBLGetDlgCode( HWND hwnd, WPARAM wParam, LPARAM lParam )
 798 {
 799   return DLGC_WANTARROWS | DLGC_WANTCHARS;
 800 }
 801
 802 /***********************************************************************
 803  *           CBLKeyDown
 804  */
 805 static LRESULT CBLKeyDown( HWND hwnd, WPARAM wParam, LPARAM lParam )
 806 {
 807   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
 808   WORD newFocused = lphl->ItemFocused;
 809
 810   switch(wParam) {
 811   case VK_HOME:
 812     newFocused = 0;
 813     break;
 814   case VK_END:
 815     newFocused = lphl->ItemsCount - 1;
 816     break;
 817   case VK_UP:
 818     if (newFocused > 0) newFocused--;
 819     break;
 820   case VK_DOWN:
 821     newFocused++;
 822     break;
 823   case VK_PRIOR:
 824     if (newFocused > lphl->ItemsVisible) {
 825       newFocused -= lphl->ItemsVisible;
 826     } else {
 827       newFocused = 0;
 828     }
 829     break;
 830   case VK_NEXT:
 831     newFocused += lphl->ItemsVisible;
 832     break;
 833   default:
 834     return 0;
 835   }
 836
 837   if (newFocused >= lphl->ItemsCount)
 838     newFocused = lphl->ItemsCount - 1;
 839
 840   ListBoxSetCurSel(lphl, newFocused);
 841   ListBoxSendNotification(lphl, CBN_SELCHANGE);
 842   SendMessage16(GetParent(hwnd), WM_COMMAND,ID_CLB,MAKELONG(0,CBN_SELCHANGE));
 843   lphl->ItemFocused = newFocused;
 844   ListBoxScrollToFocus(lphl);
 845   SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
 846   InvalidateRect32( hwnd, NULL, TRUE );
 847   return 0;
 848 }
 849
 850 /***********************************************************************
 851  *           CBLChar
 852  */
 853 static LRESULT CBLChar( HWND hwnd, WPARAM wParam, LPARAM lParam )
 854 {
 855   return 0;
 856 }
 857
 858 /***********************************************************************
 859  *           CBLPaint
 860  */
 861 static LRESULT CBLPaint( HWND hwnd, WPARAM wParam, LPARAM lParam )
 862 {
 863   LPHEADLIST   lphl = CLBoxGetListHeader(hwnd);
 864   LPLISTSTRUCT lpls;
 865   PAINTSTRUCT16  ps;
 866   HBRUSH       hBrush;
 867   HFONT        hOldFont;
 868   WND * wndPtr = WIN_FindWndPtr(hwnd);
 869   HWND  combohwnd = CLBoxGetCombo(hwnd);
 870   HDC16 hdc;
 871   RECT16 rect;
 872   int   i, top, height;
 873
 874   top = 0;
 875   hdc = BeginPaint16( hwnd, &ps );
 876
 877   if (!IsWindowVisible(hwnd) || !lphl->bRedrawFlag) {
 878     EndPaint16(hwnd, &ps);
 879     return 0;
 880   }
 881
 882   hOldFont = SelectObject(hdc, lphl->hFont);
 883   /* listboxes should be white */
 884   hBrush = GetStockObject(WHITE_BRUSH);
 885
 886   GetClientRect16(hwnd, &rect);
 887   FillRect16(hdc, &rect, hBrush);
 888   CBLCheckSize(hwnd);
 889
 890   lpls = lphl->lpFirst;
 891
 892   lphl->ItemsVisible = 0;
 893   for(i = 0; i < lphl->ItemsCount; i++) {
 894     if (lpls == NULL) break;
 895
 896     if (i >= lphl->FirstVisible) {
 897       height = lpls->mis.itemHeight;
 898       /* must have enough room to draw entire item */
 899       if (top > (rect.bottom-height+1)) break;
 900
 901       lpls->itemRect.top    = top;
 902       lpls->itemRect.bottom = top + height;
 903       lpls->itemRect.left   = rect.left;
 904       lpls->itemRect.right  = rect.right;
 905
 906       dprintf_listbox(stddeb,"drawing item: %d %d %d %d %d\n",
 907                       rect.left,top,rect.right,top+height,lpls->itemState);
 908       if (lphl->OwnerDrawn) {
 909         ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_DRAWENTIRE, 0);
 910         if (lpls->itemState)
 911           ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_SELECT, ODS_SELECTED);
 912       } else {
 913         ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_DRAWENTIRE,
 914                          lpls->itemState);
 915       }
 916       if ((lphl->ItemFocused == i) && GetFocus() == hwnd)
 917         ListBoxDrawItem (combohwnd, lphl, hdc, lpls, &lpls->itemRect, ODA_FOCUS, ODS_FOCUS);
 918
 919       top += height;
 920       lphl->ItemsVisible++;
 921     }
 922
 923     lpls = lpls->lpNext;
 924   }
 925
 926   if (wndPtr->dwStyle & WS_VSCROLL)
 927       SetScrollRange(hwnd, SB_VERT, 0, ListMaxFirstVisible(lphl), TRUE);
 928
 929   SelectObject(hdc,hOldFont);
 930   EndPaint16( hwnd, &ps );
 931   return 0;
 932
 933 }
 934
 935 /***********************************************************************
 936  *           CBLKillFocus
 937  */
 938 static LRESULT CBLKillFocus( HWND hwnd, WPARAM wParam, LPARAM lParam )
 939 {
 940 /*  SendMessage16(CLBoxGetCombo(hwnd),CB_SHOWDROPDOWN,0,0);*/
 941   return 0;
 942 }
 943
 944 /***********************************************************************
 945  *           CBLActivate
 946  */
 947 static LRESULT CBLActivate( HWND hwnd, WPARAM wParam, LPARAM lParam )
 948 {
 949   if (wParam == WA_INACTIVE)
 950     SendMessage16(CLBoxGetCombo(hwnd),CB_SHOWDROPDOWN,0,0);
 951   return 0;
 952 }
 953
 954 /***********************************************************************
 955  *           CBLLButtonDown
 956  */
 957 static LRESULT CBLLButtonDown( HWND hwnd, WPARAM wParam, LPARAM lParam )
 958 {
 959   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
 960   int        y;
 961   RECT16     rectsel;
 962
 963   SetFocus(hwnd);
 964   SetCapture(hwnd);
 965
 966   lphl->PrevFocused = lphl->ItemFocused;
 967
 968   y = ListBoxFindMouse(lphl, LOWORD(lParam), HIWORD(lParam));
 969   if (y == -1)
 970     return 0;
 971
 972   ListBoxSetCurSel(lphl, y);
 973   ListBoxGetItemRect(lphl, y, &rectsel);
 974
 975   InvalidateRect32( hwnd, NULL, TRUE );
 976   return 0;
 977 }
 978
 979 /***********************************************************************
 980  *           CBLLButtonUp
 981  */
 982 static LRESULT CBLLButtonUp( HWND hwnd, WPARAM wParam, LPARAM lParam )
 983 {
 984   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
 985
 986   if (GetCapture() == hwnd) ReleaseCapture();
 987
 988   if(!lphl)
 989      {
 990       fprintf(stdnimp,"CBLLButtonUp: CLBoxGetListHeader returned NULL!\n");
 991      }
 992   else if (lphl->PrevFocused != lphl->ItemFocused)
 993           {
 994                 SendMessage16(CLBoxGetCombo(hwnd),CB_SETCURSEL,lphl->ItemFocused,0);
 995                 SendMessage16(GetParent(hwnd), WM_COMMAND,ID_CLB,MAKELONG(0,CBN_SELCHANGE));
 996                 ListBoxSendNotification(lphl, CBN_SELCHANGE);
 997           }
 998
 999   SendMessage16(CLBoxGetCombo(hwnd),CB_SHOWDROPDOWN,0,0);
1000
1001   return 0;
1002 }
1003
1004 /***********************************************************************
1005  *           CBLMouseMove
1006  */
1007 static LRESULT CBLMouseMove( HWND hwnd, WPARAM wParam, LPARAM lParam )
1008 {
1009   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
1010   short y;
1011   WORD wRet;
1012   RECT16 rect, rectsel;
1013
1014   y = SHIWORD(lParam);
1015   wRet = ListBoxFindMouse(lphl, LOWORD(lParam), HIWORD(lParam));
1016   ListBoxGetItemRect(lphl, wRet, &rectsel);
1017   GetClientRect16(hwnd, &rect);
1018
1019   dprintf_combo(stddeb,"CBLMouseMove: hwnd %04x wp %x lp %lx  y %d  if %d wret %d %d,%d-%d,%d\n",
1020 hwnd,wParam,lParam,y,lphl->ItemFocused,wRet,rectsel.left,rectsel.top,rectsel.right,rectsel.bottom);
1021
1022   if ((wParam & MK_LBUTTON) != 0) {
1023     if (y < CBLMM_EDGE) {
1024       if (lphl->FirstVisible > 0) {
1025         lphl->FirstVisible--;
1026         SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
1027         ListBoxSetCurSel(lphl, wRet);
1028         InvalidateRect32( hwnd, NULL, TRUE );
1029         return 0;
1030       }
1031     }
1032     else if (y >= (rect.bottom-CBLMM_EDGE)) {
1033       if (lphl->FirstVisible < ListMaxFirstVisible(lphl)) {
1034         lphl->FirstVisible++;
1035         SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
1036         ListBoxSetCurSel(lphl, wRet);
1037         InvalidateRect32( hwnd, NULL, TRUE );
1038         return 0;
1039       }
1040     }
1041     else {
1042       if ((short) wRet == lphl->ItemFocused) return 0;
1043       ListBoxSetCurSel(lphl, wRet);
1044       InvalidateRect32( hwnd, NULL, TRUE );
1045     }
1046   }
1047
1048   return 0;
1049 }
1050
1051 /***********************************************************************
1052  *           CBLVScroll
1053  */
1054 static LRESULT CBLVScroll( HWND hwnd, WPARAM wParam, LPARAM lParam )
1055 {
1056   LPHEADLIST lphl = CLBoxGetListHeader(hwnd);
1057   int  y;
1058
1059   y = lphl->FirstVisible;
1060
1061   switch(wParam) {
1062   case SB_LINEUP:
1063     if (lphl->FirstVisible > 0)
1064       lphl->FirstVisible--;
1065     break;
1066
1067   case SB_LINEDOWN:
1068     lphl->FirstVisible++;
1069     break;
1070
1071   case SB_PAGEUP:
1072     if (lphl->FirstVisible > lphl->ItemsVisible) {
1073       lphl->FirstVisible -= lphl->ItemsVisible;
1074     } else {
1075       lphl->FirstVisible = 0;
1076     }
1077     break;
1078
1079   case SB_PAGEDOWN:
1080     lphl->FirstVisible += lphl->ItemsVisible;
1081     break;
1082
1083   case SB_THUMBTRACK:
1084     lphl->FirstVisible = LOWORD(lParam);
1085     break;
1086   }
1087
1088   if (lphl->FirstVisible > ListMaxFirstVisible(lphl))
1089     lphl->FirstVisible = ListMaxFirstVisible(lphl);
1090
1091   if (y != lphl->FirstVisible) {
1092     SetScrollPos(hwnd, SB_VERT, lphl->FirstVisible, TRUE);
1093     InvalidateRect32( hwnd, NULL, TRUE );
1094   }
1095
1096   return 0;
1097 }
1098
1099
1100 /***********************************************************************
1101  *             CBLCheckSize
1102  */
1103 static BOOL CBLCheckSize(HWND hwnd)
1104 {
1105   LPHEADCOMBO  lphc = ComboGetStorageHeader(hwnd);
1106   LPHEADLIST   lphl = ComboGetListHeader(hwnd);
1107   LPLISTSTRUCT lpls;
1108   HWND         hWndLBox;
1109   RECT16 cRect,wRect,lRect,lwRect;
1110   int totheight,dw;
1111   char className[80];
1112
1113   GetClassName32A(hwnd,className,80);
1114   fflush(stddeb);
1115   if (strncmp(className,"COMBOBOX",8)) return FALSE;
1116   if ((hWndLBox = lphc->hWndLBox) == 0) return FALSE;
1117   dprintf_combo(stddeb,"CBLCheckSize headers hw %04x  lb %04x  name %s\n",
1118                 hwnd,hWndLBox,className);
1119
1120   GetClientRect16(hwnd,&cRect);
1121   GetWindowRect16(hwnd,&wRect);
1122   GetClientRect16(hWndLBox,&lRect);
1123   GetWindowRect16(hWndLBox,&lwRect);
1124
1125   dprintf_combo(stddeb,"CBLCheckSize: init cRect %d,%d-%d,%d  wRect %d,%d-%d,%d\n",
1126                 cRect.left,cRect.top,cRect.right,cRect.bottom,
1127                 wRect.left,wRect.top,wRect.right,wRect.bottom);
1128   dprintf_combo(stddeb,"                   lRect %d,%d-%d,%d  lwRect %d,%d-%d,%d\n",
1129               lRect.left,lRect.top,lRect.right,lRect.bottom,
1130               lwRect.left,lwRect.top,lwRect.right,lwRect.bottom);
1131   fflush(stddeb);
1132
1133   totheight = 0;
1134   for (lpls=lphl->lpFirst; lpls != NULL; lpls=lpls->lpNext)
1135     totheight += lpls->mis.itemHeight;
1136
1137   dw = cRect.right-cRect.left+2*SYSMETRICS_CXBORDER+SYSMETRICS_CXVSCROLL;
1138   dw -= lwRect.right-lwRect.left;
1139   dw -= SYSMETRICS_CXVSCROLL;
1140
1141   /* TODO: This isn't really what windows does */
1142   if ((lRect.bottom-lRect.top < 3*lphl->StdItemHeight) || dw) {
1143     dprintf_combo(stddeb,"    Changing; totHeight %d  StdItemHght %d  dw %d\n",
1144                   totheight,lphl->StdItemHeight,dw);
1145     SetWindowPos(hWndLBox, 0, lRect.left, lRect.top,
1146                  lwRect.right-lwRect.left+dw, totheight+2*SYSMETRICS_CYBORDER,
1147                  SWP_NOMOVE | SWP_NOZORDER | SWP_NOREDRAW | SWP_NOACTIVATE );
1148   }
1149   return TRUE;
1150 }
1151
1152
1153 /***********************************************************************
1154  *           ComboLBoxWndProc
1155  */
1156 LRESULT ComboLBoxWndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
1157 {
1158     switch(message) {
1159      case WM_CREATE: return CBLCreate(hwnd, wParam, lParam);
1160      case WM_GETDLGCODE: return CBLGetDlgCode(hwnd, wParam, lParam);
1161      case WM_KEYDOWN: return CBLKeyDown(hwnd, wParam, lParam);
1162      case WM_CHAR: return CBLChar(hwnd, wParam, lParam);
1163      case WM_PAINT: return CBLPaint(hwnd, wParam, lParam);
1164      case WM_KILLFOCUS: return CBLKillFocus(hwnd, wParam, lParam);
1165      case WM_ACTIVATE: return CBLActivate(hwnd, wParam, lParam);
1166      case WM_LBUTTONDOWN: return CBLLButtonDown(hwnd, wParam, lParam);
1167      case WM_LBUTTONUP: return CBLLButtonUp(hwnd, wParam, lParam);
1168      case WM_MOUSEMOVE: return CBLMouseMove(hwnd, wParam, lParam);
1169      case WM_VSCROLL: return CBLVScroll(hwnd, wParam, lParam);
1170      case WM_SIZE: return CBLCheckSize(hwnd);
1171     }
1172     return DefWindowProc16(hwnd, message, wParam, lParam);
1173 }
1174
1175 /************************************************************************
1176  *                              DlgDirSelectComboBox    [USER.194]
1177  */
1178 BOOL DlgDirSelectComboBox(HWND hDlg, LPSTR lpStr, INT nIDLBox)
1179 {
1180         fprintf(stdnimp,"DlgDirSelectComboBox(%04x, '%s', %d) \n",
1181                                 hDlg, lpStr, nIDLBox);
1182         return TRUE;
1183 }
1184
1185 static INT32 COMBO_DlgDirList( HWND32 hDlg, LPARAM path, INT32 idCBox,
1186                                INT32 idStatic, UINT32 wType, BOOL32 unicode )
1187 {
1188     LRESULT res = 0;
1189
1190     if (idCBox)
1191     {
1192         SendDlgItemMessage32A( hDlg, idCBox, CB_RESETCONTENT, 0, 0 );
1193         if (unicode)
1194             res = SendDlgItemMessage32W( hDlg, idCBox, CB_DIR, wType, path );
1195         else
1196             res = SendDlgItemMessage32A( hDlg, idCBox, CB_DIR, wType, path );
1197     }
1198     if (idStatic)
1199     {
1200         char temp[512] = "A:\\";
1201         int drive = DRIVE_GetCurrentDrive();
1202         temp[0] += drive;
1203         lstrcpyn32A( temp + 3, DRIVE_GetDosCwd(drive), sizeof(temp)-3 );
1204         AnsiLower( temp );
1205         SetDlgItemText32A( hDlg, idStatic, temp );
1206     }
1207     return (res >= 0);
1208 }
1209
1210
1211 /***********************************************************************
1212  *           DlgDirListComboBox16   (USER.195)
1213  */
1214 INT16 DlgDirListComboBox16( HWND16 hDlg, LPCSTR path, INT16 idCBox,
1215                             INT16 idStatic, UINT16 wType )
1216 {
1217     dprintf_combo( stddeb,"DlgDirListComboBox16(%04x,'%s',%d,%d,%04x)\n",
1218                    hDlg, path, idCBox, idStatic, wType );
1219     return COMBO_DlgDirList( hDlg, (LPARAM)path, idCBox,
1220                              idStatic, wType, FALSE );
1221 }
1222
1223
1224 /***********************************************************************
1225  *           DlgDirListComboBox32A   (USER32.143)
1226  */
1227 INT32 DlgDirListComboBox32A( HWND32 hDlg, LPCSTR path, INT32 idCBox,
1228                              INT32 idStatic, UINT32 wType )
1229 {
1230     dprintf_combo( stddeb,"DlgDirListComboBox32A(%08x,'%s',%d,%d,%08X)\n",
1231                    hDlg, path, idCBox, idStatic, wType );
1232     return COMBO_DlgDirList( hDlg, (LPARAM)path, idCBox,
1233                              idStatic, wType, FALSE );
1234 }
1235
1236
1237 /***********************************************************************
1238  *           DlgDirListComboBox32W   (USER32.144)
1239  */
1240 INT32 DlgDirListComboBox32W( HWND32 hDlg, LPCWSTR path, INT32 idCBox,
1241                              INT32 idStatic, UINT32 wType )
1242 {
1243     dprintf_combo( stddeb,"DlgDirListComboBox32W(%08x,%p,%d,%d,%08X)\n",
1244                    hDlg, path, idCBox, idStatic, wType );
1245     return COMBO_DlgDirList( hDlg, (LPARAM)path, idCBox,
1246                              idStatic, wType, TRUE );
1247 }