dlls/user32/dialog16.c

   1 /*
   2  * 16-bit dialog functions
   3  *
   4  * Copyright 1993, 1994, 1996, 2003 Alexandre Julliard
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "config.h"
  22 #include "wine/port.h"
  23
  24 #include <stdarg.h>
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "wownt32.h"
  29 #include "wine/winuser16.h"
  30 #include "controls.h"
  31 #include "win.h"
  32 #include "user_private.h"
  33 #include "wine/debug.h"
  34
  35 WINE_DEFAULT_DEBUG_CHANNEL(dialog);
  36
  37 /* Dialog control information */
  38 typedef struct
  39 {
  40     DWORD      style;
  41     INT16      x;
  42     INT16      y;
  43     INT16      cx;
  44     INT16      cy;
  45     UINT       id;
  46     LPCSTR     className;
  47     LPCSTR     windowName;
  48     LPCVOID    data;
  49 } DLG_CONTROL_INFO;
  50
  51   /* Dialog template */
  52 typedef struct
  53 {
  54     DWORD      style;
  55     UINT16     nbItems;
  56     INT16      x;
  57     INT16      y;
  58     INT16      cx;
  59     INT16      cy;
  60     LPCSTR     menuName;
  61     LPCSTR     className;
  62     LPCSTR     caption;
  63     INT16      pointSize;
  64     LPCSTR     faceName;
  65 } DLG_TEMPLATE;
  66
  67
  68 /***********************************************************************
  69  *           DIALOG_GetControl16
  70  *
  71  * Return the class and text of the control pointed to by ptr,
  72  * fill the header structure and return a pointer to the next control.
  73  */
  74 static LPCSTR DIALOG_GetControl16( LPCSTR p, DLG_CONTROL_INFO *info )
  75 {
  76     static char buffer[10];
  77     int int_id;
  78
  79     info->x       = GET_WORD(p);  p += sizeof(WORD);
  80     info->y       = GET_WORD(p);  p += sizeof(WORD);
  81     info->cx      = GET_WORD(p);  p += sizeof(WORD);
  82     info->cy      = GET_WORD(p);  p += sizeof(WORD);
  83     info->id      = GET_WORD(p);  p += sizeof(WORD);
  84     info->style   = GET_DWORD(p); p += sizeof(DWORD);
  85
  86     if (*p & 0x80)
  87     {
  88         switch((BYTE)*p)
  89         {
  90             case 0x80: strcpy( buffer, "BUTTON" ); break;
  91             case 0x81: strcpy( buffer, "EDIT" ); break;
  92             case 0x82: strcpy( buffer, "STATIC" ); break;
  93             case 0x83: strcpy( buffer, "LISTBOX" ); break;
  94             case 0x84: strcpy( buffer, "SCROLLBAR" ); break;
  95             case 0x85: strcpy( buffer, "COMBOBOX" ); break;
  96             default:   buffer[0] = '\0'; break;
  97         }
  98         info->className = buffer;
  99         p++;
 100     }
 101     else
 102     {
 103         info->className = p;
 104         p += strlen(p) + 1;
 105     }
 106
 107     int_id = ((BYTE)*p == 0xff);
 108     if (int_id)
 109     {
 110         /* Integer id, not documented (?). Only works for SS_ICON controls */
 111         info->windowName = MAKEINTRESOURCEA(GET_WORD(p+1));
 112         p += 3;
 113     }
 114     else
 115     {
 116         info->windowName = p;
 117         p += strlen(p) + 1;
 118     }
 119
 120     if (*p) info->data = p + 1;
 121     else info->data = NULL;
 122
 123     p += *p + 1;
 124
 125     TRACE("   %s %s %d, %d, %d, %d, %d, %08x, %p\n",
 126           debugstr_a(info->className),  debugstr_a(info->windowName),
 127           info->id, info->x, info->y, info->cx, info->cy,
 128           info->style, info->data );
 129
 130     return p;
 131 }
 132
 133
 134 /***********************************************************************
 135  *           DIALOG_CreateControls16
 136  *
 137  * Create the control windows for a dialog.
 138  */
 139 static BOOL DIALOG_CreateControls16( HWND hwnd, LPCSTR template,
 140                                      const DLG_TEMPLATE *dlgTemplate, HINSTANCE16 hInst )
 141 {
 142     DIALOGINFO *dlgInfo = DIALOG_get_info( hwnd, TRUE );
 143     DLG_CONTROL_INFO info;
 144     HWND hwndCtrl, hwndDefButton = 0;
 145     INT items = dlgTemplate->nbItems;
 146
 147     TRACE(" BEGIN\n" );
 148     while (items--)
 149     {
 150         HINSTANCE16 instance = hInst;
 151         SEGPTR segptr;
 152
 153         template = DIALOG_GetControl16( template, &info );
 154         if (HIWORD(info.className) && !strcmp( info.className, "EDIT") &&
 155             !(GetWindowLongW( hwnd, GWL_STYLE ) & DS_LOCALEDIT))
 156         {
 157             if (!dlgInfo->hDialogHeap)
 158             {
 159                 dlgInfo->hDialogHeap = GlobalAlloc16(GMEM_FIXED, 0x10000);
 160                 if (!dlgInfo->hDialogHeap)
 161                 {
 162                     ERR("Insufficient memory to create heap for edit control\n" );
 163                     continue;
 164                 }
 165                 LocalInit16(dlgInfo->hDialogHeap, 0, 0xffff);
 166             }
 167             instance = dlgInfo->hDialogHeap;
 168         }
 169
 170         segptr = MapLS( info.data );
 171         hwndCtrl = WIN_Handle32( CreateWindowEx16( WS_EX_NOPARENTNOTIFY,
 172                                                    info.className, info.windowName,
 173                                                    info.style | WS_CHILD,
 174                                                    MulDiv(info.x, dlgInfo->xBaseUnit, 4),
 175                                                    MulDiv(info.y, dlgInfo->yBaseUnit, 8),
 176                                                    MulDiv(info.cx, dlgInfo->xBaseUnit, 4),
 177                                                    MulDiv(info.cy, dlgInfo->yBaseUnit, 8),
 178                                                    HWND_16(hwnd), (HMENU16)info.id,
 179                                                    instance, (LPVOID)segptr ));
 180         UnMapLS( segptr );
 181
 182         if (!hwndCtrl)
 183         {
 184             if (dlgTemplate->style & DS_NOFAILCREATE) continue;
 185             return FALSE;
 186         }
 187
 188             /* Send initialisation messages to the control */
 189         if (dlgInfo->hUserFont) SendMessageA( hwndCtrl, WM_SETFONT,
 190                                              (WPARAM)dlgInfo->hUserFont, 0 );
 191         if (SendMessageA(hwndCtrl, WM_GETDLGCODE, 0, 0) & DLGC_DEFPUSHBUTTON)
 192         {
 193               /* If there's already a default push-button, set it back */
 194               /* to normal and use this one instead. */
 195             if (hwndDefButton)
 196                 SendMessageA( hwndDefButton, BM_SETSTYLE,
 197                                 BS_PUSHBUTTON,FALSE );
 198             hwndDefButton = hwndCtrl;
 199             dlgInfo->idResult = GetWindowLongPtrA( hwndCtrl, GWLP_ID );
 200         }
 201     }
 202     TRACE(" END\n" );
 203     return TRUE;
 204 }
 205
 206
 207 /***********************************************************************
 208  *           DIALOG_ParseTemplate16
 209  *
 210  * Fill a DLG_TEMPLATE structure from the dialog template, and return
 211  * a pointer to the first control.
 212  */
 213 static LPCSTR DIALOG_ParseTemplate16( LPCSTR p, DLG_TEMPLATE * result )
 214 {
 215     result->style   = GET_DWORD(p); p += sizeof(DWORD);
 216     result->nbItems = (unsigned char) *p++;
 217     result->x       = GET_WORD(p);  p += sizeof(WORD);
 218     result->y       = GET_WORD(p);  p += sizeof(WORD);
 219     result->cx      = GET_WORD(p);  p += sizeof(WORD);
 220     result->cy      = GET_WORD(p);  p += sizeof(WORD);
 221
 222     TRACE("DIALOG %d, %d, %d, %d\n", result->x, result->y, result->cx, result->cy );
 223     TRACE(" STYLE %08x\n", result->style );
 224
 225     /* Get the menu name */
 226
 227     switch( (BYTE)*p )
 228     {
 229     case 0:
 230         result->menuName = 0;
 231         p++;
 232         break;
 233     case 0xff:
 234         result->menuName = MAKEINTRESOURCEA(GET_WORD( p + 1 ));
 235         p += 3;
 236         TRACE(" MENU %04x\n", LOWORD(result->menuName) );
 237         break;
 238     default:
 239         result->menuName = p;
 240         TRACE(" MENU '%s'\n", p );
 241         p += strlen(p) + 1;
 242         break;
 243     }
 244
 245     /* Get the class name */
 246
 247     if (*p)
 248     {
 249         result->className = p;
 250         TRACE(" CLASS '%s'\n", result->className );
 251     }
 252     else result->className = (LPCSTR)DIALOG_CLASS_ATOM;
 253     p += strlen(p) + 1;
 254
 255     /* Get the window caption */
 256
 257     result->caption = p;
 258     p += strlen(p) + 1;
 259     TRACE(" CAPTION '%s'\n", result->caption );
 260
 261     /* Get the font name */
 262
 263     result->pointSize = 0;
 264     result->faceName = NULL;
 265
 266     if (result->style & DS_SETFONT)
 267     {
 268         result->pointSize = GET_WORD(p);
 269         p += sizeof(WORD);
 270         result->faceName = p;
 271         p += strlen(p) + 1;
 272         TRACE(" FONT %d,'%s'\n", result->pointSize, result->faceName );
 273     }
 274     return p;
 275 }
 276
 277
 278 /***********************************************************************
 279  *           DIALOG_CreateIndirect16
 280  *
 281  * Creates a dialog box window
 282  *
 283  * modal = TRUE if we are called from a modal dialog box.
 284  * (it's more compatible to do it here, as under Windows the owner
 285  * is never disabled if the dialog fails because of an invalid template)
 286  */
 287 static HWND DIALOG_CreateIndirect16( HINSTANCE16 hInst, LPCVOID dlgTemplate,
 288                                      HWND owner, DLGPROC16 dlgProc, LPARAM param,
 289                                      BOOL modal )
 290 {
 291     HWND hwnd;
 292     RECT rect;
 293     POINT pos;
 294     SIZE size;
 295     WND * wndPtr;
 296     DLG_TEMPLATE template;
 297     DIALOGINFO * dlgInfo;
 298     BOOL ownerEnabled = TRUE;
 299     DWORD exStyle = 0;
 300     DWORD units = GetDialogBaseUnits();
 301
 302       /* Parse dialog template */
 303
 304     dlgTemplate = DIALOG_ParseTemplate16( dlgTemplate, &template );
 305
 306       /* Initialise dialog extra data */
 307
 308     if (!(dlgInfo = HeapAlloc( GetProcessHeap(), 0, sizeof(*dlgInfo) ))) return 0;
 309     dlgInfo->hwndFocus   = 0;
 310     dlgInfo->hUserFont   = 0;
 311     dlgInfo->hMenu       = 0;
 312     dlgInfo->xBaseUnit   = LOWORD(units);
 313     dlgInfo->yBaseUnit   = HIWORD(units);
 314     dlgInfo->idResult    = 0;
 315     dlgInfo->flags       = 0;
 316     dlgInfo->hDialogHeap = 0;
 317
 318       /* Load menu */
 319
 320     if (template.menuName)
 321     {
 322         dlgInfo->hMenu = HMENU_32(LoadMenu16( hInst, template.menuName ));
 323     }
 324
 325       /* Create custom font if needed */
 326
 327     if (template.style & DS_SETFONT)
 328     {
 329           /* We convert the size to pixels and then make it -ve.  This works
 330            * for both +ve and -ve template.pointSize */
 331         HDC dc;
 332         int pixels;
 333         dc = GetDC(0);
 334         pixels = MulDiv(template.pointSize, GetDeviceCaps(dc , LOGPIXELSY), 72);
 335         dlgInfo->hUserFont = CreateFontA( -pixels, 0, 0, 0, FW_DONTCARE,
 336                                           FALSE, FALSE, FALSE, DEFAULT_CHARSET, 0, 0,
 337                                           PROOF_QUALITY, FF_DONTCARE, template.faceName );
 338         if (dlgInfo->hUserFont)
 339         {
 340             SIZE charSize;
 341             HFONT hOldFont = SelectObject( dc, dlgInfo->hUserFont );
 342             charSize.cx = GdiGetCharDimensions( dc, NULL, &charSize.cy );
 343             if (charSize.cx)
 344             {
 345                 dlgInfo->xBaseUnit = charSize.cx;
 346                 dlgInfo->yBaseUnit = charSize.cy;
 347             }
 348             SelectObject( dc, hOldFont );
 349         }
 350         ReleaseDC(0, dc);
 351         TRACE("units = %d,%d\n", dlgInfo->xBaseUnit, dlgInfo->yBaseUnit );
 352     }
 353
 354     /* Create dialog main window */
 355
 356     rect.left = rect.top = 0;
 357     rect.right = MulDiv(template.cx, dlgInfo->xBaseUnit, 4);
 358     rect.bottom =  MulDiv(template.cy, dlgInfo->yBaseUnit, 8);
 359     if (template.style & DS_MODALFRAME) exStyle |= WS_EX_DLGMODALFRAME;
 360     AdjustWindowRectEx( &rect, template.style, (dlgInfo->hMenu != 0), exStyle );
 361     pos.x = rect.left;
 362     pos.y = rect.top;
 363     size.cx = rect.right - rect.left;
 364     size.cy = rect.bottom - rect.top;
 365
 366     if (template.x == CW_USEDEFAULT16)
 367     {
 368         pos.x = pos.y = CW_USEDEFAULT16;
 369     }
 370     else
 371     {
 372         HMONITOR monitor = 0;
 373         MONITORINFO mon_info;
 374
 375         mon_info.cbSize = sizeof(mon_info);
 376         if (template.style & DS_CENTER)
 377         {
 378             monitor = MonitorFromWindow( owner ? owner : GetActiveWindow(), MONITOR_DEFAULTTOPRIMARY );
 379             GetMonitorInfoW( monitor, &mon_info );
 380             pos.x = (mon_info.rcWork.left + mon_info.rcWork.right - size.cx) / 2;
 381             pos.y = (mon_info.rcWork.top + mon_info.rcWork.bottom - size.cy) / 2;
 382         }
 383         else if (template.style & DS_CENTERMOUSE)
 384         {
 385             GetCursorPos( &pos );
 386             monitor = MonitorFromPoint( pos, MONITOR_DEFAULTTOPRIMARY );
 387             GetMonitorInfoW( monitor, &mon_info );
 388         }
 389         else
 390         {
 391             pos.x += MulDiv(template.x, dlgInfo->xBaseUnit, 4);
 392             pos.y += MulDiv(template.y, dlgInfo->yBaseUnit, 8);
 393             if (!(template.style & (WS_CHILD|DS_ABSALIGN))) ClientToScreen( owner, &pos );
 394         }
 395         if ( !(template.style & WS_CHILD) )
 396         {
 397             INT dX, dY;
 398
 399             /* try to fit it into the desktop */
 400
 401             if (!monitor)
 402             {
 403                 SetRect( &rect, pos.x, pos.y, pos.x + size.cx, pos.y + size.cy );
 404                 monitor = MonitorFromRect( &rect, MONITOR_DEFAULTTOPRIMARY );
 405                 GetMonitorInfoW( monitor, &mon_info );
 406             }
 407             if ((dX = pos.x + size.cx + GetSystemMetrics(SM_CXDLGFRAME) - mon_info.rcWork.right) > 0)
 408                 pos.x -= dX;
 409             if ((dY = pos.y + size.cy + GetSystemMetrics(SM_CYDLGFRAME) - mon_info.rcWork.bottom) > 0)
 410                 pos.y -= dY;
 411             if( pos.x < mon_info.rcWork.left ) pos.x = mon_info.rcWork.left;
 412             if( pos.y < mon_info.rcWork.top ) pos.y = mon_info.rcWork.top;
 413         }
 414     }
 415
 416     if (modal)
 417     {
 418         ownerEnabled = DIALOG_DisableOwner( owner );
 419         if (ownerEnabled) dlgInfo->flags |= DF_OWNERENABLED;
 420     }
 421
 422     hwnd = WIN_Handle32( CreateWindowEx16(exStyle, template.className,
 423                                           template.caption, template.style & ~WS_VISIBLE,
 424                                           pos.x, pos.y, size.cx, size.cy,
 425                                           HWND_16(owner), HMENU_16(dlgInfo->hMenu),
 426                                           hInst, NULL ));
 427     if (!hwnd)
 428     {
 429         if (dlgInfo->hUserFont) DeleteObject( dlgInfo->hUserFont );
 430         if (dlgInfo->hMenu) DestroyMenu( dlgInfo->hMenu );
 431         if (modal && (dlgInfo->flags & DF_OWNERENABLED)) DIALOG_EnableOwner(owner);
 432         HeapFree( GetProcessHeap(), 0, dlgInfo );
 433         return 0;
 434     }
 435     wndPtr = WIN_GetPtr( hwnd );
 436     wndPtr->flags |= WIN_ISDIALOG;
 437     WIN_ReleasePtr( wndPtr );
 438
 439     SetWindowLongPtrW( hwnd, DWLP_WINE_DIALOGINFO, (LONG_PTR)dlgInfo );
 440     SetWindowLong16( HWND_16(hwnd), DWLP_DLGPROC, (LONG)dlgProc );
 441
 442     if (dlgInfo->hUserFont)
 443         SendMessageA( hwnd, WM_SETFONT, (WPARAM)dlgInfo->hUserFont, 0 );
 444
 445     /* Create controls */
 446
 447     if (DIALOG_CreateControls16( hwnd, dlgTemplate, &template, hInst ))
 448     {
 449         HWND hwndPreInitFocus;
 450
 451         /* Send initialisation messages and set focus */
 452
 453         dlgInfo->hwndFocus = GetNextDlgTabItem( hwnd, 0, FALSE );
 454
 455         hwndPreInitFocus = GetFocus();
 456         if (SendMessageA( hwnd, WM_INITDIALOG, (WPARAM)dlgInfo->hwndFocus, param ))
 457         {
 458             /* check where the focus is again,
 459              * some controls status might have changed in WM_INITDIALOG */
 460             dlgInfo->hwndFocus = GetNextDlgTabItem( hwnd, 0, FALSE);
 461             if( dlgInfo->hwndFocus )
 462                 SetFocus( dlgInfo->hwndFocus );
 463         }
 464         else
 465         {
 466             /* If the dlgproc has returned FALSE (indicating handling of keyboard focus)
 467                but the focus has not changed, set the focus where we expect it. */
 468             if ((GetFocus() == hwndPreInitFocus) &&
 469                 (GetWindowLongW( hwnd, GWL_STYLE ) & WS_VISIBLE))
 470             {
 471                 dlgInfo->hwndFocus = GetNextDlgTabItem( hwnd, 0, FALSE);
 472                 if( dlgInfo->hwndFocus )
 473                     SetFocus( dlgInfo->hwndFocus );
 474             }
 475         }
 476
 477         if (template.style & WS_VISIBLE && !(GetWindowLongW( hwnd, GWL_STYLE ) & WS_VISIBLE))
 478         {
 479             ShowWindow( hwnd, SW_SHOWNORMAL );  /* SW_SHOW doesn't always work */
 480         }
 481         return hwnd;
 482     }
 483     if( IsWindow(hwnd) ) DestroyWindow( hwnd );
 484     if (modal && ownerEnabled) DIALOG_EnableOwner(owner);
 485     return 0;
 486 }
 487
 488
 489 /***********************************************************************
 490  *              DialogBox (USER.87)
 491  */
 492 INT16 WINAPI DialogBox16( HINSTANCE16 hInst, LPCSTR dlgTemplate,
 493                           HWND16 owner, DLGPROC16 dlgProc )
 494 {
 495     return DialogBoxParam16( hInst, dlgTemplate, owner, dlgProc, 0 );
 496 }
 497
 498
 499 /**************************************************************************
 500  *              EndDialog   (USER.88)
 501  */
 502 BOOL16 WINAPI EndDialog16( HWND16 hwnd, INT16 retval )
 503 {
 504     return EndDialog( WIN_Handle32(hwnd), retval );
 505 }
 506
 507
 508 /***********************************************************************
 509  *              CreateDialog (USER.89)
 510  */
 511 HWND16 WINAPI CreateDialog16( HINSTANCE16 hInst, LPCSTR dlgTemplate,
 512                               HWND16 owner, DLGPROC16 dlgProc )
 513 {
 514     return CreateDialogParam16( hInst, dlgTemplate, owner, dlgProc, 0 );
 515 }
 516
 517
 518 /**************************************************************************
 519  *              GetDlgItem   (USER.91)
 520  */
 521 HWND16 WINAPI GetDlgItem16( HWND16 hwndDlg, INT16 id )
 522 {
 523     return HWND_16( GetDlgItem( WIN_Handle32(hwndDlg), (UINT16) id ));
 524 }
 525
 526
 527 /**************************************************************************
 528  *              SetDlgItemText   (USER.92)
 529  */
 530 void WINAPI SetDlgItemText16( HWND16 hwnd, INT16 id, SEGPTR lpString )
 531 {
 532     SendDlgItemMessage16( hwnd, id, WM_SETTEXT, 0, (LPARAM)lpString );
 533 }
 534
 535
 536 /**************************************************************************
 537  *              GetDlgItemText   (USER.93)
 538  */
 539 INT16 WINAPI GetDlgItemText16( HWND16 hwnd, INT16 id, SEGPTR str, UINT16 len )
 540 {
 541     return (INT16)SendDlgItemMessage16( hwnd, id, WM_GETTEXT, len, (LPARAM)str );
 542 }
 543
 544
 545 /**************************************************************************
 546  *              SetDlgItemInt   (USER.94)
 547  */
 548 void WINAPI SetDlgItemInt16( HWND16 hwnd, INT16 id, UINT16 value, BOOL16 fSigned )
 549 {
 550     SetDlgItemInt( WIN_Handle32(hwnd), (UINT)(UINT16)id,
 551              (UINT)(fSigned ? (INT16) value : (UINT16) value), fSigned );
 552 }
 553
 554
 555 /**************************************************************************
 556  *              GetDlgItemInt   (USER.95)
 557  */
 558 UINT16 WINAPI GetDlgItemInt16( HWND16 hwnd, INT16 id, BOOL16 *translated, BOOL16 fSigned )
 559 {
 560     UINT result;
 561     BOOL ok;
 562
 563     if (translated) *translated = FALSE;
 564     result = GetDlgItemInt( WIN_Handle32(hwnd), (UINT)(UINT16)id, &ok, fSigned );
 565     if (!ok) return 0;
 566     if (fSigned)
 567     {
 568         if (((INT)result < -32767) || ((INT)result > 32767)) return 0;
 569     }
 570     else
 571     {
 572         if (result > 65535) return 0;
 573     }
 574     if (translated) *translated = TRUE;
 575     return (UINT16)result;
 576 }
 577
 578
 579 /**************************************************************************
 580  *              CheckRadioButton   (USER.96)
 581  */
 582 BOOL16 WINAPI CheckRadioButton16( HWND16 hwndDlg, UINT16 firstID,
 583                                   UINT16 lastID, UINT16 checkID )
 584 {
 585     return CheckRadioButton( WIN_Handle32(hwndDlg), firstID, lastID, checkID );
 586 }
 587
 588
 589 /**************************************************************************
 590  *              CheckDlgButton   (USER.97)
 591  */
 592 BOOL16 WINAPI CheckDlgButton16( HWND16 hwnd, INT16 id, UINT16 check )
 593 {
 594     SendDlgItemMessage16( hwnd, id, BM_SETCHECK16, check, 0 );
 595     return TRUE;
 596 }
 597
 598
 599 /**************************************************************************
 600  *              IsDlgButtonChecked   (USER.98)
 601  */
 602 UINT16 WINAPI IsDlgButtonChecked16( HWND16 hwnd, UINT16 id )
 603 {
 604     return (UINT16)SendDlgItemMessage16( hwnd, id, BM_GETCHECK16, 0, 0 );
 605 }
 606
 607
 608 /**************************************************************************
 609  *              DlgDirSelect   (USER.99)
 610  */
 611 BOOL16 WINAPI DlgDirSelect16( HWND16 hwnd, LPSTR str, INT16 id )
 612 {
 613     return DlgDirSelectEx16( hwnd, str, 128, id );
 614 }
 615
 616
 617 /**************************************************************************
 618  *              DlgDirList   (USER.100)
 619  */
 620 INT16 WINAPI DlgDirList16( HWND16 hDlg, LPSTR spec, INT16 idLBox,
 621                            INT16 idStatic, UINT16 attrib )
 622 {
 623     /* according to Win16 docs, DDL_DRIVES should make DDL_EXCLUSIVE
 624      * be set automatically (this is different in Win32, and
 625      * DIALOG_DlgDirList sends Win32 messages to the control,
 626      * so do it here) */
 627     if (attrib & DDL_DRIVES) attrib |= DDL_EXCLUSIVE;
 628     return DlgDirListA( WIN_Handle32(hDlg), spec, idLBox, idStatic, attrib );
 629 }
 630
 631
 632 /**************************************************************************
 633  *              SendDlgItemMessage   (USER.101)
 634  */
 635 LRESULT WINAPI SendDlgItemMessage16( HWND16 hwnd, INT16 id, UINT16 msg,
 636                                      WPARAM16 wParam, LPARAM lParam )
 637 {
 638     HWND16 hwndCtrl = GetDlgItem16( hwnd, id );
 639     if (hwndCtrl) return SendMessage16( hwndCtrl, msg, wParam, lParam );
 640     else return 0;
 641 }
 642
 643
 644 /**************************************************************************
 645  *              MapDialogRect   (USER.103)
 646  */
 647 void WINAPI MapDialogRect16( HWND16 hwnd, LPRECT16 rect )
 648 {
 649     RECT rect32;
 650     MapDialogRect( WIN_Handle32(hwnd), &rect32 );
 651     rect->left   = rect32.left;
 652     rect->right  = rect32.right;
 653     rect->top    = rect32.top;
 654     rect->bottom = rect32.bottom;
 655 }
 656
 657
 658 /**************************************************************************
 659  *              DlgDirSelectComboBox   (USER.194)
 660  */
 661 BOOL16 WINAPI DlgDirSelectComboBox16( HWND16 hwnd, LPSTR str, INT16 id )
 662 {
 663     return DlgDirSelectComboBoxEx16( hwnd, str, 128, id );
 664 }
 665
 666
 667 /**************************************************************************
 668  *              DlgDirListComboBox   (USER.195)
 669  */
 670 INT16 WINAPI DlgDirListComboBox16( HWND16 hDlg, LPSTR spec, INT16 idCBox,
 671                                    INT16 idStatic, UINT16 attrib )
 672 {
 673     return DlgDirListComboBoxA( WIN_Handle32(hDlg), spec, idCBox, idStatic, attrib );
 674 }
 675
 676
 677 /***********************************************************************
 678  *              DialogBoxIndirect (USER.218)
 679  */
 680 INT16 WINAPI DialogBoxIndirect16( HINSTANCE16 hInst, HANDLE16 dlgTemplate,
 681                                   HWND16 owner, DLGPROC16 dlgProc )
 682 {
 683     return DialogBoxIndirectParam16( hInst, dlgTemplate, owner, dlgProc, 0 );
 684 }
 685
 686
 687 /***********************************************************************
 688  *              CreateDialogIndirect (USER.219)
 689  */
 690 HWND16 WINAPI CreateDialogIndirect16( HINSTANCE16 hInst, LPCVOID dlgTemplate,
 691                                       HWND16 owner, DLGPROC16 dlgProc )
 692 {
 693     return CreateDialogIndirectParam16( hInst, dlgTemplate, owner, dlgProc, 0);
 694 }
 695
 696
 697 /**************************************************************************
 698  *              GetNextDlgGroupItem   (USER.227)
 699  */
 700 HWND16 WINAPI GetNextDlgGroupItem16( HWND16 hwndDlg, HWND16 hwndCtrl,
 701                                      BOOL16 fPrevious )
 702 {
 703     return HWND_16( GetNextDlgGroupItem( WIN_Handle32(hwndDlg), WIN_Handle32(hwndCtrl), fPrevious ));
 704 }
 705
 706
 707 /**************************************************************************
 708  *              GetNextDlgTabItem   (USER.228)
 709  */
 710 HWND16 WINAPI GetNextDlgTabItem16( HWND16 hwndDlg, HWND16 hwndCtrl,
 711                                    BOOL16 fPrevious )
 712 {
 713     return HWND_16( GetNextDlgTabItem( WIN_Handle32(hwndDlg), WIN_Handle32(hwndCtrl), fPrevious ));
 714 }
 715
 716
 717 /***********************************************************************
 718  *              DialogBoxParam (USER.239)
 719  */
 720 INT16 WINAPI DialogBoxParam16( HINSTANCE16 hInst, LPCSTR template,
 721                                HWND16 owner16, DLGPROC16 dlgProc, LPARAM param )
 722 {
 723     HWND hwnd = 0;
 724     HRSRC16 hRsrc;
 725     HGLOBAL16 hmem;
 726     LPCVOID data;
 727     int ret = -1;
 728
 729     if (!(hRsrc = FindResource16( hInst, template, (LPSTR)RT_DIALOG ))) return 0;
 730     if (!(hmem = LoadResource16( hInst, hRsrc ))) return 0;
 731     if ((data = LockResource16( hmem )))
 732     {
 733         HWND owner = WIN_Handle32(owner16);
 734         hwnd = DIALOG_CreateIndirect16( hInst, data, owner, dlgProc, param, TRUE );
 735         if (hwnd) ret = DIALOG_DoDialogBox( hwnd, owner );
 736         GlobalUnlock16( hmem );
 737     }
 738     FreeResource16( hmem );
 739     return ret;
 740 }
 741
 742
 743 /***********************************************************************
 744  *              DialogBoxIndirectParam (USER.240)
 745  */
 746 INT16 WINAPI DialogBoxIndirectParam16( HINSTANCE16 hInst, HANDLE16 dlgTemplate,
 747                                        HWND16 owner16, DLGPROC16 dlgProc, LPARAM param )
 748 {
 749     HWND hwnd, owner = WIN_Handle32( owner16 );
 750     LPCVOID ptr;
 751
 752     if (!(ptr = GlobalLock16( dlgTemplate ))) return -1;
 753     hwnd = DIALOG_CreateIndirect16( hInst, ptr, owner, dlgProc, param, TRUE );
 754     GlobalUnlock16( dlgTemplate );
 755     if (hwnd) return DIALOG_DoDialogBox( hwnd, owner );
 756     return -1;
 757 }
 758
 759
 760 /***********************************************************************
 761  *              CreateDialogParam (USER.241)
 762  */
 763 HWND16 WINAPI CreateDialogParam16( HINSTANCE16 hInst, LPCSTR dlgTemplate,
 764                                    HWND16 owner, DLGPROC16 dlgProc, LPARAM param )
 765 {
 766     HWND16 hwnd = 0;
 767     HRSRC16 hRsrc;
 768     HGLOBAL16 hmem;
 769     LPCVOID data;
 770
 771     TRACE("%04x,%s,%04x,%08x,%ld\n",
 772           hInst, debugstr_a(dlgTemplate), owner, (DWORD)dlgProc, param );
 773
 774     if (!(hRsrc = FindResource16( hInst, dlgTemplate, (LPSTR)RT_DIALOG ))) return 0;
 775     if (!(hmem = LoadResource16( hInst, hRsrc ))) return 0;
 776     if (!(data = LockResource16( hmem ))) hwnd = 0;
 777     else hwnd = CreateDialogIndirectParam16( hInst, data, owner, dlgProc, param );
 778     FreeResource16( hmem );
 779     return hwnd;
 780 }
 781
 782
 783 /***********************************************************************
 784  *              CreateDialogIndirectParam (USER.242)
 785  */
 786 HWND16 WINAPI CreateDialogIndirectParam16( HINSTANCE16 hInst, LPCVOID dlgTemplate,
 787                                            HWND16 owner, DLGPROC16 dlgProc, LPARAM param )
 788 {
 789     if (!dlgTemplate) return 0;
 790     return HWND_16( DIALOG_CreateIndirect16( hInst, dlgTemplate, WIN_Handle32(owner),
 791                                              dlgProc, param, FALSE ));
 792 }
 793
 794
 795 /**************************************************************************
 796  *              DlgDirSelectEx   (USER.422)
 797  */
 798 BOOL16 WINAPI DlgDirSelectEx16( HWND16 hwnd, LPSTR str, INT16 len, INT16 id )
 799 {
 800     return DlgDirSelectExA( WIN_Handle32(hwnd), str, len, id );
 801 }
 802
 803
 804 /**************************************************************************
 805  *              DlgDirSelectComboBoxEx   (USER.423)
 806  */
 807 BOOL16 WINAPI DlgDirSelectComboBoxEx16( HWND16 hwnd, LPSTR str, INT16 len,
 808                                         INT16 id )
 809 {
 810     return DlgDirSelectComboBoxExA( WIN_Handle32(hwnd), str, len, id );
 811 }