windows/dialog.c

   1 /*
   2  * Dialog functions
   3  *
   4  * Copyright 1993, 1994 Alexandre Julliard
   5  *
   6 static char Copyright[] = "Copyright  Alexandre Julliard, 1993, 1994";
   7 */
   8
   9 #include <stdlib.h>
  10 #include <stdio.h>
  11 #include <string.h>
  12 #include "windows.h"
  13 #include "dialog.h"
  14 #include "win.h"
  15 #include "ldt.h"
  16 #include "stackframe.h"
  17 #include "user.h"
  18 #include "message.h"
  19 #include "stddebug.h"
  20 /* #define DEBUG_DIALOG */
  21 #include "debug.h"
  22
  23   /* Dialog base units */
  24 static WORD xBaseUnit = 0, yBaseUnit = 0;
  25
  26
  27 /***********************************************************************
  28  *           DIALOG_Init
  29  *
  30  * Initialisation of the dialog manager.
  31  */
  32 BOOL DIALOG_Init()
  33 {
  34     TEXTMETRIC tm;
  35     HDC hdc;
  36
  37       /* Calculate the dialog base units */
  38
  39     if (!(hdc = GetDC( 0 ))) return FALSE;
  40     GetTextMetrics( hdc, &tm );
  41     ReleaseDC( 0, hdc );
  42     xBaseUnit = tm.tmAveCharWidth;
  43     yBaseUnit = tm.tmHeight;
  44
  45       /* Dialog units are based on a proportional system font */
  46       /* so we adjust them a bit for a fixed font. */
  47     if (tm.tmPitchAndFamily & TMPF_FIXED_PITCH) xBaseUnit = xBaseUnit * 5 / 4;
  48
  49     dprintf_dialog( stddeb, "DIALOG_Init: base units = %d,%d\n",
  50                     xBaseUnit, yBaseUnit );
  51     return TRUE;
  52 }
  53
  54
  55 /***********************************************************************
  56  *           DIALOG_GetFirstTabItem
  57  *
  58  * Return the first item of the dialog that has the WS_TABSTOP style.
  59  */
  60 HWND DIALOG_GetFirstTabItem( HWND hwndDlg )
  61 {
  62     HWND hwnd;
  63     WND *wndPtr = WIN_FindWndPtr( hwndDlg );
  64     hwnd = wndPtr->hwndChild;
  65     while(hwnd)
  66     {
  67         wndPtr = WIN_FindWndPtr( hwnd );
  68         if (wndPtr->dwStyle & WS_TABSTOP) break;
  69         hwnd = wndPtr->hwndNext;
  70     }
  71     return hwnd;
  72 }
  73
  74
  75 /***********************************************************************
  76  *           DIALOG_GetControl
  77  *
  78  * Return the class and text of the control pointed to by ptr,
  79  * and return a pointer to the next control.
  80  */
  81 static SEGPTR DIALOG_GetControl( SEGPTR ptr, SEGPTR *class, SEGPTR *text )
  82 {
  83     unsigned char *base = (unsigned char *)PTR_SEG_TO_LIN( ptr );
  84     unsigned char *p = base;
  85
  86     p += 14;  /* size of control header */
  87
  88     if (*p & 0x80)
  89     {
  90         *class = MAKEINTRESOURCE( *p );
  91         p++;
  92     }
  93     else
  94     {
  95         *class = ptr + (WORD)(p - base);
  96         p += strlen(p) + 1;
  97     }
  98
  99     if (*p == 0xff)
 100     {
 101           /* Integer id, not documented (?). Only works for SS_ICON controls */
 102         *text = MAKEINTRESOURCE( p[1] + 256 * p[2] );
 103         p += 4;
 104     }
 105     else
 106     {
 107         *text = ptr + (WORD)(p - base);
 108         p += strlen(p) + 2;
 109     }
 110     return ptr + (WORD)(p - base);
 111 }
 112
 113
 114 /***********************************************************************
 115  *           DIALOG_ParseTemplate
 116  *
 117  * Fill a DLGTEMPLATE structure from the dialog template, and return
 118  * a pointer to the first control.
 119  */
 120 static SEGPTR DIALOG_ParseTemplate( SEGPTR template, DLGTEMPLATE * result )
 121 {
 122     unsigned char *base = (unsigned char *)PTR_SEG_TO_LIN(template);
 123     unsigned char * p = base;
 124
 125     result->header = *(DLGTEMPLATEHEADER *)p;
 126     p += 13;
 127
 128     /* Get the menu name */
 129
 130     if (*p == 0xff)
 131     {
 132         result->menuName = MAKEINTRESOURCE( p[1] + 256 * p[2] );
 133         p += 3;
 134     }
 135     else if (*p)
 136     {
 137         result->menuName = template + (WORD)(p - base);
 138         p += strlen(p) + 1;
 139     }
 140     else
 141     {
 142         result->menuName = 0;
 143         p++;
 144     }
 145
 146     /* Get the class name */
 147
 148     if (*p) result->className = template + (WORD)(p - base);
 149     else result->className = DIALOG_CLASS_ATOM;
 150     p += strlen(p) + 1;
 151
 152     /* Get the window caption */
 153
 154     result->caption = template + (WORD)(p - base);
 155     p += strlen(p) + 1;
 156
 157     /* Get the font name */
 158
 159     if (result->header.style & DS_SETFONT)
 160     {
 161         result->pointSize = *(WORD *)p;
 162         p += sizeof(WORD);
 163         result->faceName = template + (WORD)(p - base);
 164         p += strlen(p) + 1;
 165     }
 166
 167     return template + (WORD)(p - base);
 168 }
 169
 170
 171 /***********************************************************************
 172  *           DIALOG_DisplayTemplate
 173  */
 174 static void DIALOG_DisplayTemplate( DLGTEMPLATE * result )
 175 {
 176     dprintf_dialog(stddeb, "DIALOG %d, %d, %d, %d\n", result->header.x, result->header.y,
 177             result->header.cx, result->header.cy );
 178     dprintf_dialog(stddeb, " STYLE %08lx\n", result->header.style );
 179     dprintf_dialog( stddeb, " CAPTION '%s'\n",
 180                     (char *)PTR_SEG_TO_LIN(result->caption) );
 181
 182     if (HIWORD(result->className))
 183         dprintf_dialog( stddeb, " CLASS '%s'\n",
 184                         (char *)PTR_SEG_TO_LIN(result->className) );
 185     else
 186         dprintf_dialog( stddeb, " CLASS #%d\n", LOWORD(result->className) );
 187
 188     if (HIWORD(result->menuName))
 189         dprintf_dialog( stddeb, " MENU '%s'\n",
 190                         (char *)PTR_SEG_TO_LIN(result->menuName) );
 191     else if (LOWORD(result->menuName))
 192         dprintf_dialog(stddeb, " MENU %04x\n", LOWORD(result->menuName) );
 193
 194     if (result->header.style & DS_SETFONT)
 195         dprintf_dialog( stddeb, " FONT %d,'%s'\n", result->pointSize,
 196                         (char *)PTR_SEG_TO_LIN(result->faceName) );
 197 }
 198
 199
 200 /***********************************************************************
 201  *           CreateDialog   (USER.89)
 202  */
 203 HWND CreateDialog( HINSTANCE hInst, SEGPTR dlgTemplate,
 204                    HWND owner, WNDPROC dlgProc )
 205 {
 206     return CreateDialogParam( hInst, dlgTemplate, owner, dlgProc, 0 );
 207 }
 208
 209
 210 /***********************************************************************
 211  *           CreateDialogParam   (USER.241)
 212  */
 213 HWND CreateDialogParam( HINSTANCE hInst, SEGPTR dlgTemplate,
 214                         HWND owner, WNDPROC dlgProc, LPARAM param )
 215 {
 216     HWND hwnd = 0;
 217     HRSRC hRsrc;
 218     HGLOBAL hmem;
 219     SEGPTR data;
 220
 221     dprintf_dialog(stddeb, "CreateDialogParam: "NPFMT",%08lx,"NPFMT",%08lx,%ld\n",
 222             hInst, dlgTemplate, owner, (DWORD)dlgProc, param );
 223
 224     if (!(hRsrc = FindResource( hInst, dlgTemplate, RT_DIALOG ))) return 0;
 225     if (!(hmem = LoadResource( hInst, hRsrc ))) return 0;
 226     if (!(data = WIN16_LockResource( hmem ))) hwnd = 0;
 227     else hwnd = CreateDialogIndirectParam(hInst, data, owner, dlgProc, param);
 228     FreeResource( hmem );
 229     return hwnd;
 230 }
 231
 232
 233 /***********************************************************************
 234  *           CreateDialogIndirect   (USER.219)
 235  */
 236 HWND CreateDialogIndirect( HINSTANCE hInst, SEGPTR dlgTemplate,
 237                            HWND owner, WNDPROC dlgProc )
 238 {
 239     return CreateDialogIndirectParam( hInst, dlgTemplate, owner, dlgProc, 0 );
 240 }
 241
 242
 243 /***********************************************************************
 244  *           CreateDialogIndirectParam   (USER.242)
 245  */
 246 HWND CreateDialogIndirectParam( HINSTANCE hInst, SEGPTR dlgTemplate,
 247                                 HWND owner, WNDPROC dlgProc, LPARAM param )
 248 {
 249     HMENU hMenu = 0;
 250     HFONT hFont = 0;
 251     HWND hwnd, hwndCtrl;
 252     RECT rect;
 253     WND * wndPtr;
 254     int i;
 255     DLGTEMPLATE template;
 256     SEGPTR headerPtr;
 257     DIALOGINFO * dlgInfo;
 258     DWORD exStyle = 0;
 259     WORD xUnit = xBaseUnit;
 260     WORD yUnit = yBaseUnit;
 261
 262       /* Parse dialog template */
 263
 264     if (!dlgTemplate) return 0;
 265     headerPtr = DIALOG_ParseTemplate( dlgTemplate, &template );
 266     if (debugging_dialog) DIALOG_DisplayTemplate( &template );
 267
 268       /* Load menu */
 269
 270     if (template.menuName) hMenu = LoadMenu( hInst, template.menuName );
 271
 272       /* Create custom font if needed */
 273
 274     if (template.header.style & DS_SETFONT)
 275     {
 276           /* The font height must be negative as it is a point size */
 277           /* (see CreateFont() documentation in the Windows SDK).   */
 278         hFont = CreateFont( -template.pointSize, 0, 0, 0, FW_DONTCARE,
 279                             FALSE, FALSE, FALSE, DEFAULT_CHARSET, 0, 0,
 280                             DEFAULT_QUALITY, FF_DONTCARE,
 281                             (LPSTR)PTR_SEG_TO_LIN(template.faceName) );
 282         if (hFont)
 283         {
 284             TEXTMETRIC tm;
 285             HFONT oldFont;
 286             HDC hdc;
 287
 288             hdc = GetDC(0);
 289             oldFont = SelectObject( hdc, hFont );
 290             GetTextMetrics( hdc, &tm );
 291             SelectObject( hdc, oldFont );
 292             ReleaseDC( 0, hdc );
 293             xUnit = tm.tmAveCharWidth;
 294             yUnit = tm.tmHeight;
 295             if (tm.tmPitchAndFamily & TMPF_FIXED_PITCH)
 296                 xBaseUnit = xBaseUnit * 5 / 4;  /* See DIALOG_Init() */
 297         }
 298     }
 299
 300       /* Create dialog main window */
 301
 302     rect.left = rect.top = 0;
 303     rect.right = template.header.cx * xUnit / 4;
 304     rect.bottom = template.header.cy * yUnit / 8;
 305     if (template.header.style & DS_MODALFRAME) exStyle |= WS_EX_DLGMODALFRAME;
 306     AdjustWindowRectEx( &rect, template.header.style,
 307                         hMenu ? TRUE : FALSE , exStyle );
 308     rect.right -= rect.left;
 309     rect.bottom -= rect.top;
 310
 311     if ((INT)template.header.x == CW_USEDEFAULT)
 312         rect.left = rect.top = CW_USEDEFAULT;
 313     else
 314     {
 315         rect.left += template.header.x * xUnit / 4;
 316         rect.top += template.header.y * yUnit / 8;
 317         if (!(template.header.style & DS_ABSALIGN))
 318             ClientToScreen( owner, (POINT *)&rect );
 319     }
 320
 321     hwnd = CreateWindowEx( exStyle, template.className, template.caption,
 322                            template.header.style & ~WS_VISIBLE,
 323                            rect.left, rect.top, rect.right, rect.bottom,
 324                            owner, hMenu, hInst, (SEGPTR)0 );
 325     if (!hwnd)
 326     {
 327         if (hFont) DeleteObject( hFont );
 328         if (hMenu) DestroyMenu( hMenu );
 329         return 0;
 330     }
 331
 332       /* Create control windows */
 333
 334     dprintf_dialog(stddeb, " BEGIN\n" );
 335
 336     wndPtr = WIN_FindWndPtr( hwnd );
 337     dlgInfo = (DIALOGINFO *)wndPtr->wExtra;
 338     dlgInfo->msgResult = 0;  /* This is used to store the default button id */
 339     dlgInfo->hDialogHeap = 0;
 340
 341     for (i = 0; i < template.header.nbItems; i++)
 342     {
 343         DLGCONTROLHEADER *header;
 344         SEGPTR className, winName;
 345         HWND hwndDefButton = 0;
 346         char buffer[10];
 347
 348         header = (DLGCONTROLHEADER *)PTR_SEG_TO_LIN( headerPtr );
 349         headerPtr = DIALOG_GetControl( headerPtr, &className, &winName );
 350
 351         if (!HIWORD(className))
 352         {
 353             switch(LOWORD(className))
 354             {
 355             case 0x80: strcpy( buffer, "BUTTON" ); break;
 356             case 0x81: strcpy( buffer, "EDIT" ); break;
 357             case 0x82: strcpy( buffer, "STATIC" ); break;
 358             case 0x83: strcpy( buffer, "LISTBOX" ); break;
 359             case 0x84: strcpy( buffer, "SCROLLBAR" ); break;
 360             case 0x85: strcpy( buffer, "COMBOBOX" ); break;
 361             default:   buffer[0] = '\0'; break;
 362             }
 363             className = MAKE_SEGPTR(buffer);
 364         }
 365
 366         if (HIWORD(className))
 367             dprintf_dialog(stddeb, "   %s ", (char*)PTR_SEG_TO_LIN(className));
 368         else dprintf_dialog(stddeb, "   %04x ", LOWORD(className) );
 369         if (HIWORD(winName))
 370             dprintf_dialog(stddeb,"'%s'", (char *)PTR_SEG_TO_LIN(winName) );
 371         else dprintf_dialog(stddeb,"%04x", LOWORD(winName) );
 372
 373         dprintf_dialog(stddeb," %d, %d, %d, %d, %d, %08lx\n",
 374                        header->id, header->x, header->y,
 375                        header->cx, header->cy, header->style );
 376
 377         if (HIWORD(className) &&
 378             !strcmp( (char *)PTR_SEG_TO_LIN(className), "EDIT") &&
 379             ((header->style & DS_LOCALEDIT) != DS_LOCALEDIT))
 380         {
 381             if (!dlgInfo->hDialogHeap)
 382             {
 383                 dlgInfo->hDialogHeap = GlobalAlloc(GMEM_FIXED, 0x10000);
 384                 if (!dlgInfo->hDialogHeap)
 385                 {
 386                     fprintf(stderr,"CreateDialogIndirectParam: Insufficient memory to create heap for edit control\n");
 387                     continue;
 388                 }
 389                 LocalInit(dlgInfo->hDialogHeap, 0, 0xffff);
 390             }
 391             hwndCtrl = CreateWindowEx(WS_EX_NOPARENTNOTIFY, className, winName,
 392                                       header->style | WS_CHILD,
 393                                       header->x * xUnit / 4,
 394                                       header->y * yUnit / 8,
 395                                       header->cx * xUnit / 4,
 396                                       header->cy * yUnit / 8,
 397                                       hwnd, (HMENU)header->id,
 398                                       dlgInfo->hDialogHeap, (SEGPTR)0 );
 399         }
 400         else
 401         {
 402             hwndCtrl = CreateWindowEx(WS_EX_NOPARENTNOTIFY, className, winName,
 403                                       header->style | WS_CHILD,
 404                                       header->x * xUnit / 4,
 405                                       header->y * yUnit / 8,
 406                                       header->cx * xUnit / 4,
 407                                       header->cy * yUnit / 8,
 408                                       hwnd, (HMENU)header->id,
 409                                       hInst, (SEGPTR)0 );
 410         }
 411
 412         /* Make the control last one in Z-order, so that controls remain
 413            in the order in which they were created */
 414         SetWindowPos( hwndCtrl, HWND_BOTTOM, 0, 0, 0, 0,
 415                       SWP_NOSIZE | SWP_NOMOVE | SWP_NOACTIVATE );
 416
 417             /* Send initialisation messages to the control */
 418         if (hFont) SendMessage( hwndCtrl, WM_SETFONT, (WPARAM)hFont, 0 );
 419         if (SendMessage( hwndCtrl, WM_GETDLGCODE, 0, 0 ) & DLGC_DEFPUSHBUTTON)
 420         {
 421               /* If there's already a default push-button, set it back */
 422               /* to normal and use this one instead. */
 423             if (hwndDefButton)
 424                 SendMessage( hwndDefButton, BM_SETSTYLE, BS_PUSHBUTTON, FALSE);
 425             hwndDefButton = hwndCtrl;
 426             dlgInfo->msgResult = GetWindowWord( hwndCtrl, GWW_ID );
 427         }
 428     }
 429
 430     dprintf_dialog(stddeb, " END\n" );
 431
 432       /* Initialise dialog extra data */
 433
 434     dlgInfo->dlgProc   = dlgProc;
 435     dlgInfo->hUserFont = hFont;
 436     dlgInfo->hMenu     = hMenu;
 437     dlgInfo->xBaseUnit = xUnit;
 438     dlgInfo->yBaseUnit = yUnit;
 439     dlgInfo->hwndFocus = DIALOG_GetFirstTabItem( hwnd );
 440
 441       /* Send initialisation messages and set focus */
 442
 443     if (dlgInfo->hUserFont)
 444         SendMessage( hwnd, WM_SETFONT, (WPARAM)dlgInfo->hUserFont, 0 );
 445     if (SendMessage( hwnd, WM_INITDIALOG, (WPARAM)dlgInfo->hwndFocus, param ))
 446         SetFocus( dlgInfo->hwndFocus );
 447     if (template.header.style & WS_VISIBLE) ShowWindow(hwnd, SW_SHOW);
 448     return hwnd;
 449 }
 450
 451
 452 /***********************************************************************
 453  *           DIALOG_DoDialogBox
 454  */
 455 static int DIALOG_DoDialogBox( HWND hwnd, HWND owner )
 456 {
 457     WND * wndPtr;
 458     DIALOGINFO * dlgInfo;
 459     HANDLE msgHandle;
 460     MSG* lpmsg;
 461     int retval;
 462
 463       /* Owner must be a top-level window */
 464     owner = WIN_GetTopParent( owner );
 465     if (!(wndPtr = WIN_FindWndPtr( hwnd ))) return -1;
 466     if (!(msgHandle = USER_HEAP_ALLOC( sizeof(MSG) ))) return -1;
 467     lpmsg = (MSG *) USER_HEAP_LIN_ADDR( msgHandle );
 468     dlgInfo = (DIALOGINFO *)wndPtr->wExtra;
 469     EnableWindow( owner, FALSE );
 470     ShowWindow( hwnd, SW_SHOW );
 471
 472     while (MSG_InternalGetMessage( USER_HEAP_SEG_ADDR(msgHandle), hwnd, owner,
 473                                    MSGF_DIALOGBOX, PM_REMOVE,
 474                                    !(wndPtr->dwStyle & DS_NOIDLEMSG) ))
 475     {
 476         if (!IsDialogMessage( hwnd, lpmsg))
 477         {
 478             TranslateMessage( lpmsg );
 479             DispatchMessage( lpmsg );
 480         }
 481         if (dlgInfo->fEnd) break;
 482     }
 483     retval = dlgInfo->msgResult;
 484     DestroyWindow( hwnd );
 485     USER_HEAP_FREE( msgHandle );
 486     EnableWindow( owner, TRUE );
 487     return retval;
 488 }
 489
 490
 491 /***********************************************************************
 492  *           DialogBox   (USER.87)
 493  */
 494 int DialogBox( HINSTANCE hInst, SEGPTR dlgTemplate,
 495                HWND owner, WNDPROC dlgProc )
 496 {
 497     return DialogBoxParam( hInst, dlgTemplate, owner, dlgProc, 0 );
 498 }
 499
 500
 501 /***********************************************************************
 502  *           DialogBoxParam   (USER.239)
 503  */
 504 int DialogBoxParam( HINSTANCE hInst, SEGPTR dlgTemplate,
 505                     HWND owner, WNDPROC dlgProc, LPARAM param )
 506 {
 507     HWND hwnd;
 508
 509     dprintf_dialog(stddeb, "DialogBoxParam: "NPFMT",%08lx,"NPFMT",%08lx,%ld\n",
 510             hInst, dlgTemplate, owner, (DWORD)dlgProc, param );
 511     hwnd = CreateDialogParam( hInst, dlgTemplate, owner, dlgProc, param );
 512     if (hwnd) return DIALOG_DoDialogBox( hwnd, owner );
 513     return -1;
 514 }
 515
 516
 517 /***********************************************************************
 518  *           DialogBoxIndirect   (USER.218)
 519  */
 520 int DialogBoxIndirect( HINSTANCE hInst, HANDLE dlgTemplate,
 521                        HWND owner, WNDPROC dlgProc )
 522 {
 523     return DialogBoxIndirectParam( hInst, dlgTemplate, owner, dlgProc, 0 );
 524 }
 525
 526
 527 /***********************************************************************
 528  *           DialogBoxIndirectParam   (USER.240)
 529  */
 530 int DialogBoxIndirectParam( HINSTANCE hInst, HANDLE dlgTemplate,
 531                             HWND owner, WNDPROC dlgProc, LPARAM param )
 532 {
 533     HWND hwnd;
 534     SEGPTR ptr;
 535
 536     if (!(ptr = (SEGPTR)WIN16_GlobalLock( dlgTemplate ))) return -1;
 537     hwnd = CreateDialogIndirectParam( hInst, ptr, owner, dlgProc, param );
 538     GlobalUnlock( dlgTemplate );
 539     if (hwnd) return DIALOG_DoDialogBox( hwnd, owner );
 540     return -1;
 541 }
 542
 543
 544 /***********************************************************************
 545  *           EndDialog   (USER.88)
 546  */
 547 void EndDialog( HWND hwnd, short retval )
 548 {
 549     WND * wndPtr = WIN_FindWndPtr( hwnd );
 550     DIALOGINFO * dlgInfo = (DIALOGINFO *)wndPtr->wExtra;
 551     dlgInfo->msgResult = retval;
 552     dlgInfo->fEnd = TRUE;
 553     dprintf_dialog(stddeb, "EndDialog: "NPFMT" %d\n", hwnd, retval );
 554 }
 555
 556
 557 /***********************************************************************
 558  *           IsDialogMessage   (USER.90)
 559  */
 560 BOOL IsDialogMessage( HWND hwndDlg, LPMSG msg )
 561 {
 562     WND * wndPtr;
 563     int dlgCode;
 564
 565     if (!(wndPtr = WIN_FindWndPtr( hwndDlg ))) return FALSE;
 566     if ((hwndDlg != msg->hwnd) && !IsChild( hwndDlg, msg->hwnd )) return FALSE;
 567
 568       /* Only the key messages get special processing */
 569     if ((msg->message != WM_KEYDOWN) &&
 570         (msg->message != WM_SYSCHAR) &&
 571         (msg->message != WM_CHAR))
 572         return FALSE;
 573
 574     dlgCode = SendMessage( msg->hwnd, WM_GETDLGCODE, 0, 0 );
 575     if (dlgCode & DLGC_WANTMESSAGE)
 576     {
 577         DispatchMessage( msg );
 578         return TRUE;
 579     }
 580
 581     switch(msg->message)
 582     {
 583     case WM_KEYDOWN:
 584         if (dlgCode & DLGC_WANTALLKEYS) break;
 585         switch(msg->wParam)
 586         {
 587         case VK_TAB:
 588             if (!(dlgCode & DLGC_WANTTAB))
 589             {
 590                 SendMessage( hwndDlg, WM_NEXTDLGCTL,
 591                              (GetKeyState(VK_SHIFT) & 0x80), 0 );
 592                 return TRUE;
 593             }
 594             break;
 595
 596         case VK_RIGHT:
 597         case VK_DOWN:
 598             if (!(dlgCode & DLGC_WANTARROWS))
 599             {
 600                 SetFocus(GetNextDlgGroupItem(hwndDlg,GetFocus(),FALSE));
 601                 return TRUE;
 602             }
 603             break;
 604
 605         case VK_LEFT:
 606         case VK_UP:
 607             if (!(dlgCode & DLGC_WANTARROWS))
 608             {
 609                 SetFocus(GetNextDlgGroupItem(hwndDlg,GetFocus(),TRUE));
 610                 return TRUE;
 611             }
 612             break;
 613
 614         case VK_ESCAPE:
 615 #ifdef WINELIB32
 616             SendMessage( hwndDlg, WM_COMMAND,
 617                          MAKEWPARAM( IDCANCEL, 0 ),
 618                          (LPARAM)GetDlgItem(hwndDlg,IDCANCEL) );
 619 #else
 620             SendMessage( hwndDlg, WM_COMMAND, IDCANCEL,
 621                          MAKELPARAM( GetDlgItem(hwndDlg,IDCANCEL), 0 ));
 622 #endif
 623             break;
 624
 625         case VK_RETURN:
 626             {
 627                 DWORD dw = SendMessage( hwndDlg, DM_GETDEFID, 0, 0 );
 628                 if (HIWORD(dw) == DC_HASDEFID)
 629 #ifdef WINELIB32
 630                     SendMessage( hwndDlg, WM_COMMAND,
 631                                  MAKEWPARAM( LOWORD(dw), BN_CLICKED ),
 632                                  (LPARAM)GetDlgItem( hwndDlg, LOWORD(dw) ) );
 633                 else
 634                     SendMessage( hwndDlg, WM_COMMAND,
 635                                  MAKEWPARAM( IDOK, 0 ),
 636                                  (LPARAM)GetDlgItem(hwndDlg,IDOK) );
 637 #else
 638                     SendMessage( hwndDlg, WM_COMMAND, LOWORD(dw),
 639                                  MAKELPARAM( GetDlgItem( hwndDlg, LOWORD(dw) ),
 640                                              BN_CLICKED ));
 641                 else
 642                     SendMessage( hwndDlg, WM_COMMAND, IDOK,
 643                                  MAKELPARAM( GetDlgItem(hwndDlg,IDOK), 0 ));
 644 #endif
 645             }
 646             break;
 647         }
 648         break;  /* case WM_KEYDOWN */
 649
 650
 651     case WM_CHAR:
 652         if (dlgCode & (DLGC_WANTALLKEYS | DLGC_WANTCHARS)) break;
 653         break;
 654
 655     case WM_SYSCHAR:
 656         if (dlgCode & DLGC_WANTALLKEYS) break;
 657         break;
 658     }
 659
 660       /* If we get here, the message has not been treated specially */
 661       /* and can be sent to its destination window. */
 662     DispatchMessage( msg );
 663     return TRUE;
 664 }
 665
 666
 667 /****************************************************************
 668  *         GetDlgCtrlID           (USER.277)
 669  */
 670 int GetDlgCtrlID( HWND hwnd )
 671 {
 672     WND *wndPtr = WIN_FindWndPtr(hwnd);
 673     if (wndPtr) return wndPtr->wIDmenu;
 674     else return 0;
 675 }
 676
 677
 678 /***********************************************************************
 679  *           GetDlgItem   (USER.91)
 680  */
 681 HWND GetDlgItem( HWND hwndDlg, WORD id )
 682 {
 683     HWND curChild;
 684     WND * childPtr;
 685     WND * wndPtr;
 686
 687     if (!(wndPtr = WIN_FindWndPtr( hwndDlg ))) return 0;
 688     curChild = wndPtr->hwndChild;
 689     while(curChild)
 690     {
 691         childPtr = WIN_FindWndPtr( curChild );
 692         if (childPtr->wIDmenu == id) return curChild;
 693         curChild = childPtr->hwndNext;
 694     }
 695     return 0;
 696 }
 697
 698
 699 /*******************************************************************
 700  *           SendDlgItemMessage   (USER.101)
 701  */
 702 LRESULT SendDlgItemMessage(HWND hwnd, INT id, UINT msg, WPARAM wParam, LPARAM lParam)
 703 {
 704     HWND hwndCtrl = GetDlgItem( hwnd, id );
 705     if (hwndCtrl) return SendMessage( hwndCtrl, msg, wParam, lParam );
 706     else return 0;
 707 }
 708
 709
 710 /*******************************************************************
 711  *           SetDlgItemText   (USER.92)
 712  */
 713 void SetDlgItemText( HWND hwnd, WORD id, SEGPTR lpString )
 714 {
 715     SendDlgItemMessage( hwnd, id, WM_SETTEXT, 0, (DWORD)lpString );
 716 }
 717
 718
 719 /***********************************************************************
 720  *           GetDlgItemText   (USER.93)
 721  */
 722 int GetDlgItemText( HWND hwnd, WORD id, SEGPTR str, WORD max )
 723 {
 724     return (int)SendDlgItemMessage( hwnd, id, WM_GETTEXT, max, (DWORD)str );
 725 }
 726
 727
 728 /*******************************************************************
 729  *           SetDlgItemInt   (USER.94)
 730  */
 731 void SetDlgItemInt( HWND hwnd, WORD id, WORD value, BOOL fSigned )
 732 {
 733     char str[20];
 734
 735     if (fSigned) sprintf( str, "%d", (int)value );
 736     else sprintf( str, "%u", value );
 737     SendDlgItemMessage( hwnd, id, WM_SETTEXT, 0, MAKE_SEGPTR(str) );
 738 }
 739
 740
 741 /***********************************************************************
 742  *           GetDlgItemInt   (USER.95)
 743  */
 744 WORD GetDlgItemInt( HWND hwnd, WORD id, BOOL * translated, BOOL fSigned )
 745 {
 746     char str[30];
 747     long result = 0;
 748
 749     if (translated) *translated = FALSE;
 750     if (SendDlgItemMessage( hwnd, id, WM_GETTEXT, 30, MAKE_SEGPTR(str) ))
 751     {
 752         char * endptr;
 753         result = strtol( str, &endptr, 10 );
 754         if (endptr && (endptr != str))  /* Conversion was successful */
 755         {
 756             if (fSigned)
 757             {
 758                 if ((result < -32767) || (result > 32767)) result = 0;
 759                 else if (translated) *translated = TRUE;
 760             }
 761             else
 762             {
 763                 if ((result < 0) || (result > 65535)) result = 0;
 764                 else if (translated) *translated = TRUE;
 765             }
 766         }
 767     }
 768     return (WORD)result;
 769 }
 770
 771
 772 /***********************************************************************
 773  *           CheckDlgButton   (USER.97)
 774  */
 775 void CheckDlgButton( HWND hwnd, WORD id, WORD check )
 776 {
 777     SendDlgItemMessage( hwnd, id, BM_SETCHECK, check, 0 );
 778 }
 779
 780
 781 /***********************************************************************
 782  *           IsDlgButtonChecked   (USER.98)
 783  */
 784 WORD IsDlgButtonChecked( HWND hwnd, WORD id )
 785 {
 786     return (WORD)SendDlgItemMessage( hwnd, id, BM_GETCHECK, 0, 0 );
 787 }
 788
 789
 790 /***********************************************************************
 791  *           CheckRadioButton   (USER.96)
 792  */
 793 void CheckRadioButton( HWND hwndDlg, WORD firstID, WORD lastID, WORD checkID )
 794 {
 795     HWND button = GetWindow( hwndDlg, GW_CHILD );
 796     WND *wndPtr;
 797
 798     while (button)
 799     {
 800         if (!(wndPtr = WIN_FindWndPtr( button ))) return;
 801         if ((wndPtr->wIDmenu == firstID) || (wndPtr->wIDmenu == lastID)) break;
 802         button = wndPtr->hwndNext;
 803     }
 804     if (!button) return;
 805
 806     if (wndPtr->wIDmenu == lastID)
 807         lastID = firstID;  /* Buttons are in reverse order */
 808     while (button)
 809     {
 810         if (!(wndPtr = WIN_FindWndPtr( button ))) return;
 811         SendMessage( button, BM_SETCHECK, (wndPtr->wIDmenu == checkID), 0 );
 812         if (wndPtr->wIDmenu == lastID) break;
 813         button = wndPtr->hwndNext;
 814     }
 815 }
 816
 817
 818 /***********************************************************************
 819  *           GetDialogBaseUnits   (USER.243)
 820  */
 821 DWORD GetDialogBaseUnits()
 822 {
 823     return MAKELONG( xBaseUnit, yBaseUnit );
 824 }
 825
 826
 827 /***********************************************************************
 828  *           MapDialogRect   (USER.103)
 829  */
 830 void MapDialogRect( HWND hwnd, LPRECT rect )
 831 {
 832     DIALOGINFO * dlgInfo;
 833     WND * wndPtr = WIN_FindWndPtr( hwnd );
 834     if (!wndPtr) return;
 835     dlgInfo = (DIALOGINFO *)wndPtr->wExtra;
 836     rect->left   = (rect->left * dlgInfo->xBaseUnit) / 4;
 837     rect->right  = (rect->right * dlgInfo->xBaseUnit) / 4;
 838     rect->top    = (rect->top * dlgInfo->yBaseUnit) / 8;
 839     rect->bottom = (rect->bottom * dlgInfo->yBaseUnit) / 8;
 840 }
 841
 842
 843 /***********************************************************************
 844  *           GetNextDlgGroupItem   (USER.227)
 845  */
 846 HWND GetNextDlgGroupItem( HWND hwndDlg, HWND hwndCtrl, BOOL fPrevious )
 847 {
 848     HWND hwnd, hwndStart;
 849     WND * dlgPtr, * ctrlPtr, * wndPtr;
 850
 851     if (!(dlgPtr = WIN_FindWndPtr( hwndDlg ))) return 0;
 852     if (!(ctrlPtr = WIN_FindWndPtr( hwndCtrl ))) return 0;
 853     if (ctrlPtr->hwndParent != hwndDlg) return 0;
 854
 855     if (!fPrevious && ctrlPtr->hwndNext)  /*Check if next control is in group*/
 856     {
 857         wndPtr = WIN_FindWndPtr( ctrlPtr->hwndNext );
 858         if (!(wndPtr->dwStyle & WS_GROUP)) return ctrlPtr->hwndNext;
 859     }
 860
 861       /* Now we will have to find the start of the group */
 862
 863     hwndStart = hwnd = dlgPtr->hwndChild;
 864     while (hwnd)
 865     {
 866         wndPtr = WIN_FindWndPtr( hwnd );
 867         if (wndPtr->dwStyle & WS_GROUP) hwndStart = hwnd;  /*Start of a group*/
 868         if (hwnd == hwndCtrl) break;
 869         hwnd = wndPtr->hwndNext;
 870     }
 871
 872     if (!hwnd) fprintf(stderr, "GetNextDlgGroupItem: hwnd not in dialog!\n");
 873
 874       /* only case left for forward search: wraparound */
 875     if (!fPrevious) return hwndStart;
 876
 877     hwnd = hwndStart;
 878     wndPtr = WIN_FindWndPtr( hwnd );
 879     hwnd = wndPtr->hwndNext;
 880     while (hwnd && (hwnd != hwndCtrl))
 881     {
 882         wndPtr = WIN_FindWndPtr( hwnd );
 883         if (wndPtr->dwStyle & WS_GROUP) break;
 884         hwndStart = hwnd;
 885         hwnd = wndPtr->hwndNext;
 886     }
 887     return hwndStart;
 888 }
 889
 890
 891 /***********************************************************************
 892  *           GetNextDlgTabItem   (USER.228)
 893  */
 894 HWND GetNextDlgTabItem( HWND hwndDlg, HWND hwndCtrl, BOOL fPrevious )
 895 {
 896     HWND hwnd, hwndLast;
 897     WND * dlgPtr, * ctrlPtr, * wndPtr;
 898
 899     if (!(dlgPtr = WIN_FindWndPtr( hwndDlg ))) return 0;
 900     if (!(ctrlPtr = WIN_FindWndPtr( hwndCtrl ))) return 0;
 901     if (ctrlPtr->hwndParent != hwndDlg) return 0;
 902
 903     hwndLast = hwndCtrl;
 904     hwnd = ctrlPtr->hwndNext;
 905     while (1)
 906     {
 907         if (!hwnd) hwnd = dlgPtr->hwndChild;
 908         if (hwnd == hwndCtrl) break;
 909         wndPtr = WIN_FindWndPtr( hwnd );
 910         if ((wndPtr->dwStyle & WS_TABSTOP) && (wndPtr->dwStyle & WS_VISIBLE))
 911         {
 912             hwndLast = hwnd;
 913             if (!fPrevious) break;
 914         }
 915         hwnd = wndPtr->hwndNext;
 916     }
 917     return hwndLast;
 918 }