git.oblomov.eu Git - wine/blob - windows/mdi.c

   1 /* MDI.C
   2  *
   3  * Copyright 1994, Bob Amstadt
   4  *           1995,1996 Alex Korobka
   5  *
   6  * This file contains routines to support MDI (Multiple Document
   7  * Interface) features .
   8  *
   9  * Notes: Fairly complete implementation.
  10  *        Also, Excel and WinWord do _not_ use MDI so if you're trying
  11  *        to fix them look elsewhere.
  12  *
  13  * Notes on how the "More Windows..." is implemented:
  14  *
  15  *      When we have more than 9 opened windows, a "More Windows..."
  16  *      option appears in the "Windows" menu. Each child window has
  17  *      a WND* associated with it, accesible via the children list of
  18  *      the parent window. This WND* has a wIDmenu member, which reflects
  19  *      the position of the child in the window list. For example, with
  20  *      9 child windows, we could have the following pattern:
  21  *
  22  *
  23  *
  24  *                Name of the child window    pWndChild->wIDmenu
  25  *                     Doc1                       5000
  26  *                     Doc2                       5001
  27  *                     Doc3                       5002
  28  *                     Doc4                       5003
  29  *                     Doc5                       5004
  30  *                     Doc6                       5005
  31  *                     Doc7                       5006
  32  *                     Doc8                       5007
  33  *                     Doc9                       5008
  34  *
  35  *
  36  *       The "Windows" menu, as the "More windows..." dialog, are constructed
  37  *       in this order. If we add a child, we would have the following list:
  38  *
  39  *
  40  *               Name of the child window    pWndChild->wIDmenu
  41  *                     Doc1                       5000
  42  *                     Doc2                       5001
  43  *                     Doc3                       5002
  44  *                     Doc4                       5003
  45  *                     Doc5                       5004
  46  *                     Doc6                       5005
  47  *                     Doc7                       5006
  48  *                     Doc8                       5007
  49  *                     Doc9                       5008
  50  *                     Doc10                      5009
  51  *
  52  *       But only 5000 to 5008 would be displayed in the "Windows" menu. We want
  53  *       the last created child to be in the menu, so we swap the last child with
  54  *       the 9th... Doc9 will be accessible via the "More Windows..." option.
  55  *
  56  *                     Doc1                       5000
  57  *                     Doc2                       5001
  58  *                     Doc3                       5002
  59  *                     Doc4                       5003
  60  *                     Doc5                       5004
  61  *                     Doc6                       5005
  62  *                     Doc7                       5006
  63  *                     Doc8                       5007
  64  *                     Doc9                       5009
  65  *                     Doc10                      5008
  66  *
  67  */
  68
  69 #include <stdlib.h>
  70 #include <stdio.h>
  71 #include <string.h>
  72 #include <math.h>
  73
  74 #include "windef.h"
  75 #include "winbase.h"
  76 #include "wingdi.h"
  77 #include "winuser.h"
  78 #include "wine/unicode.h"
  79 #include "win.h"
  80 #include "heap.h"
  81 #include "nonclient.h"
  82 #include "controls.h"
  83 #include "user.h"
  84 #include "struct32.h"
  85 #include "debugtools.h"
  86 #include "dlgs.h"
  87
  88 DEFAULT_DEBUG_CHANNEL(mdi);
  89
  90 #define MDI_MAXLISTLENGTH       0x40
  91 #define MDI_MAXTITLELENGTH      0xa1
  92
  93 #define MDI_NOFRAMEREPAINT      0
  94 #define MDI_REPAINTFRAMENOW     1
  95 #define MDI_REPAINTFRAME        2
  96
  97 #define WM_MDICALCCHILDSCROLL   0x10ac /* this is exactly what Windows uses */
  98
  99 /* "More Windows..." definitions */
 100 #define MDI_MOREWINDOWSLIMIT    9       /* after this number of windows, a "More Windows..."
 101                                            option will appear under the Windows menu */
 102 #define MDI_IDC_LISTBOX         100
 103 #define MDI_IDS_MOREWINDOWS     13
 104
 105 #define MDIF_NEEDUPDATE         0x0001
 106
 107 typedef struct
 108 {
 109     UINT      nActiveChildren;
 110     HWND      hwndChildMaximized;
 111     HWND      hwndActiveChild;
 112     HMENU     hWindowMenu;
 113     UINT      idFirstChild;
 114     LPWSTR    frameTitle;
 115     UINT      nTotalCreated;
 116     UINT      mdiFlags;
 117     UINT      sbRecalc;   /* SB_xxx flags for scrollbar fixup */
 118     HWND      self;
 119 } MDICLIENTINFO;
 120
 121 static HBITMAP hBmpClose   = 0;
 122 static HBITMAP hBmpRestore = 0;
 123
 124 /* ----------------- declarations ----------------- */
 125 static void MDI_UpdateFrameText(WND *, HWND, BOOL, LPCWSTR);
 126 static BOOL MDI_AugmentFrameMenu(WND *, HWND);
 127 static BOOL MDI_RestoreFrameMenu(WND *, HWND);
 128
 129 static LONG MDI_ChildActivate( WND*, HWND );
 130
 131 static HWND MDI_MoreWindowsDialog(WND*);
 132 static void MDI_SwapMenuItems(WND *, UINT, UINT);
 133 static LRESULT WINAPI MDIClientWndProcA( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam );
 134 static LRESULT WINAPI MDIClientWndProcW( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam );
 135
 136 /* -------- Miscellaneous service functions ----------
 137  *
 138  *                      MDI_GetChildByID
 139  */
 140 static HWND MDI_GetChildByID(WND* wndPtr, UINT id)
 141 {
 142     for (wndPtr = wndPtr->child; wndPtr; wndPtr = wndPtr->next)
 143         if (wndPtr->wIDmenu == id) return wndPtr->hwndSelf;
 144     return 0;
 145 }
 146
 147 static void MDI_PostUpdate(HWND hwnd, MDICLIENTINFO* ci, WORD recalc)
 148 {
 149     if( !(ci->mdiFlags & MDIF_NEEDUPDATE) )
 150     {
 151         ci->mdiFlags |= MDIF_NEEDUPDATE;
 152         PostMessageA( hwnd, WM_MDICALCCHILDSCROLL, 0, 0);
 153     }
 154     ci->sbRecalc = recalc;
 155 }
 156
 157
 158 /*********************************************************************
 159  * MDIClient class descriptor
 160  */
 161 const struct builtin_class_descr MDICLIENT_builtin_class =
 162 {
 163     "MDIClient",            /* name */
 164     CS_GLOBALCLASS,         /* style */
 165     MDIClientWndProcA,      /* procA */
 166     MDIClientWndProcW,      /* procW */
 167     sizeof(MDICLIENTINFO),  /* extra */
 168     IDC_ARROWA,             /* cursor */
 169     COLOR_APPWORKSPACE+1    /* brush */
 170 };
 171
 172
 173 /**********************************************************************
 174  *                      MDI_MenuModifyItem
 175  */
 176 static BOOL MDI_MenuModifyItem(WND* clientWnd, HWND hWndChild )
 177 {
 178     WCHAR           buffer[128];
 179     static const WCHAR format[] = {'%','d',' ',0};
 180     MDICLIENTINFO  *clientInfo = (MDICLIENTINFO*)clientWnd->wExtra;
 181     WND            *wndPtr     = WIN_FindWndPtr(hWndChild);
 182     UINT            n          = wsprintfW(buffer, format,
 183                                            wndPtr->wIDmenu - clientInfo->idFirstChild + 1);
 184     BOOL            bRet            = 0;
 185
 186     if( !clientInfo->hWindowMenu )
 187     {
 188         bRet =  FALSE;
 189         goto END;
 190     }
 191
 192     if (wndPtr->text) lstrcpynW(buffer + n, wndPtr->text, sizeof(buffer)/sizeof(WCHAR) - n );
 193
 194     n    = GetMenuState(clientInfo->hWindowMenu,wndPtr->wIDmenu ,MF_BYCOMMAND);
 195     bRet = ModifyMenuW(clientInfo->hWindowMenu , wndPtr->wIDmenu,
 196                       MF_BYCOMMAND | MF_STRING, wndPtr->wIDmenu, buffer );
 197     CheckMenuItem(clientInfo->hWindowMenu ,wndPtr->wIDmenu , n & MF_CHECKED);
 198 END:
 199     WIN_ReleaseWndPtr(wndPtr);
 200     return bRet;
 201 }
 202
 203 /**********************************************************************
 204  *                      MDI_MenuDeleteItem
 205  */
 206 static BOOL MDI_MenuDeleteItem(WND* clientWnd, HWND hWndChild )
 207 {
 208     WCHAR        buffer[128];
 209     static const WCHAR format[] = {'&','%','d',' ',0};
 210     MDICLIENTINFO *clientInfo = (MDICLIENTINFO*)clientWnd->wExtra;
 211     WND         *wndPtr     = WIN_FindWndPtr(hWndChild);
 212     UINT         index      = 0,id,n;
 213     BOOL         retvalue;
 214
 215     if( !clientInfo->nActiveChildren ||
 216         !clientInfo->hWindowMenu )
 217     {
 218         retvalue = FALSE;
 219         goto END;
 220     }
 221
 222     id = wndPtr->wIDmenu;
 223     DeleteMenu(clientInfo->hWindowMenu,id,MF_BYCOMMAND);
 224
 225  /* walk the rest of MDI children to prevent gaps in the id
 226   * sequence and in the menu child list */
 227
 228     for( index = id+1; index <= clientInfo->nActiveChildren +
 229                                 clientInfo->idFirstChild; index++ )
 230     {
 231         WND *tmpWnd = WIN_FindWndPtr(MDI_GetChildByID(clientWnd,index));
 232         if( !tmpWnd )
 233         {
 234               TRACE("no window for id=%i\n",index);
 235             WIN_ReleaseWndPtr(tmpWnd);
 236               continue;
 237         }
 238
 239         /* set correct id */
 240         tmpWnd->wIDmenu--;
 241
 242         n = wsprintfW(buffer, format ,index - clientInfo->idFirstChild);
 243         if (tmpWnd->text)
 244             lstrcpynW(buffer + n, tmpWnd->text, sizeof(buffer)/sizeof(WCHAR) - n );
 245
 246         /*  change menu if the current child is to be shown in the
 247          *  "Windows" menu
 248          */
 249         if (index <= clientInfo->idFirstChild + MDI_MOREWINDOWSLIMIT)
 250         ModifyMenuW(clientInfo->hWindowMenu ,index ,MF_BYCOMMAND | MF_STRING,
 251                       index - 1 , buffer );
 252         WIN_ReleaseWndPtr(tmpWnd);
 253     }
 254
 255     /*  We must restore the "More Windows..." option if there is enough child
 256      */
 257     if (clientInfo->nActiveChildren - 1 > MDI_MOREWINDOWSLIMIT)
 258     {
 259         WCHAR szTmp[50];
 260         LoadStringW(GetModuleHandleA("USER32"), MDI_IDS_MOREWINDOWS, szTmp, sizeof(szTmp)/sizeof(szTmp[0]));
 261         AppendMenuW(clientInfo->hWindowMenu, MF_STRING, clientInfo->idFirstChild + MDI_MOREWINDOWSLIMIT, szTmp);
 262     }
 263     retvalue = TRUE;
 264 END:
 265     WIN_ReleaseWndPtr(wndPtr);
 266     return retvalue;
 267 }
 268
 269 /**********************************************************************
 270  *                      MDI_GetWindow
 271  *
 272  * returns "activateable" child different from the current or zero
 273  */
 274 static HWND MDI_GetWindow(WND *clientWnd, HWND hWnd, BOOL bNext,
 275                             DWORD dwStyleMask )
 276 {
 277     MDICLIENTINFO *clientInfo = (MDICLIENTINFO*)clientWnd->wExtra;
 278     WND *wndPtr, *pWnd, *pWndLast = NULL;
 279
 280     dwStyleMask |= WS_DISABLED | WS_VISIBLE;
 281     if( !hWnd ) hWnd = clientInfo->hwndActiveChild;
 282
 283     if( !(wndPtr = WIN_FindWndPtr(hWnd)) ) return 0;
 284
 285     for ( pWnd = WIN_LockWndPtr(wndPtr->next); ; WIN_UpdateWndPtr(&pWnd,pWnd->next))
 286     {
 287         if (!pWnd ) WIN_UpdateWndPtr(&pWnd,wndPtr->parent->child);
 288
 289         if ( pWnd == wndPtr ) break; /* went full circle */
 290
 291         if (!pWnd->owner && (pWnd->dwStyle & dwStyleMask) == WS_VISIBLE )
 292         {
 293             pWndLast = pWnd;
 294             if ( bNext ) break;
 295         }
 296     }
 297     WIN_ReleaseWndPtr(wndPtr);
 298     WIN_ReleaseWndPtr(pWnd);
 299     return pWndLast ? pWndLast->hwndSelf : 0;
 300 }
 301
 302 /**********************************************************************
 303  *                      MDI_CalcDefaultChildPos
 304  *
 305  *  It seems that the default height is about 2/3 of the client rect
 306  */
 307 static void MDI_CalcDefaultChildPos( WND* w, WORD n, LPPOINT lpPos,
 308                                      INT delta)
 309 {
 310     INT  nstagger;
 311     RECT rect = w->rectClient;
 312     INT  spacing = GetSystemMetrics(SM_CYCAPTION) +
 313                      GetSystemMetrics(SM_CYFRAME) - 1;
 314
 315     if( rect.bottom - rect.top - delta >= spacing )
 316         rect.bottom -= delta;
 317
 318     nstagger = (rect.bottom - rect.top)/(3 * spacing);
 319     lpPos[1].x = (rect.right - rect.left - nstagger * spacing);
 320     lpPos[1].y = (rect.bottom - rect.top - nstagger * spacing);
 321     lpPos[0].x = lpPos[0].y = spacing * (n%(nstagger+1));
 322 }
 323
 324 /**********************************************************************
 325  *            MDISetMenu
 326  */
 327 static LRESULT MDISetMenu( HWND hwnd, HMENU hmenuFrame,
 328                            HMENU hmenuWindow)
 329 {
 330     WND *w;
 331     MDICLIENTINFO *ci;
 332     HWND hwndFrame = GetParent(hwnd);
 333     HMENU oldFrameMenu = GetMenu(hwndFrame);
 334
 335     TRACE("%04x %04x %04x\n",
 336                 hwnd, hmenuFrame, hmenuWindow);
 337
 338     if (hmenuFrame && !IsMenu(hmenuFrame))
 339     {
 340         WARN("hmenuFrame is not a menu handle\n");
 341         return 0L;
 342     }
 343
 344     if (hmenuWindow && !IsMenu(hmenuWindow))
 345     {
 346         WARN("hmenuWindow is not a menu handle\n");
 347         return 0L;
 348     }
 349
 350     w = WIN_FindWndPtr(hwnd);
 351     ci = (MDICLIENTINFO *) w->wExtra;
 352
 353     if( ci->hwndChildMaximized && hmenuFrame && hmenuFrame!=oldFrameMenu )
 354         MDI_RestoreFrameMenu(w->parent, ci->hwndChildMaximized );
 355
 356     if( hmenuWindow && ci->hWindowMenu && hmenuWindow!=ci->hWindowMenu )
 357     {
 358         /* delete menu items from ci->hWindowMenu
 359          * and add them to hmenuWindow */
 360
 361         INT i = GetMenuItemCount(ci->hWindowMenu) - 1;
 362         INT pos = GetMenuItemCount(hmenuWindow) + 1;
 363
 364         AppendMenuA( hmenuWindow, MF_SEPARATOR, 0, NULL);
 365
 366         if( ci->nActiveChildren )
 367         {
 368             INT j;
 369             LPWSTR buffer = NULL;
 370             MENUITEMINFOW mii;
 371             INT nbWindowsMenuItems; /* num of documents shown + "More Windows..." if present */
 372
 373             if (ci->nActiveChildren <= MDI_MOREWINDOWSLIMIT)
 374                 nbWindowsMenuItems = ci->nActiveChildren;
 375             else
 376                 nbWindowsMenuItems = MDI_MOREWINDOWSLIMIT + 1;
 377
 378             j = i - nbWindowsMenuItems + 1;
 379
 380             for( ; i >= j ; i-- )
 381             {
 382                 memset(&mii, 0, sizeof(mii));
 383                 mii.cbSize = sizeof(mii);
 384                 mii.fMask = MIIM_CHECKMARKS | MIIM_DATA | MIIM_ID | MIIM_STATE
 385                   | MIIM_SUBMENU | MIIM_TYPE | MIIM_BITMAP;
 386
 387                 GetMenuItemInfoW(ci->hWindowMenu, i, TRUE, &mii);
 388                 if(mii.cch) { /* Menu is MFT_STRING */
 389                     mii.cch++; /* add room for '\0' */
 390                     buffer = HeapAlloc(GetProcessHeap(), 0,
 391                                        mii.cch * sizeof(WCHAR));
 392                     mii.dwTypeData = buffer;
 393                     GetMenuItemInfoW(ci->hWindowMenu, i, TRUE, &mii);
 394                 }
 395                 DeleteMenu(ci->hWindowMenu, i, MF_BYPOSITION);
 396                 InsertMenuItemW(hmenuWindow, pos, TRUE, &mii);
 397                 if(buffer) {
 398                     HeapFree(GetProcessHeap(), 0, buffer);
 399                     buffer = NULL;
 400                 }
 401             }
 402         }
 403
 404         /* remove separator */
 405         DeleteMenu(ci->hWindowMenu, i, MF_BYPOSITION);
 406
 407         ci->hWindowMenu = hmenuWindow;
 408     }
 409
 410     if (hmenuFrame)
 411     {
 412         SetMenu(hwndFrame, hmenuFrame);
 413         if( hmenuFrame!=oldFrameMenu )
 414         {
 415             if( ci->hwndChildMaximized )
 416                 MDI_AugmentFrameMenu( w->parent, ci->hwndChildMaximized );
 417             WIN_ReleaseWndPtr(w);
 418             return oldFrameMenu;
 419         }
 420     }
 421     else
 422     {
 423         INT nItems = GetMenuItemCount(w->parent->wIDmenu) - 1;
 424         UINT iId = GetMenuItemID(w->parent->wIDmenu,nItems) ;
 425
 426         if( !(iId == SC_RESTORE || iId == SC_CLOSE) )
 427         {
 428             /* SetMenu() may already have been called, meaning that this window
 429              * already has its menu. But they may have done a SetMenu() on
 430              * an MDI window, and called MDISetMenu() after the fact, meaning
 431              * that the "if" to this "else" wouldn't catch the need to
 432              * augment the frame menu.
 433              */
 434             if( ci->hwndChildMaximized )
 435                 MDI_AugmentFrameMenu( w->parent, ci->hwndChildMaximized );
 436         }
 437     }
 438     WIN_ReleaseWndPtr(w);
 439     return 0;
 440 }
 441
 442 /**********************************************************************
 443  *            MDIRefreshMenu
 444  */
 445 static LRESULT MDIRefreshMenu( HWND hwnd, HMENU hmenuFrame,
 446                            HMENU hmenuWindow)
 447 {
 448     HWND hwndFrame = GetParent(hwnd);
 449     HMENU oldFrameMenu = GetMenu(hwndFrame);
 450
 451     TRACE("%04x %04x %04x\n",
 452                 hwnd, hmenuFrame, hmenuWindow);
 453
 454     FIXME("partially function stub\n");
 455
 456     return oldFrameMenu;
 457 }
 458
 459
 460 /* ------------------ MDI child window functions ---------------------- */
 461
 462
 463 /**********************************************************************
 464  *                                      MDICreateChild
 465  */
 466 static HWND MDICreateChild( WND *wndParent, MDICLIENTINFO *ci,
 467                             LPMDICREATESTRUCTA cs, BOOL unicode )
 468 {
 469     POINT          pos[2];
 470     DWORD            style = cs->style | (WS_CHILD | WS_CLIPSIBLINGS);
 471     HWND             hwnd, hwndMax = 0;
 472     WORD             wIDmenu = ci->idFirstChild + ci->nActiveChildren;
 473     static const WCHAR lpstrDef[] = {'j','u','n','k','!',0};
 474
 475     TRACE("origin %i,%i - dim %i,%i, style %08lx\n",
 476                 cs->x, cs->y, cs->cx, cs->cy, cs->style);
 477     /* calculate placement */
 478     MDI_CalcDefaultChildPos(wndParent, ci->nTotalCreated++, pos, 0);
 479
 480     if (cs->cx == CW_USEDEFAULT || !cs->cx) cs->cx = pos[1].x;
 481     if (cs->cy == CW_USEDEFAULT || !cs->cy) cs->cy = pos[1].y;
 482
 483     if( cs->x == CW_USEDEFAULT )
 484     {
 485         cs->x = pos[0].x;
 486         cs->y = pos[0].y;
 487     }
 488
 489     /* restore current maximized child */
 490     if( (style & WS_VISIBLE) && ci->hwndChildMaximized )
 491     {
 492         TRACE("Restoring current maximized child %04x\n", ci->hwndChildMaximized);
 493         if( style & WS_MAXIMIZE )
 494             SendMessageW(wndParent->hwndSelf, WM_SETREDRAW, FALSE, 0L);
 495         hwndMax = ci->hwndChildMaximized;
 496         ShowWindow( hwndMax, SW_SHOWNOACTIVATE );
 497         if( style & WS_MAXIMIZE )
 498             SendMessageW(wndParent->hwndSelf, WM_SETREDRAW, TRUE, 0L);
 499     }
 500
 501     if (ci->nActiveChildren <= MDI_MOREWINDOWSLIMIT)
 502     /* this menu is needed to set a check mark in MDI_ChildActivate */
 503     if (ci->hWindowMenu != 0)
 504         AppendMenuW(ci->hWindowMenu, MF_STRING, wIDmenu, lpstrDef);
 505
 506     ci->nActiveChildren++;
 507
 508     /* fix window style */
 509     if( !(wndParent->dwStyle & MDIS_ALLCHILDSTYLES) )
 510     {
 511         TRACE("MDIS_ALLCHILDSTYLES is missing, fixing window style\n");
 512         style &= (WS_CHILD | WS_CLIPSIBLINGS | WS_MINIMIZE | WS_MAXIMIZE |
 513                   WS_CLIPCHILDREN | WS_DISABLED | WS_VSCROLL | WS_HSCROLL );
 514         style |= (WS_VISIBLE | WS_OVERLAPPEDWINDOW);
 515     }
 516
 517     if( wndParent->flags & WIN_ISWIN32 )
 518     {
 519         if(unicode)
 520         {
 521             MDICREATESTRUCTW *csW = (MDICREATESTRUCTW *)cs;
 522             hwnd = CreateWindowW( csW->szClass, csW->szTitle, style,
 523                                 csW->x, csW->y, csW->cx, csW->cy, wndParent->hwndSelf,
 524                                 (HMENU)wIDmenu, csW->hOwner, csW );
 525         }
 526         else
 527             hwnd = CreateWindowA( cs->szClass, cs->szTitle, style,
 528                                 cs->x, cs->y, cs->cx, cs->cy, wndParent->hwndSelf,
 529                                 (HMENU)wIDmenu, cs->hOwner, cs );
 530     }
 531     else
 532     {
 533         MDICREATESTRUCT16 *cs16;
 534         LPSTR title, cls;
 535
 536         cs16 = SEGPTR_NEW(MDICREATESTRUCT16);
 537         STRUCT32_MDICREATESTRUCT32Ato16( cs, cs16 );
 538         title = SEGPTR_STRDUP( cs->szTitle );
 539         cls   = SEGPTR_STRDUP( cs->szClass );
 540         cs16->szTitle = SEGPTR_GET(title);
 541         cs16->szClass = SEGPTR_GET(cls);
 542
 543         hwnd = CreateWindow16( cs->szClass, cs->szTitle, style,
 544                                cs16->x, cs16->y, cs16->cx, cs16->cy, wndParent->hwndSelf,
 545                                (HMENU)wIDmenu, cs16->hOwner,
 546                                (LPVOID)SEGPTR_GET(cs16) );
 547         SEGPTR_FREE( title );
 548         SEGPTR_FREE( cls );
 549         SEGPTR_FREE( cs16 );
 550     }
 551
 552     /* MDI windows are WS_CHILD so they won't be activated by CreateWindow */
 553
 554     if (hwnd)
 555     {
 556         WND* wnd = WIN_FindWndPtr( hwnd );
 557
 558         /* All MDI child windows have the WS_EX_MDICHILD style */
 559         wnd->dwExStyle |= WS_EX_MDICHILD;
 560
 561         /*  If we have more than 9 windows, we must insert the new one at the
 562          *  9th position in order to see it in the "Windows" menu
 563          */
 564         if (ci->nActiveChildren > MDI_MOREWINDOWSLIMIT)
 565             MDI_SwapMenuItems(wnd->parent, wnd->wIDmenu, ci->idFirstChild + MDI_MOREWINDOWSLIMIT - 1);
 566
 567         MDI_MenuModifyItem(wndParent, hwnd);
 568
 569         /* Have we hit the "More Windows..." limit? If so, we must
 570          * add a "More Windows..." option
 571          */
 572         if (ci->nActiveChildren == MDI_MOREWINDOWSLIMIT + 1)
 573         {
 574             WCHAR szTmp[50];
 575             LoadStringW(GetModuleHandleA("USER32"), MDI_IDS_MOREWINDOWS, szTmp, sizeof(szTmp)/sizeof(szTmp[0]));
 576
 577             ModifyMenuW(ci->hWindowMenu,
 578                         ci->idFirstChild + MDI_MOREWINDOWSLIMIT,
 579                         MF_BYCOMMAND | MF_STRING,
 580                         ci->idFirstChild + MDI_MOREWINDOWSLIMIT,
 581                         szTmp);
 582         }
 583
 584         if( (wnd->dwStyle & WS_MINIMIZE) && ci->hwndActiveChild )
 585         {
 586             TRACE("Minimizing created MDI child %04x\n", hwnd);
 587             ShowWindow( hwnd, SW_SHOWMINNOACTIVE );
 588         }
 589         else
 590         {
 591             /* WS_VISIBLE is clear if a) the MDI client has
 592              * MDIS_ALLCHILDSTYLES style and 2) the flag is cleared in the
 593              * MDICreateStruct. If so the created window is not shown nor
 594              * activated.
 595              */
 596             if(wnd->dwStyle & WS_VISIBLE)
 597                 ShowWindow(hwnd, SW_SHOW);
 598         }
 599         WIN_ReleaseWndPtr(wnd);
 600         TRACE("created child - %04x\n",hwnd);
 601     }
 602     else
 603     {
 604         ci->nActiveChildren--;
 605         DeleteMenu(ci->hWindowMenu,wIDmenu,MF_BYCOMMAND);
 606         if( IsWindow(hwndMax) )
 607             ShowWindow(hwndMax, SW_SHOWMAXIMIZED);
 608     }
 609
 610     return hwnd;
 611 }
 612
 613 /**********************************************************************
 614  *                      MDI_ChildGetMinMaxInfo
 615  *
 616  * Note: The rule here is that client rect of the maximized MDI child
 617  *       is equal to the client rect of the MDI client window.
 618  */
 619 static void MDI_ChildGetMinMaxInfo( WND* clientWnd, HWND hwnd,
 620                                     MINMAXINFO* lpMinMax )
 621 {
 622     WND*        childWnd = WIN_FindWndPtr(hwnd);
 623     RECT        rect     = clientWnd->rectClient;
 624
 625     MapWindowPoints( clientWnd->parent->hwndSelf,
 626                      ((MDICLIENTINFO*)clientWnd->wExtra)->self, (LPPOINT)&rect, 2);
 627     AdjustWindowRectEx( &rect, childWnd->dwStyle, 0, childWnd->dwExStyle );
 628
 629     lpMinMax->ptMaxSize.x = rect.right -= rect.left;
 630     lpMinMax->ptMaxSize.y = rect.bottom -= rect.top;
 631
 632     lpMinMax->ptMaxPosition.x = rect.left;
 633     lpMinMax->ptMaxPosition.y = rect.top;
 634
 635     WIN_ReleaseWndPtr(childWnd);
 636
 637     TRACE("max rect (%i,%i - %i, %i)\n",
 638                         rect.left,rect.top,rect.right,rect.bottom);
 639
 640 }
 641
 642 /**********************************************************************
 643  *                      MDI_SwitchActiveChild
 644  *
 645  * Note: SetWindowPos sends WM_CHILDACTIVATE to the child window that is
 646  *       being activated
 647  */
 648 static void MDI_SwitchActiveChild( HWND clientHwnd, HWND childHwnd,
 649                                    BOOL bNextWindow )
 650 {
 651     WND           *w         = WIN_FindWndPtr(clientHwnd);
 652     HWND           hwndTo    = 0;
 653     HWND           hwndPrev  = 0;
 654     MDICLIENTINFO *ci;
 655
 656     hwndTo = MDI_GetWindow(w, childHwnd, bNextWindow, 0);
 657
 658     ci = (MDICLIENTINFO *) w->wExtra;
 659
 660     TRACE("from %04x, to %04x\n",childHwnd,hwndTo);
 661
 662     if ( !hwndTo ) goto END; /* no window to switch to */
 663
 664     hwndPrev = ci->hwndActiveChild;
 665
 666     if ( hwndTo != hwndPrev )
 667     {
 668         BOOL bOptimize = 0;
 669
 670         if( ci->hwndChildMaximized )
 671         {
 672             bOptimize = 1;
 673             w->dwStyle &= ~WS_VISIBLE;
 674         }
 675
 676         SetWindowPos( hwndTo, HWND_TOP, 0, 0, 0, 0,
 677                         SWP_NOMOVE | SWP_NOSIZE );
 678
 679         if( bNextWindow && hwndPrev )
 680             SetWindowPos( hwndPrev, HWND_BOTTOM, 0, 0, 0, 0,
 681                             SWP_NOMOVE | SWP_NOSIZE | SWP_NOACTIVATE );
 682         if( bOptimize )
 683             ShowWindow( clientHwnd, SW_SHOW );
 684     }
 685 END:
 686     WIN_ReleaseWndPtr(w);
 687 }
 688
 689
 690 /**********************************************************************
 691  *                                      MDIDestroyChild
 692  */
 693 static LRESULT MDIDestroyChild( WND *w_parent, MDICLIENTINFO *ci,
 694                                 HWND child, BOOL flagDestroy )
 695 {
 696     WND         *childPtr = WIN_FindWndPtr(child);
 697
 698     if( childPtr )
 699     {
 700         if( child == ci->hwndActiveChild )
 701         {
 702             MDI_SwitchActiveChild(w_parent->hwndSelf, child, TRUE);
 703
 704             if( child == ci->hwndActiveChild )
 705             {
 706                 ShowWindow( child, SW_HIDE);
 707                 if( child == ci->hwndChildMaximized )
 708                 {
 709                     MDI_RestoreFrameMenu(w_parent->parent, child);
 710                     ci->hwndChildMaximized = 0;
 711                     MDI_UpdateFrameText(w_parent->parent, w_parent->hwndSelf, TRUE, NULL);
 712                 }
 713
 714                 MDI_ChildActivate(w_parent, 0);
 715             }
 716         }
 717
 718         MDI_MenuDeleteItem(w_parent, child);
 719
 720         WIN_ReleaseWndPtr(childPtr);
 721
 722         ci->nActiveChildren--;
 723
 724         TRACE("child destroyed - %04x\n",child);
 725
 726         if (flagDestroy)
 727         {
 728             MDI_PostUpdate(GetParent(child), ci, SB_BOTH+1);
 729             DestroyWindow(child);
 730         }
 731     }
 732
 733     return 0;
 734 }
 735
 736
 737 /**********************************************************************
 738  *                                      MDI_ChildActivate
 739  *
 740  * Note: hWndChild is NULL when last child is being destroyed
 741  */
 742 static LONG MDI_ChildActivate( WND *clientPtr, HWND hWndChild )
 743 {
 744     MDICLIENTINFO       *clientInfo = (MDICLIENTINFO*)clientPtr->wExtra;
 745     HWND               prevActiveWnd = clientInfo->hwndActiveChild;
 746     WND                 *wndPtr = WIN_FindWndPtr( hWndChild );
 747     WND                 *wndPrev = WIN_FindWndPtr( prevActiveWnd );
 748     BOOL                 isActiveFrameWnd = 0;
 749     LONG               retvalue;
 750
 751     if( wndPtr )
 752     {
 753         if( wndPtr->dwStyle & WS_DISABLED )
 754         {
 755             retvalue = 0L;
 756             goto END;
 757         }
 758     }
 759
 760     /* Don't activate if it is already active. Might happen
 761        since ShowWindow DOES activate MDI children */
 762     if (clientInfo->hwndActiveChild == hWndChild)
 763     {
 764       retvalue = 0L;
 765       goto END;
 766     }
 767
 768     TRACE("%04x\n", hWndChild);
 769
 770     if( GetActiveWindow() == clientPtr->parent->hwndSelf )
 771         isActiveFrameWnd = TRUE;
 772
 773     /* deactivate prev. active child */
 774     if( wndPrev )
 775     {
 776         wndPrev->dwStyle |= WS_SYSMENU;
 777         SendMessageA( prevActiveWnd, WM_NCACTIVATE, FALSE, 0L );
 778         SendMessageA( prevActiveWnd, WM_MDIACTIVATE, (WPARAM)prevActiveWnd,
 779                         (LPARAM)hWndChild);
 780         /* uncheck menu item */
 781         if( clientInfo->hWindowMenu )
 782         {
 783             WORD wPrevID = wndPrev->wIDmenu - clientInfo->idFirstChild;
 784
 785             if (wPrevID < MDI_MOREWINDOWSLIMIT)
 786                 CheckMenuItem( clientInfo->hWindowMenu,
 787                                  wndPrev->wIDmenu, 0);
 788             else
 789                 CheckMenuItem( clientInfo->hWindowMenu,
 790                                clientInfo->idFirstChild + MDI_MOREWINDOWSLIMIT - 1, 0);
 791     }
 792     }
 793
 794     /* set appearance */
 795     if( clientInfo->hwndChildMaximized )
 796     {
 797       if( clientInfo->hwndChildMaximized != hWndChild ) {
 798         if( hWndChild ) {
 799                   clientInfo->hwndActiveChild = hWndChild;
 800                   ShowWindow( hWndChild, SW_SHOWMAXIMIZED);
 801         } else
 802                 ShowWindow( clientInfo->hwndActiveChild, SW_SHOWNORMAL );
 803       }
 804     }
 805
 806     clientInfo->hwndActiveChild = hWndChild;
 807
 808     /* check if we have any children left */
 809     if( !hWndChild )
 810     {
 811         if( isActiveFrameWnd )
 812             SetFocus( clientInfo->self );
 813         retvalue = 0;
 814         goto END;
 815     }
 816
 817     /* check menu item */
 818     if( clientInfo->hWindowMenu )
 819     {
 820           /* The window to be activated must be displayed in the "Windows" menu */
 821           if (wndPtr->wIDmenu >= clientInfo->idFirstChild + MDI_MOREWINDOWSLIMIT)
 822           {
 823               MDI_SwapMenuItems(wndPtr->parent, wndPtr->wIDmenu, clientInfo->idFirstChild + MDI_MOREWINDOWSLIMIT - 1);
 824               MDI_MenuModifyItem(wndPtr->parent ,wndPtr->hwndSelf);
 825           }
 826
 827           CheckMenuItem(clientInfo->hWindowMenu, wndPtr->wIDmenu, MF_CHECKED);
 828     }
 829     /* bring active child to the top */
 830     SetWindowPos( hWndChild, 0,0,0,0,0, SWP_NOSIZE | SWP_NOMOVE | SWP_NOACTIVATE);
 831
 832     if( isActiveFrameWnd )
 833     {
 834             SendMessageA( hWndChild, WM_NCACTIVATE, TRUE, 0L);
 835             if( GetFocus() == clientInfo->self )
 836                 SendMessageA( clientInfo->self, WM_SETFOCUS,
 837                                 (WPARAM)clientInfo->self, 0L );
 838             else
 839                 SetFocus( clientInfo->self );
 840     }
 841     SendMessageA( hWndChild, WM_MDIACTIVATE, (WPARAM)prevActiveWnd,
 842                     (LPARAM)hWndChild );
 843     retvalue = 1;
 844 END:
 845     WIN_ReleaseWndPtr(wndPtr);
 846     WIN_ReleaseWndPtr(wndPrev);
 847     return retvalue;
 848 }
 849
 850 /* -------------------- MDI client window functions ------------------- */
 851
 852 /**********************************************************************
 853  *                              CreateMDIMenuBitmap
 854  */
 855 static HBITMAP CreateMDIMenuBitmap(void)
 856 {
 857  HDC            hDCSrc  = CreateCompatibleDC(0);
 858  HDC            hDCDest = CreateCompatibleDC(hDCSrc);
 859  HBITMAP        hbClose = LoadBitmapW(0, MAKEINTRESOURCEW(OBM_CLOSE) );
 860  HBITMAP        hbCopy;
 861  HBITMAP        hobjSrc, hobjDest;
 862
 863  hobjSrc = SelectObject(hDCSrc, hbClose);
 864  hbCopy = CreateCompatibleBitmap(hDCSrc,GetSystemMetrics(SM_CXSIZE),GetSystemMetrics(SM_CYSIZE));
 865  hobjDest = SelectObject(hDCDest, hbCopy);
 866
 867  BitBlt(hDCDest, 0, 0, GetSystemMetrics(SM_CXSIZE), GetSystemMetrics(SM_CYSIZE),
 868           hDCSrc, GetSystemMetrics(SM_CXSIZE), 0, SRCCOPY);
 869
 870  SelectObject(hDCSrc, hobjSrc);
 871  DeleteObject(hbClose);
 872  DeleteDC(hDCSrc);
 873
 874  hobjSrc = SelectObject( hDCDest, GetStockObject(BLACK_PEN) );
 875
 876  MoveToEx( hDCDest, GetSystemMetrics(SM_CXSIZE) - 1, 0, NULL );
 877  LineTo( hDCDest, GetSystemMetrics(SM_CXSIZE) - 1, GetSystemMetrics(SM_CYSIZE) - 1);
 878
 879  SelectObject(hDCDest, hobjSrc );
 880  SelectObject(hDCDest, hobjDest);
 881  DeleteDC(hDCDest);
 882
 883  return hbCopy;
 884 }
 885
 886 /**********************************************************************
 887  *                              MDICascade
 888  */
 889 static LONG MDICascade(WND* clientWnd, MDICLIENTINFO *ci)
 890 {
 891     WND**       ppWnd;
 892     UINT        total;
 893
 894     if (ci->hwndChildMaximized)
 895         SendMessageA( clientWnd->hwndSelf, WM_MDIRESTORE,
 896                         (WPARAM)ci->hwndChildMaximized, 0);
 897
 898     if (ci->nActiveChildren == 0) return 0;
 899
 900     if ((ppWnd = WIN_BuildWinArray(clientWnd, BWA_SKIPHIDDEN | BWA_SKIPOWNED |
 901                                               BWA_SKIPICONIC, &total)))
 902     {
 903         WND**   heapPtr = ppWnd;
 904         if( total )
 905         {
 906             INT delta = 0, n = 0;
 907             POINT       pos[2];
 908             if( total < ci->nActiveChildren )
 909                 delta = GetSystemMetrics(SM_CYICONSPACING) +
 910                         GetSystemMetrics(SM_CYICON);
 911
 912             /* walk the list (backwards) and move windows */
 913             while (*ppWnd) ppWnd++;
 914             while (ppWnd != heapPtr)
 915             {
 916                 ppWnd--;
 917                 TRACE("move %04x to (%ld,%ld) size [%ld,%ld]\n",
 918                             (*ppWnd)->hwndSelf, pos[0].x, pos[0].y, pos[1].x, pos[1].y);
 919
 920                 MDI_CalcDefaultChildPos(clientWnd, n++, pos, delta);
 921                 SetWindowPos( (*ppWnd)->hwndSelf, 0, pos[0].x, pos[0].y,
 922                                 pos[1].x, pos[1].y,
 923                                 SWP_DRAWFRAME | SWP_NOACTIVATE | SWP_NOZORDER);
 924             }
 925         }
 926         WIN_ReleaseWinArray(heapPtr);
 927     }
 928
 929     if( total < ci->nActiveChildren )
 930         ArrangeIconicWindows( clientWnd->hwndSelf );
 931     return 0;
 932 }
 933
 934 /**********************************************************************
 935  *                                      MDITile
 936  */
 937 static void MDITile( WND* wndClient, MDICLIENTINFO *ci, WPARAM wParam )
 938 {
 939     WND**       ppWnd;
 940     UINT        total = 0;
 941
 942     if (ci->hwndChildMaximized)
 943         SendMessageA( wndClient->hwndSelf, WM_MDIRESTORE,
 944                         (WPARAM)ci->hwndChildMaximized, 0);
 945
 946     if (ci->nActiveChildren == 0) return;
 947
 948     ppWnd = WIN_BuildWinArray(wndClient, BWA_SKIPHIDDEN | BWA_SKIPOWNED | BWA_SKIPICONIC |
 949             ((wParam & MDITILE_SKIPDISABLED)? BWA_SKIPDISABLED : 0), &total );
 950
 951     TRACE("%u windows to tile\n", total);
 952
 953     if( ppWnd )
 954     {
 955         WND**   heapPtr = ppWnd;
 956
 957         if( total )
 958         {
 959             RECT        rect;
 960             int         x, y, xsize, ysize;
 961             int         rows, columns, r, c, i;
 962
 963             GetClientRect(wndClient->hwndSelf,&rect);
 964             rows    = (int) sqrt((double)total);
 965             columns = total / rows;
 966
 967             if( wParam & MDITILE_HORIZONTAL )  /* version >= 3.1 */
 968             {
 969                 i = rows;
 970                 rows = columns;  /* exchange r and c */
 971                 columns = i;
 972             }
 973
 974             if( total != ci->nActiveChildren)
 975             {
 976                 y = rect.bottom - 2 * GetSystemMetrics(SM_CYICONSPACING) - GetSystemMetrics(SM_CYICON);
 977                 rect.bottom = ( y - GetSystemMetrics(SM_CYICON) < rect.top )? rect.bottom: y;
 978             }
 979
 980             ysize   = rect.bottom / rows;
 981             xsize   = rect.right  / columns;
 982
 983             for (x = i = 0, c = 1; c <= columns && *ppWnd; c++)
 984             {
 985                 if (c == columns)
 986                 {
 987                     rows  = total - i;
 988                     ysize = rect.bottom / rows;
 989                 }
 990
 991                 y = 0;
 992                 for (r = 1; r <= rows && *ppWnd; r++, i++)
 993                 {
 994                     SetWindowPos((*ppWnd)->hwndSelf, 0, x, y, xsize, ysize,
 995                                    SWP_DRAWFRAME | SWP_NOACTIVATE | SWP_NOZORDER);
 996                     y += ysize;
 997                     ppWnd++;
 998                 }
 999                 x += xsize;
1000             }
1001         }
1002         WIN_ReleaseWinArray(heapPtr);
1003     }
1004
1005     if( total < ci->nActiveChildren ) ArrangeIconicWindows( wndClient->hwndSelf );
1006 }
1007
1008 /* ----------------------- Frame window ---------------------------- */
1009
1010
1011 /**********************************************************************
1012  *                                      MDI_AugmentFrameMenu
1013  */
1014 static BOOL MDI_AugmentFrameMenu( WND *frame, HWND hChild )
1015 {
1016     WND*        child = WIN_FindWndPtr(hChild);
1017     HMENU       hSysPopup = 0;
1018   HBITMAP hSysMenuBitmap = 0;
1019
1020     TRACE("frame %p,child %04x\n",frame,hChild);
1021
1022     if( !frame->wIDmenu || !child->hSysMenu )
1023     {
1024         WIN_ReleaseWndPtr(child);
1025         return 0;
1026     }
1027     WIN_ReleaseWndPtr(child);
1028
1029     /* create a copy of sysmenu popup and insert it into frame menu bar */
1030
1031     if (!(hSysPopup = LoadMenuA(GetModuleHandleA("USER32"), "SYSMENU")))
1032         return 0;
1033
1034     TRACE("\tgot popup %04x in sysmenu %04x\n",
1035                 hSysPopup, child->hSysMenu);
1036
1037     AppendMenuA(frame->wIDmenu,MF_HELP | MF_BITMAP,
1038                    SC_MINIMIZE, (LPSTR)(DWORD)HBMMENU_MBAR_MINIMIZE ) ;
1039     AppendMenuA(frame->wIDmenu,MF_HELP | MF_BITMAP,
1040                    SC_RESTORE, (LPSTR)(DWORD)HBMMENU_MBAR_RESTORE );
1041
1042   /* In Win 95 look, the system menu is replaced by the child icon */
1043
1044   if(TWEAK_WineLook > WIN31_LOOK)
1045   {
1046     HICON hIcon = GetClassLongA(hChild, GCL_HICONSM);
1047     if (!hIcon)
1048       hIcon = GetClassLongA(hChild, GCL_HICON);
1049     if (hIcon)
1050     {
1051       HDC hMemDC;
1052       HBITMAP hBitmap, hOldBitmap;
1053       HBRUSH hBrush;
1054       HDC hdc = GetDC(hChild);
1055
1056       if (hdc)
1057       {
1058         int cx, cy;
1059         cx = GetSystemMetrics(SM_CXSMICON);
1060         cy = GetSystemMetrics(SM_CYSMICON);
1061         hMemDC = CreateCompatibleDC(hdc);
1062         hBitmap = CreateCompatibleBitmap(hdc, cx, cy);
1063         hOldBitmap = SelectObject(hMemDC, hBitmap);
1064         SetMapMode(hMemDC, MM_TEXT);
1065         hBrush = CreateSolidBrush(GetSysColor(COLOR_MENU));
1066         DrawIconEx(hMemDC, 0, 0, hIcon, cx, cy, 0, hBrush, DI_NORMAL);
1067         SelectObject (hMemDC, hOldBitmap);
1068         DeleteObject(hBrush);
1069         DeleteDC(hMemDC);
1070         ReleaseDC(hChild, hdc);
1071         hSysMenuBitmap = hBitmap;
1072       }
1073     }
1074   }
1075   else
1076     hSysMenuBitmap = hBmpClose;
1077
1078     if( !InsertMenuA(frame->wIDmenu,0,MF_BYPOSITION | MF_BITMAP | MF_POPUP,
1079                     hSysPopup, (LPSTR)(DWORD)hSysMenuBitmap))
1080     {
1081         TRACE("not inserted\n");
1082         DestroyMenu(hSysPopup);
1083         return 0;
1084     }
1085
1086     /* The close button is only present in Win 95 look */
1087     if(TWEAK_WineLook > WIN31_LOOK)
1088     {
1089         AppendMenuA(frame->wIDmenu,MF_HELP | MF_BITMAP,
1090                        SC_CLOSE, (LPSTR)(DWORD)HBMMENU_MBAR_CLOSE );
1091     }
1092
1093     EnableMenuItem(hSysPopup, SC_SIZE, MF_BYCOMMAND | MF_GRAYED);
1094     EnableMenuItem(hSysPopup, SC_MOVE, MF_BYCOMMAND | MF_GRAYED);
1095     EnableMenuItem(hSysPopup, SC_MAXIMIZE, MF_BYCOMMAND | MF_GRAYED);
1096     SetMenuDefaultItem(hSysPopup, SC_CLOSE, FALSE);
1097
1098     /* redraw menu */
1099     DrawMenuBar(frame->hwndSelf);
1100
1101     return 1;
1102 }
1103
1104 /**********************************************************************
1105  *                                      MDI_RestoreFrameMenu
1106  */
1107 static BOOL MDI_RestoreFrameMenu( WND *frameWnd, HWND hChild )
1108 {
1109     MENUITEMINFOW menuInfo;
1110     INT nItems = GetMenuItemCount(frameWnd->wIDmenu) - 1;
1111     UINT iId = GetMenuItemID(frameWnd->wIDmenu,nItems) ;
1112
1113     TRACE("frameWnd %p,(%04x),child %04x,nIt=%d,iId=%d\n",
1114            frameWnd,frameWnd->hwndSelf,hChild,nItems,iId);
1115
1116     if(!(iId == SC_RESTORE || iId == SC_CLOSE) )
1117         return 0;
1118
1119     /*
1120      * Remove the system menu, If that menu is the icon of the window
1121      * as it is in win95, we have to delete the bitmap.
1122      */
1123     memset(&menuInfo, 0, sizeof(menuInfo));
1124     menuInfo.cbSize = sizeof(menuInfo);
1125     menuInfo.fMask  = MIIM_DATA | MIIM_TYPE;
1126
1127     GetMenuItemInfoW(frameWnd->wIDmenu,
1128                      0,
1129                      TRUE,
1130                      &menuInfo);
1131
1132     RemoveMenu(frameWnd->wIDmenu,0,MF_BYPOSITION);
1133
1134     if ( (menuInfo.fType & MFT_BITMAP)           &&
1135          (LOWORD(menuInfo.dwTypeData)!=0)        &&
1136          (LOWORD(menuInfo.dwTypeData)!=hBmpClose) )
1137     {
1138       DeleteObject((HBITMAP)LOWORD(menuInfo.dwTypeData));
1139     }
1140
1141     if(TWEAK_WineLook > WIN31_LOOK)
1142     {
1143         /* close */
1144         DeleteMenu(frameWnd->wIDmenu,GetMenuItemCount(frameWnd->wIDmenu) - 1,MF_BYPOSITION);
1145     }
1146     /* restore */
1147     DeleteMenu(frameWnd->wIDmenu,GetMenuItemCount(frameWnd->wIDmenu) - 1,MF_BYPOSITION);
1148     /* minimize */
1149     DeleteMenu(frameWnd->wIDmenu,GetMenuItemCount(frameWnd->wIDmenu) - 1,MF_BYPOSITION);
1150
1151     DrawMenuBar(frameWnd->hwndSelf);
1152
1153     return 1;
1154 }
1155
1156
1157 /**********************************************************************
1158  *                                      MDI_UpdateFrameText
1159  *
1160  * used when child window is maximized/restored
1161  *
1162  * Note: lpTitle can be NULL
1163  */
1164 static void MDI_UpdateFrameText( WND *frameWnd, HWND hClient,
1165                                  BOOL repaint, LPCWSTR lpTitle )
1166 {
1167     WCHAR   lpBuffer[MDI_MAXTITLELENGTH+1];
1168     WND*   clientWnd = WIN_FindWndPtr(hClient);
1169     MDICLIENTINFO *ci = (MDICLIENTINFO *) clientWnd->wExtra;
1170
1171     TRACE("repaint %i, frameText %s\n", repaint, (lpTitle)?debugstr_w(lpTitle):"NULL");
1172
1173     if (!clientWnd)
1174            return;
1175
1176     if (!ci)
1177     {
1178        WIN_ReleaseWndPtr(clientWnd);
1179            return;
1180     }
1181
1182     /* store new "default" title if lpTitle is not NULL */
1183     if (lpTitle)
1184     {
1185         if (ci->frameTitle) HeapFree( GetProcessHeap(), 0, ci->frameTitle );
1186         ci->frameTitle = HEAP_strdupW( GetProcessHeap(), 0, lpTitle );
1187     }
1188
1189     if (ci->frameTitle)
1190     {
1191         WND* childWnd = WIN_FindWndPtr( ci->hwndChildMaximized );
1192
1193         if( childWnd && childWnd->text )
1194         {
1195             /* combine frame title and child title if possible */
1196
1197             static const WCHAR lpBracket[]  = {' ','-',' ','[',0};
1198             static const WCHAR lpBracket2[]  = {']',0};
1199             int i_frame_text_length = strlenW(ci->frameTitle);
1200             int i_child_text_length = strlenW(childWnd->text);
1201
1202             lstrcpynW( lpBuffer, ci->frameTitle, MDI_MAXTITLELENGTH);
1203
1204             if( i_frame_text_length + 6 < MDI_MAXTITLELENGTH )
1205             {
1206                 strcatW( lpBuffer, lpBracket );
1207
1208                 if( i_frame_text_length + i_child_text_length + 6 < MDI_MAXTITLELENGTH )
1209                 {
1210                     strcatW( lpBuffer, childWnd->text );
1211                     strcatW( lpBuffer, lpBracket2 );
1212                 }
1213                 else
1214                 {
1215                     lstrcpynW( lpBuffer + i_frame_text_length + 4,
1216                                  childWnd->text, MDI_MAXTITLELENGTH - i_frame_text_length - 5 );
1217                     strcatW( lpBuffer, lpBracket2 );
1218                 }
1219             }
1220         }
1221         else
1222         {
1223             lstrcpynW(lpBuffer, ci->frameTitle, MDI_MAXTITLELENGTH+1 );
1224         }
1225         WIN_ReleaseWndPtr(childWnd);
1226
1227     }
1228     else
1229         lpBuffer[0] = '\0';
1230
1231     DEFWND_SetTextW( frameWnd, lpBuffer );
1232     if( repaint == MDI_REPAINTFRAME)
1233         SetWindowPos( frameWnd->hwndSelf, 0,0,0,0,0, SWP_FRAMECHANGED |
1234                         SWP_NOSIZE | SWP_NOMOVE | SWP_NOACTIVATE | SWP_NOZORDER );
1235
1236     WIN_ReleaseWndPtr(clientWnd);
1237
1238 }
1239
1240
1241 /* ----------------------------- Interface ---------------------------- */
1242
1243
1244 /**********************************************************************
1245  *              MDIClientWndProc_locked
1246  */
1247 static LRESULT WINAPI MDIClientWndProc_locked( WND *wndPtr, UINT message,
1248                                 WPARAM wParam, LPARAM lParam, BOOL unicode )
1249 {
1250     LPCREATESTRUCTA      cs;
1251     MDICLIENTINFO       *ci;
1252     RECT                 rect;
1253     WND                 *frameWnd;
1254     INT                  nItems;
1255     LRESULT              retvalue;
1256     LRESULT (WINAPI *pSendMessage)(HWND, UINT, WPARAM, LPARAM);
1257
1258     pSendMessage = unicode ? SendMessageW : SendMessageA;
1259
1260     if ( !wndPtr )
1261        return 0;
1262
1263     if ( ( frameWnd = WIN_LockWndPtr(wndPtr->parent) ) == NULL )
1264        return 0;
1265
1266     ci = (MDICLIENTINFO *) wndPtr->wExtra;
1267
1268     switch (message)
1269     {
1270       case WM_CREATE:
1271         /* Since we are using only cs->lpCreateParams, we can safely
1272          * cast to LPCREATESTRUCTA here */
1273         cs = (LPCREATESTRUCTA)lParam;
1274
1275         /* Translation layer doesn't know what's in the cs->lpCreateParams
1276          * so we have to keep track of what environment we're in. */
1277
1278         if( wndPtr->flags & WIN_ISWIN32 )
1279         {
1280 #define ccs ((LPCLIENTCREATESTRUCT)cs->lpCreateParams)
1281             ci->hWindowMenu     = ccs->hWindowMenu;
1282             ci->idFirstChild    = ccs->idFirstChild;
1283 #undef ccs
1284         }
1285         else
1286         {
1287             LPCLIENTCREATESTRUCT16 ccs = MapSL((SEGPTR)cs->lpCreateParams);
1288             ci->hWindowMenu     = ccs->hWindowMenu;
1289             ci->idFirstChild    = ccs->idFirstChild;
1290         }
1291
1292         ci->hwndChildMaximized  = 0;
1293         ci->nActiveChildren     = 0;
1294         ci->nTotalCreated       = 0;
1295         ci->frameTitle          = NULL;
1296         ci->mdiFlags            = 0;
1297         ci->self                = wndPtr->hwndSelf;
1298         wndPtr->dwStyle        |= WS_CLIPCHILDREN;
1299
1300         if (!hBmpClose)
1301         {
1302             hBmpClose = CreateMDIMenuBitmap();
1303             hBmpRestore = LoadBitmapW( 0, MAKEINTRESOURCEW(OBM_RESTORE) );
1304         }
1305         MDI_UpdateFrameText(frameWnd, wndPtr->hwndSelf, MDI_NOFRAMEREPAINT, frameWnd->text);
1306
1307         if (ci->hWindowMenu != 0)
1308             AppendMenuW( ci->hWindowMenu, MF_SEPARATOR, 0, NULL );
1309
1310         GetClientRect(frameWnd->hwndSelf, &rect);
1311         NC_HandleNCCalcSize( wndPtr, &rect );
1312         wndPtr->rectClient = rect;
1313
1314         TRACE("Client created - hwnd = %04x, idFirst = %u\n",
1315                                 wndPtr->hwndSelf, ci->idFirstChild );
1316
1317         retvalue = 0;
1318         goto END;
1319
1320       case WM_DESTROY:
1321         if( ci->hwndChildMaximized )
1322             MDI_RestoreFrameMenu(wndPtr->parent, ci->hwndChildMaximized);
1323         if((ci->hWindowMenu != 0) &&
1324            (nItems = GetMenuItemCount(ci->hWindowMenu)) > 0)
1325         {
1326             ci->idFirstChild = nItems - 1;
1327             ci->nActiveChildren++;              /* to delete a separator */
1328             while( ci->nActiveChildren-- )
1329                 DeleteMenu(ci->hWindowMenu,MF_BYPOSITION,ci->idFirstChild--);
1330         }
1331         retvalue = 0;
1332         goto END;
1333
1334       case WM_MDIACTIVATE:
1335         if( ci->hwndActiveChild != (HWND)wParam )
1336             SetWindowPos((HWND)wParam, 0,0,0,0,0, SWP_NOSIZE | SWP_NOMOVE);
1337         retvalue = 0;
1338         goto END;
1339
1340       case WM_MDICASCADE:
1341         retvalue = MDICascade(wndPtr, ci);
1342         goto END;
1343
1344       case WM_MDICREATE:
1345         if (lParam) retvalue = MDICreateChild( wndPtr, ci,
1346                                     (MDICREATESTRUCTA *)lParam, unicode );
1347         else retvalue = 0;
1348         goto END;
1349
1350       case WM_MDIDESTROY:
1351         retvalue = MDIDestroyChild( wndPtr, ci, (HWND)wParam, TRUE );
1352         goto END;
1353
1354       case WM_MDIGETACTIVE:
1355           if (lParam) *(BOOL *)lParam = (ci->hwndChildMaximized > 0);
1356           retvalue = ci->hwndActiveChild;
1357           goto END;
1358
1359       case WM_MDIICONARRANGE:
1360         ci->mdiFlags |= MDIF_NEEDUPDATE;
1361         ArrangeIconicWindows(wndPtr->hwndSelf);
1362         ci->sbRecalc = SB_BOTH+1;
1363         pSendMessage(wndPtr->hwndSelf, WM_MDICALCCHILDSCROLL, 0, 0L);
1364         retvalue = 0;
1365         goto END;
1366
1367       case WM_MDIMAXIMIZE:
1368         ShowWindow( (HWND)wParam, SW_MAXIMIZE );
1369         retvalue = 0;
1370         goto END;
1371
1372       case WM_MDINEXT: /* lParam != 0 means previous window */
1373         MDI_SwitchActiveChild(wndPtr->hwndSelf, (HWND)wParam, (lParam)? FALSE : TRUE );
1374         break;
1375
1376       case WM_MDIRESTORE:
1377         pSendMessage( (HWND)wParam, WM_SYSCOMMAND, SC_RESTORE, 0);
1378         retvalue = 0;
1379         goto END;
1380
1381       case WM_MDISETMENU:
1382           retvalue = MDISetMenu( wndPtr->hwndSelf, (HMENU)wParam, (HMENU)lParam );
1383           goto END;
1384
1385       case WM_MDIREFRESHMENU:
1386           retvalue = MDIRefreshMenu( wndPtr->hwndSelf, (HMENU)wParam, (HMENU)lParam );
1387           goto END;
1388
1389       case WM_MDITILE:
1390         ci->mdiFlags |= MDIF_NEEDUPDATE;
1391         ShowScrollBar(wndPtr->hwndSelf, SB_BOTH, FALSE);
1392         MDITile(wndPtr, ci, wParam);
1393         ci->mdiFlags &= ~MDIF_NEEDUPDATE;
1394         retvalue = 0;
1395         goto END;
1396
1397       case WM_VSCROLL:
1398       case WM_HSCROLL:
1399         ci->mdiFlags |= MDIF_NEEDUPDATE;
1400         ScrollChildren(wndPtr->hwndSelf, message, wParam, lParam);
1401         ci->mdiFlags &= ~MDIF_NEEDUPDATE;
1402         retvalue = 0;
1403         goto END;
1404
1405       case WM_SETFOCUS:
1406         if( ci->hwndActiveChild )
1407         {
1408            WND* pw = WIN_FindWndPtr( ci->hwndActiveChild );
1409            if( !(pw->dwStyle & WS_MINIMIZE) )
1410                SetFocus( pw->hwndSelf );
1411            WIN_ReleaseWndPtr(pw);
1412         }
1413         retvalue = 0;
1414         goto END;
1415
1416       case WM_NCACTIVATE:
1417         if( ci->hwndActiveChild )
1418              pSendMessage(ci->hwndActiveChild, message, wParam, lParam);
1419         break;
1420
1421       case WM_PARENTNOTIFY:
1422         if (LOWORD(wParam) == WM_LBUTTONDOWN)
1423         {
1424             HWND child;
1425             POINT pt;
1426             pt.x = SLOWORD(lParam);
1427             pt.y = SHIWORD(lParam);
1428             child = ChildWindowFromPoint(wndPtr->hwndSelf, pt);
1429
1430             TRACE("notification from %04x (%li,%li)\n",child,pt.x,pt.y);
1431
1432             if( child && child != wndPtr->hwndSelf && child != ci->hwndActiveChild )
1433                 SetWindowPos(child, 0,0,0,0,0, SWP_NOSIZE | SWP_NOMOVE );
1434         }
1435         retvalue = 0;
1436         goto END;
1437
1438       case WM_SIZE:
1439         if( IsWindow(ci->hwndChildMaximized) )
1440         {
1441             WND*        child = WIN_FindWndPtr(ci->hwndChildMaximized);
1442             RECT        rect;
1443
1444             rect.left = 0;
1445             rect.top = 0;
1446             rect.right = LOWORD(lParam);
1447             rect.bottom = HIWORD(lParam);
1448
1449             AdjustWindowRectEx(&rect, child->dwStyle, 0, child->dwExStyle);
1450             MoveWindow(ci->hwndChildMaximized, rect.left, rect.top,
1451                          rect.right - rect.left, rect.bottom - rect.top, 1);
1452             WIN_ReleaseWndPtr(child);
1453         }
1454         else
1455             MDI_PostUpdate(wndPtr->hwndSelf, ci, SB_BOTH+1);
1456
1457         break;
1458
1459       case WM_MDICALCCHILDSCROLL:
1460         if( (ci->mdiFlags & MDIF_NEEDUPDATE) && ci->sbRecalc )
1461         {
1462             CalcChildScroll(wndPtr->hwndSelf, ci->sbRecalc-1);
1463             ci->sbRecalc = 0;
1464             ci->mdiFlags &= ~MDIF_NEEDUPDATE;
1465         }
1466         retvalue = 0;
1467         goto END;
1468     }
1469
1470     retvalue = unicode ? DefWindowProcW( wndPtr->hwndSelf, message, wParam, lParam ) :
1471                          DefWindowProcA( wndPtr->hwndSelf, message, wParam, lParam );
1472 END:
1473     WIN_ReleaseWndPtr(frameWnd);
1474     return retvalue;
1475 }
1476
1477 /***********************************************************************
1478  *              MDIClientWndProcA
1479  */
1480 static LRESULT WINAPI MDIClientWndProcA( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam )
1481 {
1482     LRESULT res;
1483     WND *wndPtr = WIN_FindWndPtr(hwnd);
1484
1485     res = MDIClientWndProc_locked(wndPtr, message, wParam, lParam, FALSE);
1486
1487     WIN_ReleaseWndPtr(wndPtr);
1488     return res;
1489 }
1490
1491 /***********************************************************************
1492  *              MDIClientWndProcW
1493  */
1494 static LRESULT WINAPI MDIClientWndProcW( HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam )
1495 {
1496     LRESULT res;
1497     WND *wndPtr = WIN_FindWndPtr(hwnd);
1498
1499     res = MDIClientWndProc_locked(wndPtr, message, wParam, lParam, TRUE);
1500
1501     WIN_ReleaseWndPtr(wndPtr);
1502     return res;
1503 }
1504
1505 /***********************************************************************
1506  *              DefFrameProc (USER.445)
1507  */
1508 LRESULT WINAPI DefFrameProc16( HWND16 hwnd, HWND16 hwndMDIClient,
1509                                UINT16 message, WPARAM16 wParam, LPARAM lParam )
1510 {
1511     HWND16               childHwnd;
1512     MDICLIENTINFO*       ci;
1513     WND*                 wndPtr;
1514
1515     if (hwndMDIClient)
1516     {
1517         switch (message)
1518         {
1519           case WM_COMMAND:
1520             wndPtr = WIN_FindWndPtr(hwndMDIClient);
1521
1522             if (!wndPtr) {
1523                ERR("null wndPtr for mdi window hwndMDIClient=%04x\n",
1524                              hwndMDIClient);
1525                return 0;
1526             }
1527
1528             ci     = (MDICLIENTINFO*)wndPtr->wExtra;
1529
1530             /* check for possible syscommands for maximized MDI child */
1531             WIN_ReleaseWndPtr(wndPtr);
1532
1533             if( ci && (
1534                 wParam <  ci->idFirstChild ||
1535                 wParam >= ci->idFirstChild + ci->nActiveChildren
1536             )){
1537                 if( (wParam - 0xF000) & 0xF00F ) break;
1538                 switch( wParam )
1539                   {
1540                     case SC_SIZE:
1541                     case SC_MOVE:
1542                     case SC_MINIMIZE:
1543                     case SC_MAXIMIZE:
1544                     case SC_NEXTWINDOW:
1545                     case SC_PREVWINDOW:
1546                     case SC_CLOSE:
1547                     case SC_RESTORE:
1548                        if( ci->hwndChildMaximized )
1549                            return SendMessage16( ci->hwndChildMaximized, WM_SYSCOMMAND,
1550                                                wParam, lParam);
1551                   }
1552               }
1553             else
1554               {
1555                 wndPtr = WIN_FindWndPtr(hwndMDIClient);
1556                 ci     = (MDICLIENTINFO*)wndPtr->wExtra;
1557
1558                 if (wParam - ci->idFirstChild == MDI_MOREWINDOWSLIMIT)
1559                     /* User chose "More Windows..." */
1560                     childHwnd = MDI_MoreWindowsDialog(wndPtr);
1561                 else
1562                     /* User chose one of the windows listed in the "Windows" menu */
1563                 childHwnd = MDI_GetChildByID(wndPtr,wParam );
1564
1565                 WIN_ReleaseWndPtr(wndPtr);
1566                 if( childHwnd )
1567                     SendMessage16(hwndMDIClient, WM_MDIACTIVATE,
1568                                   (WPARAM16)childHwnd , 0L);
1569               }
1570             break;
1571
1572           case WM_NCACTIVATE:
1573             SendMessage16(hwndMDIClient, message, wParam, lParam);
1574             break;
1575
1576           case WM_SETTEXT:
1577             {
1578                 LPWSTR text = HEAP_strdupAtoW( GetProcessHeap(), 0, MapSL(lParam) );
1579                 wndPtr = WIN_FindWndPtr(hwnd);
1580                 MDI_UpdateFrameText(wndPtr, hwndMDIClient,
1581                                     MDI_REPAINTFRAME, text );
1582                 WIN_ReleaseWndPtr(wndPtr);
1583                 HeapFree( GetProcessHeap(), 0, text );
1584             }
1585             return 1; /* success. FIXME: check text length */
1586
1587           case WM_SETFOCUS:
1588             SetFocus(hwndMDIClient);
1589             break;
1590
1591           case WM_SIZE:
1592             MoveWindow16(hwndMDIClient, 0, 0,
1593                          LOWORD(lParam), HIWORD(lParam), TRUE);
1594             break;
1595
1596           case WM_NEXTMENU:
1597
1598             wndPtr = WIN_FindWndPtr(hwndMDIClient);
1599             ci     = (MDICLIENTINFO*)wndPtr->wExtra;
1600
1601             if( !(wndPtr->parent->dwStyle & WS_MINIMIZE)
1602                 && ci->hwndActiveChild && !ci->hwndChildMaximized )
1603             {
1604                 /* control menu is between the frame system menu and
1605                  * the first entry of menu bar */
1606
1607                 if( (wParam == VK_LEFT &&
1608                      wndPtr->parent->wIDmenu == LOWORD(lParam)) ||
1609                     (wParam == VK_RIGHT &&
1610                      GetSubMenu16(wndPtr->parent->hSysMenu, 0) == LOWORD(lParam)) )
1611                 {
1612                     LRESULT retvalue;
1613                     WIN_ReleaseWndPtr(wndPtr);
1614                     wndPtr = WIN_FindWndPtr(ci->hwndActiveChild);
1615                     retvalue = MAKELONG( GetSubMenu16(wndPtr->hSysMenu, 0),
1616                                                   ci->hwndActiveChild);
1617                     WIN_ReleaseWndPtr(wndPtr);
1618                     return retvalue;
1619                 }
1620             }
1621             WIN_ReleaseWndPtr(wndPtr);
1622             break;
1623         }
1624     }
1625
1626     return DefWindowProc16(hwnd, message, wParam, lParam);
1627 }
1628
1629
1630 /***********************************************************************
1631  *              DefFrameProcA (USER32.@)
1632  */
1633 LRESULT WINAPI DefFrameProcA( HWND hwnd, HWND hwndMDIClient,
1634                                 UINT message, WPARAM wParam, LPARAM lParam)
1635 {
1636     if (hwndMDIClient)
1637     {
1638         switch (message)
1639         {
1640           case WM_COMMAND:
1641               return DefFrameProc16( hwnd, hwndMDIClient, message,
1642                                      (WPARAM16)wParam,
1643                               MAKELPARAM( (HWND16)lParam, HIWORD(wParam) ) );
1644
1645           case WM_NCACTIVATE:
1646             SendMessageA(hwndMDIClient, message, wParam, lParam);
1647             break;
1648
1649           case WM_SETTEXT: {
1650                 LRESULT ret;
1651                 LPSTR   segstr = SEGPTR_STRDUP((LPSTR)lParam);
1652
1653                 ret = DefFrameProc16(hwnd, hwndMDIClient, message,
1654                                      wParam, (LPARAM)SEGPTR_GET(segstr) );
1655                 SEGPTR_FREE(segstr);
1656                 return ret;
1657           }
1658
1659           case WM_NEXTMENU:
1660           case WM_SETFOCUS:
1661           case WM_SIZE:
1662               return DefFrameProc16( hwnd, hwndMDIClient, message,
1663                                      wParam, lParam );
1664         }
1665     }
1666
1667     return DefWindowProcA(hwnd, message, wParam, lParam);
1668 }
1669
1670
1671 /***********************************************************************
1672  *              DefFrameProcW (USER32.@)
1673  */
1674 LRESULT WINAPI DefFrameProcW( HWND hwnd, HWND hwndMDIClient,
1675                                 UINT message, WPARAM wParam, LPARAM lParam)
1676 {
1677     if (hwndMDIClient)
1678     {
1679         switch (message)
1680         {
1681           case WM_COMMAND:
1682               return DefFrameProc16( hwnd, hwndMDIClient, message,
1683                                      (WPARAM16)wParam,
1684                               MAKELPARAM( (HWND16)lParam, HIWORD(wParam) ) );
1685
1686           case WM_NCACTIVATE:
1687             SendMessageW(hwndMDIClient, message, wParam, lParam);
1688             break;
1689
1690           case WM_SETTEXT:
1691           {
1692               LPSTR txt = HEAP_strdupWtoA(GetProcessHeap(),0,(LPWSTR)lParam);
1693               LRESULT ret = DefFrameProcA( hwnd, hwndMDIClient, message,
1694                                      wParam, (DWORD)txt );
1695               HeapFree(GetProcessHeap(),0,txt);
1696               return ret;
1697           }
1698           case WM_NEXTMENU:
1699           case WM_SETFOCUS:
1700           case WM_SIZE:
1701               return DefFrameProcA( hwnd, hwndMDIClient, message,
1702                                       wParam, lParam );
1703         }
1704     }
1705
1706     return DefWindowProcW( hwnd, message, wParam, lParam );
1707 }
1708
1709
1710 /***********************************************************************
1711  *              DefMDIChildProc (USER.447)
1712  */
1713 LRESULT WINAPI DefMDIChildProc16( HWND16 hwnd, UINT16 message,
1714                                   WPARAM16 wParam, LPARAM lParam )
1715 {
1716     MDICLIENTINFO       *ci;
1717     WND                 *clientWnd,*tmpWnd = 0;
1718     LRESULT             retvalue;
1719
1720     tmpWnd     = WIN_FindWndPtr(hwnd);
1721     if (!tmpWnd) return 0;
1722     clientWnd  = WIN_FindWndPtr(tmpWnd->parent->hwndSelf);
1723     ci         = (MDICLIENTINFO *) clientWnd->wExtra;
1724     WIN_ReleaseWndPtr(tmpWnd);
1725
1726     /* Sanity check */
1727     if (clientWnd->cbWndExtra < sizeof(MDICLIENTINFO))
1728     {
1729         WARN("called on non-MDI child window %x\n", hwnd);
1730         WIN_ReleaseWndPtr(clientWnd);
1731         return DefWindowProc16(hwnd, message, wParam, lParam);
1732     }
1733
1734     switch (message)
1735     {
1736       case WM_SETTEXT:
1737         DefWindowProc16(hwnd, message, wParam, lParam);
1738         MDI_MenuModifyItem(clientWnd,hwnd);
1739         if( ci->hwndChildMaximized == hwnd )
1740             MDI_UpdateFrameText( clientWnd->parent, ci->self,
1741                                  MDI_REPAINTFRAME, NULL );
1742         retvalue = 1; /* success. FIXME: check text length */
1743         goto END;
1744
1745       case WM_CLOSE:
1746         SendMessage16(ci->self,WM_MDIDESTROY,(WPARAM16)hwnd,0L);
1747         retvalue = 0;
1748         goto END;
1749
1750       case WM_SETFOCUS:
1751         if( ci->hwndActiveChild != hwnd )
1752             MDI_ChildActivate(clientWnd, hwnd);
1753         break;
1754
1755       case WM_CHILDACTIVATE:
1756         MDI_ChildActivate(clientWnd, hwnd);
1757         retvalue = 0;
1758         goto END;
1759
1760       case WM_NCPAINT:
1761         TRACE("WM_NCPAINT for %04x, active %04x\n",
1762                                              hwnd, ci->hwndActiveChild );
1763         break;
1764
1765       case WM_SYSCOMMAND:
1766         switch( wParam )
1767         {
1768                 case SC_MOVE:
1769                      if( ci->hwndChildMaximized == hwnd)
1770                      {
1771                          retvalue = 0;
1772                          goto END;
1773                      }
1774                      break;
1775                 case SC_RESTORE:
1776                 case SC_MINIMIZE:
1777                      tmpWnd = WIN_FindWndPtr(hwnd);
1778                      tmpWnd->dwStyle |= WS_SYSMENU;
1779                      WIN_ReleaseWndPtr(tmpWnd);
1780                      break;
1781                 case SC_MAXIMIZE:
1782                      if( ci->hwndChildMaximized == hwnd)
1783                      {
1784                           retvalue = SendMessage16( clientWnd->parent->hwndSelf,
1785                                              message, wParam, lParam);
1786                           goto END;
1787                      }
1788                      tmpWnd = WIN_FindWndPtr(hwnd);
1789                      tmpWnd->dwStyle &= ~WS_SYSMENU;
1790                      WIN_ReleaseWndPtr(tmpWnd);
1791                      break;
1792                 case SC_NEXTWINDOW:
1793                      SendMessage16( ci->self, WM_MDINEXT, 0, 0);
1794                      retvalue = 0;
1795                      goto END;
1796                 case SC_PREVWINDOW:
1797                      SendMessage16( ci->self, WM_MDINEXT, 0, 1);
1798                      retvalue = 0;
1799                      goto END;
1800         }
1801         break;
1802
1803       case WM_GETMINMAXINFO:
1804         {
1805             MINMAXINFO16 *mmi16 = (MINMAXINFO16 *)MapSL(lParam);
1806             MINMAXINFO mmi;
1807             STRUCT32_MINMAXINFO16to32( mmi16, &mmi );
1808             MDI_ChildGetMinMaxInfo( clientWnd, hwnd, &mmi );
1809             STRUCT32_MINMAXINFO32to16( &mmi, mmi16 );
1810         }
1811         retvalue = 0;
1812         goto END;
1813
1814       case WM_SETVISIBLE:
1815          if( ci->hwndChildMaximized) ci->mdiFlags &= ~MDIF_NEEDUPDATE;
1816          else
1817             MDI_PostUpdate(clientWnd->hwndSelf, ci, SB_BOTH+1);
1818         break;
1819
1820       case WM_SIZE:
1821         /* do not change */
1822
1823         if( ci->hwndActiveChild == hwnd && wParam != SIZE_MAXIMIZED )
1824         {
1825             ci->hwndChildMaximized = 0;
1826
1827             MDI_RestoreFrameMenu( clientWnd->parent, hwnd);
1828             MDI_UpdateFrameText( clientWnd->parent, ci->self,
1829                                  MDI_REPAINTFRAME, NULL );
1830         }
1831
1832         if( wParam == SIZE_MAXIMIZED )
1833         {
1834             HWND16 hMaxChild = ci->hwndChildMaximized;
1835
1836             if( hMaxChild == hwnd ) break;
1837
1838             if( hMaxChild)
1839             {
1840                 SendMessage16( hMaxChild, WM_SETREDRAW, FALSE, 0L );
1841
1842                 MDI_RestoreFrameMenu( clientWnd->parent, hMaxChild);
1843                 ShowWindow16( hMaxChild, SW_SHOWNOACTIVATE);
1844
1845                 SendMessage16( hMaxChild, WM_SETREDRAW, TRUE, 0L );
1846             }
1847
1848             TRACE("maximizing child %04x\n", hwnd );
1849
1850             /*
1851              * Keep track of the maximized window.
1852              */
1853             ci->hwndChildMaximized = hwnd; /* !!! */
1854
1855             /*
1856              * The maximized window should also be the active window
1857              */
1858             MDI_ChildActivate(clientWnd, hwnd);
1859
1860             MDI_AugmentFrameMenu( clientWnd->parent, hwnd );
1861             MDI_UpdateFrameText( clientWnd->parent, ci->self,
1862                                  MDI_REPAINTFRAME, NULL );
1863         }
1864
1865         if( wParam == SIZE_MINIMIZED )
1866         {
1867             HWND16 switchTo = MDI_GetWindow(clientWnd, hwnd, TRUE, WS_MINIMIZE);
1868
1869             if( switchTo )
1870                 SendMessage16( switchTo, WM_CHILDACTIVATE, 0, 0L);
1871         }
1872
1873         MDI_PostUpdate(clientWnd->hwndSelf, ci, SB_BOTH+1);
1874         break;
1875
1876       case WM_MENUCHAR:
1877
1878         /* MDI children don't have menu bars */
1879         retvalue = 0x00010000L;
1880         goto END;
1881
1882       case WM_NEXTMENU:
1883
1884         if( wParam == VK_LEFT )         /* switch to frame system menu */
1885         {
1886             retvalue = MAKELONG( GetSubMenu16(clientWnd->parent->hSysMenu, 0),
1887                            clientWnd->parent->hwndSelf );
1888             goto END;
1889         }
1890         if( wParam == VK_RIGHT )        /* to frame menu bar */
1891         {
1892             retvalue = MAKELONG( clientWnd->parent->wIDmenu,
1893                            clientWnd->parent->hwndSelf );
1894             goto END;
1895         }
1896
1897         break;
1898
1899       case WM_SYSCHAR:
1900            if (wParam == '-')
1901            {
1902                 SendMessage16(hwnd,WM_SYSCOMMAND,
1903                         (WPARAM16)SC_KEYMENU, (LPARAM)(DWORD)VK_SPACE);
1904                 retvalue = 0;
1905                 goto END;
1906            }
1907     }
1908
1909     retvalue = DefWindowProc16(hwnd, message, wParam, lParam);
1910 END:
1911     WIN_ReleaseWndPtr(clientWnd);
1912     return retvalue;
1913 }
1914
1915
1916 /***********************************************************************
1917  *              DefMDIChildProcA (USER32.@)
1918  */
1919 LRESULT WINAPI DefMDIChildProcA( HWND hwnd, UINT message,
1920                                    WPARAM wParam, LPARAM lParam )
1921 {
1922     MDICLIENTINFO       *ci;
1923     WND                 *clientWnd,*tmpWnd;
1924     LRESULT             retvalue;
1925
1926     tmpWnd     = WIN_FindWndPtr(hwnd);
1927     if (!tmpWnd) return 0;
1928     clientWnd  = WIN_FindWndPtr(tmpWnd->parent->hwndSelf);
1929     ci         = (MDICLIENTINFO *) clientWnd->wExtra;
1930     WIN_ReleaseWndPtr(tmpWnd);
1931
1932     /* Sanity check */
1933     if (clientWnd->cbWndExtra < sizeof(MDICLIENTINFO))
1934     {
1935         WARN("called on non-MDI child window %x\n", hwnd);
1936         WIN_ReleaseWndPtr(clientWnd);
1937         return DefWindowProcA(hwnd, message, wParam, lParam);
1938     }
1939
1940     switch (message)
1941     {
1942       case WM_SETTEXT:
1943         DefWindowProcA(hwnd, message, wParam, lParam);
1944         MDI_MenuModifyItem(clientWnd,hwnd);
1945         if( ci->hwndChildMaximized == hwnd )
1946             MDI_UpdateFrameText( clientWnd->parent, ci->self,
1947                                  MDI_REPAINTFRAME, NULL );
1948         retvalue = 1; /* success. FIXME: check text length */
1949         goto END;
1950
1951       case WM_GETMINMAXINFO:
1952         MDI_ChildGetMinMaxInfo( clientWnd, hwnd, (MINMAXINFO *)lParam );
1953         retvalue = 0;
1954         goto END;
1955
1956       case WM_MENUCHAR:
1957
1958         /* MDI children don't have menu bars */
1959         retvalue = 0x00010000L;
1960         goto END;
1961
1962       case WM_CLOSE:
1963       case WM_SETFOCUS:
1964       case WM_CHILDACTIVATE:
1965       case WM_NCPAINT:
1966       case WM_SYSCOMMAND:
1967       case WM_SETVISIBLE:
1968       case WM_SIZE:
1969       case WM_NEXTMENU:
1970           retvalue = DefMDIChildProc16( hwnd, message, (WPARAM16)wParam, lParam );
1971           goto END;
1972
1973       case WM_SYSCHAR:
1974            if (wParam == '-')
1975            {
1976                 SendMessageA(hwnd,WM_SYSCOMMAND,
1977                         (WPARAM)SC_KEYMENU, (LPARAM)(DWORD)VK_SPACE);
1978                 retvalue = 0;
1979                 goto END;
1980            }
1981     }
1982     retvalue = DefWindowProcA(hwnd, message, wParam, lParam);
1983 END:
1984     WIN_ReleaseWndPtr(clientWnd);
1985     return retvalue;
1986 }
1987
1988
1989 /***********************************************************************
1990  *              DefMDIChildProcW (USER32.@)
1991  */
1992 LRESULT WINAPI DefMDIChildProcW( HWND hwnd, UINT message,
1993                                    WPARAM wParam, LPARAM lParam )
1994 {
1995     MDICLIENTINFO       *ci;
1996     WND                 *clientWnd,*tmpWnd;
1997     LRESULT             retvalue;
1998
1999     tmpWnd     = WIN_FindWndPtr(hwnd);
2000     if (!tmpWnd) return 0;
2001     clientWnd  = WIN_FindWndPtr(tmpWnd->parent->hwndSelf);
2002     ci         = (MDICLIENTINFO *) clientWnd->wExtra;
2003     WIN_ReleaseWndPtr(tmpWnd);
2004
2005     /* Sanity check */
2006     if (clientWnd->cbWndExtra < sizeof(MDICLIENTINFO))
2007     {
2008         WARN("called on non-MDI child window %x\n", hwnd);
2009         WIN_ReleaseWndPtr(clientWnd);
2010         return DefWindowProcW(hwnd, message, wParam, lParam);
2011     }
2012
2013     switch (message)
2014     {
2015       case WM_SETTEXT:
2016         DefWindowProcW(hwnd, message, wParam, lParam);
2017         MDI_MenuModifyItem(clientWnd,hwnd);
2018         if( ci->hwndChildMaximized == hwnd )
2019             MDI_UpdateFrameText( clientWnd->parent, ci->self,
2020                                  MDI_REPAINTFRAME, NULL );
2021         retvalue = 1; /* success. FIXME: check text length */
2022         goto END;
2023
2024       case WM_GETMINMAXINFO:
2025       case WM_MENUCHAR:
2026       case WM_CLOSE:
2027       case WM_SETFOCUS:
2028       case WM_CHILDACTIVATE:
2029       case WM_NCPAINT:
2030       case WM_SYSCOMMAND:
2031       case WM_SETVISIBLE:
2032       case WM_SIZE:
2033       case WM_NEXTMENU:
2034           retvalue = DefMDIChildProcA( hwnd, message, (WPARAM16)wParam, lParam );
2035           goto END;
2036
2037       case WM_SYSCHAR:
2038            if (wParam == '-')
2039            {
2040                 SendMessageW(hwnd,WM_SYSCOMMAND,
2041                         (WPARAM)SC_KEYMENU, (LPARAM)(DWORD)VK_SPACE);
2042                 retvalue = 0;
2043                 goto END;
2044            }
2045     }
2046     retvalue = DefWindowProcW(hwnd, message, wParam, lParam);
2047 END:
2048     WIN_ReleaseWndPtr(clientWnd);
2049     return retvalue;
2050
2051 }
2052
2053 /**********************************************************************
2054  *              CreateMDIWindowA (USER32.@) Creates a MDI child
2055  *
2056  * RETURNS
2057  *    Success: Handle to created window
2058  *    Failure: NULL
2059  */
2060 HWND WINAPI CreateMDIWindowA(
2061     LPCSTR lpClassName,    /* [in] Pointer to registered child class name */
2062     LPCSTR lpWindowName,   /* [in] Pointer to window name */
2063     DWORD dwStyle,         /* [in] Window style */
2064     INT X,               /* [in] Horizontal position of window */
2065     INT Y,               /* [in] Vertical position of window */
2066     INT nWidth,          /* [in] Width of window */
2067     INT nHeight,         /* [in] Height of window */
2068     HWND hWndParent,     /* [in] Handle to parent window */
2069     HINSTANCE hInstance, /* [in] Handle to application instance */
2070     LPARAM lParam)         /* [in] Application-defined value */
2071 {
2072     MDICLIENTINFO* pCi;
2073     MDICREATESTRUCTA cs;
2074     WND *pWndParent = WIN_FindWndPtr(hWndParent);
2075     HWND retvalue;
2076
2077     TRACE("(%s,%s,%ld,%d,%d,%d,%d,%x,%d,%ld)\n",
2078           debugstr_a(lpClassName),debugstr_a(lpWindowName),dwStyle,X,Y,
2079           nWidth,nHeight,hWndParent,hInstance,lParam);
2080
2081     if(!pWndParent)
2082     {
2083         ERR("bad hwnd for MDI-client: %04x\n", hWndParent);
2084         return 0;
2085     }
2086     cs.szClass=lpClassName;
2087     cs.szTitle=lpWindowName;
2088     cs.hOwner=hInstance;
2089     cs.x=X;
2090     cs.y=Y;
2091     cs.cx=nWidth;
2092     cs.cy=nHeight;
2093     cs.style=dwStyle;
2094     cs.lParam=lParam;
2095
2096     pCi = (MDICLIENTINFO *)pWndParent->wExtra;
2097
2098     retvalue = MDICreateChild(pWndParent, pCi, &cs, FALSE);
2099     WIN_ReleaseWndPtr(pWndParent);
2100     return retvalue;
2101 }
2102
2103 /***********************************************************************
2104  *              CreateMDIWindowW (USER32.@) Creates a MDI child
2105  *
2106  * RETURNS
2107  *    Success: Handle to created window
2108  *    Failure: NULL
2109  */
2110 HWND WINAPI CreateMDIWindowW(
2111     LPCWSTR lpClassName,    /* [in] Pointer to registered child class name */
2112     LPCWSTR lpWindowName,   /* [in] Pointer to window name */
2113     DWORD dwStyle,         /* [in] Window style */
2114     INT X,               /* [in] Horizontal position of window */
2115     INT Y,               /* [in] Vertical position of window */
2116     INT nWidth,          /* [in] Width of window */
2117     INT nHeight,         /* [in] Height of window */
2118     HWND hWndParent,     /* [in] Handle to parent window */
2119     HINSTANCE hInstance, /* [in] Handle to application instance */
2120     LPARAM lParam)         /* [in] Application-defined value */
2121 {
2122     MDICLIENTINFO *pCi;
2123     MDICREATESTRUCTW cs;
2124     WND *pWndParent = WIN_FindWndPtr(hWndParent);
2125     HWND retvalue;
2126
2127     TRACE("(%s,%s,%ld,%d,%d,%d,%d,%x,%d,%ld)\n",
2128           debugstr_w(lpClassName), debugstr_w(lpWindowName), dwStyle, X, Y,
2129           nWidth, nHeight, hWndParent, hInstance, lParam);
2130
2131     if(!pWndParent)
2132     {
2133         ERR("bad hwnd for MDI-client: %04x\n", hWndParent);
2134         return 0;
2135     }
2136     cs.szClass = lpClassName;
2137     cs.szTitle = lpWindowName;
2138     cs.hOwner = hInstance;
2139     cs.x = X;
2140     cs.y = Y;
2141     cs.cx = nWidth;
2142     cs.cy = nHeight;
2143     cs.style = dwStyle;
2144     cs.lParam = lParam;
2145
2146     pCi = (MDICLIENTINFO *)pWndParent->wExtra;
2147
2148     retvalue = MDICreateChild(pWndParent, pCi, (MDICREATESTRUCTA *)&cs, TRUE);
2149     WIN_ReleaseWndPtr(pWndParent);
2150     return retvalue;
2151 }
2152
2153 /**********************************************************************
2154  *              TranslateMDISysAccel (USER.451)
2155  */
2156 BOOL16 WINAPI TranslateMDISysAccel16( HWND16 hwndClient, LPMSG16 msg )
2157 {
2158     MSG msg32;
2159
2160     STRUCT32_MSG16to32(msg, &msg32);
2161     /* MDICLIENTINFO is still the same for win32 and win16 ... */
2162     return TranslateMDISysAccel(hwndClient, &msg32);
2163 }
2164
2165 /**********************************************************************
2166  *              TranslateMDISysAccel (USER32.@)
2167  */
2168 BOOL WINAPI TranslateMDISysAccel( HWND hwndClient, LPMSG msg )
2169 {
2170
2171     if( IsWindow(hwndClient) && (msg->message == WM_KEYDOWN || msg->message == WM_SYSKEYDOWN))
2172     {
2173         MDICLIENTINFO   *ci = NULL;
2174         HWND            wnd;
2175         WND             *clientWnd = WIN_FindWndPtr(hwndClient);
2176
2177         ci = (MDICLIENTINFO*) clientWnd->wExtra;
2178         wnd = ci->hwndActiveChild;
2179
2180         WIN_ReleaseWndPtr(clientWnd);
2181
2182         if( IsWindow(wnd) && !(GetWindowLongW(wnd, GWL_STYLE) & WS_DISABLED) )
2183         {
2184             WPARAM wParam = 0;
2185
2186             /* translate if the Ctrl key is down and Alt not. */
2187
2188             if( (GetKeyState(VK_CONTROL) & 0x8000) &&
2189                !(GetKeyState(VK_MENU) & 0x8000))
2190             {
2191                 switch( msg->wParam )
2192                 {
2193                     case VK_F6:
2194                     case VK_TAB:
2195                          wParam = ( GetKeyState(VK_SHIFT) & 0x8000 )
2196                                   ? SC_NEXTWINDOW : SC_PREVWINDOW;
2197                          break;
2198                     case VK_F4:
2199                     case VK_RBUTTON:
2200                          wParam = SC_CLOSE;
2201                          break;
2202                     default:
2203                          return 0;
2204                 }
2205                 TRACE("wParam = %04x\n", wParam);
2206                 SendMessageW(wnd, WM_SYSCOMMAND, wParam, (LPARAM)msg->wParam);
2207                 return 1;
2208             }
2209         }
2210     }
2211     return 0; /* failure */
2212 }
2213
2214 /***********************************************************************
2215  *              CalcChildScroll (USER.462)
2216  */
2217 void WINAPI CalcChildScroll16( HWND16 hwnd, WORD scroll )
2218 {
2219     return CalcChildScroll( hwnd, scroll );
2220 }
2221
2222 /***********************************************************************
2223  *              CalcChildScroll (USER32.@)
2224  */
2225 void WINAPI CalcChildScroll( HWND hwnd, INT scroll )
2226 {
2227     SCROLLINFO info;
2228     RECT childRect, clientRect;
2229     INT  vmin, vmax, hmin, hmax, vpos, hpos;
2230     WND *pWnd, *Wnd;
2231
2232     if (!(pWnd = WIN_FindWndPtr( hwnd ))) return;
2233     Wnd = WIN_FindWndPtr(hwnd);
2234     GetClientRect( hwnd, &clientRect );
2235     SetRectEmpty( &childRect );
2236
2237     for ( WIN_UpdateWndPtr(&pWnd,pWnd->child); pWnd; WIN_UpdateWndPtr(&pWnd,pWnd->next))
2238     {
2239           if( pWnd->dwStyle & WS_MAXIMIZE )
2240           {
2241               ShowScrollBar(hwnd, SB_BOTH, FALSE);
2242               WIN_ReleaseWndPtr(pWnd);
2243               WIN_ReleaseWndPtr(Wnd);
2244               return;
2245           }
2246           if( pWnd->dwStyle & WS_VISIBLE )
2247               UnionRect( &childRect, &pWnd->rectWindow, &childRect );
2248     }
2249     WIN_ReleaseWndPtr(pWnd);
2250     UnionRect( &childRect, &clientRect, &childRect );
2251
2252     hmin = childRect.left; hmax = childRect.right - clientRect.right;
2253     hpos = clientRect.left - childRect.left;
2254     vmin = childRect.top; vmax = childRect.bottom - clientRect.bottom;
2255     vpos = clientRect.top - childRect.top;
2256
2257     switch( scroll )
2258     {
2259         case SB_HORZ:
2260                         vpos = hpos; vmin = hmin; vmax = hmax;
2261         case SB_VERT:
2262                         info.cbSize = sizeof(info);
2263                         info.nMax = vmax; info.nMin = vmin; info.nPos = vpos;
2264                         info.fMask = SIF_POS | SIF_RANGE;
2265                         SetScrollInfo(hwnd, scroll, &info, TRUE);
2266                         break;
2267         case SB_BOTH:
2268                         SCROLL_SetNCSbState( Wnd, vmin, vmax, vpos,
2269                                                   hmin, hmax, hpos);
2270     }
2271     WIN_ReleaseWndPtr(Wnd);
2272 }
2273
2274
2275 /***********************************************************************
2276  *              ScrollChildren (USER.463)
2277  */
2278 void WINAPI ScrollChildren16(HWND16 hWnd, UINT16 uMsg, WPARAM16 wParam, LPARAM lParam)
2279 {
2280     ScrollChildren( hWnd, uMsg, wParam, lParam );
2281 }
2282
2283
2284 /***********************************************************************
2285  *              ScrollChildren (USER32.@)
2286  */
2287 void WINAPI ScrollChildren(HWND hWnd, UINT uMsg, WPARAM wParam,
2288                              LPARAM lParam)
2289 {
2290     WND *wndPtr = WIN_FindWndPtr(hWnd);
2291     INT newPos = -1;
2292     INT curPos, length, minPos, maxPos, shift;
2293
2294     if( !wndPtr ) return;
2295
2296     if( uMsg == WM_HSCROLL )
2297     {
2298         GetScrollRange(hWnd,SB_HORZ,&minPos,&maxPos);
2299         curPos = GetScrollPos(hWnd,SB_HORZ);
2300         length = (wndPtr->rectClient.right - wndPtr->rectClient.left)/2;
2301         shift = GetSystemMetrics(SM_CYHSCROLL);
2302     }
2303     else if( uMsg == WM_VSCROLL )
2304     {
2305         GetScrollRange(hWnd,SB_VERT,&minPos,&maxPos);
2306         curPos = GetScrollPos(hWnd,SB_VERT);
2307         length = (wndPtr->rectClient.bottom - wndPtr->rectClient.top)/2;
2308         shift = GetSystemMetrics(SM_CXVSCROLL);
2309     }
2310     else
2311     {
2312         WIN_ReleaseWndPtr(wndPtr);
2313         return;
2314     }
2315
2316     WIN_ReleaseWndPtr(wndPtr);
2317     switch( wParam )
2318     {
2319         case SB_LINEUP:
2320                         newPos = curPos - shift;
2321                         break;
2322         case SB_LINEDOWN:
2323                         newPos = curPos + shift;
2324                         break;
2325         case SB_PAGEUP:
2326                         newPos = curPos - length;
2327                         break;
2328         case SB_PAGEDOWN:
2329                         newPos = curPos + length;
2330                         break;
2331
2332         case SB_THUMBPOSITION:
2333                         newPos = LOWORD(lParam);
2334                         break;
2335
2336         case SB_THUMBTRACK:
2337                         return;
2338
2339         case SB_TOP:
2340                         newPos = minPos;
2341                         break;
2342         case SB_BOTTOM:
2343                         newPos = maxPos;
2344                         break;
2345         case SB_ENDSCROLL:
2346                         CalcChildScroll16(hWnd,(uMsg == WM_VSCROLL)?SB_VERT:SB_HORZ);
2347                         return;
2348     }
2349
2350     if( newPos > maxPos )
2351         newPos = maxPos;
2352     else
2353         if( newPos < minPos )
2354             newPos = minPos;
2355
2356     SetScrollPos(hWnd, (uMsg == WM_VSCROLL)?SB_VERT:SB_HORZ , newPos, TRUE);
2357
2358     if( uMsg == WM_VSCROLL )
2359         ScrollWindowEx(hWnd ,0 ,curPos - newPos, NULL, NULL, 0, NULL,
2360                         SW_INVALIDATE | SW_ERASE | SW_SCROLLCHILDREN );
2361     else
2362         ScrollWindowEx(hWnd ,curPos - newPos, 0, NULL, NULL, 0, NULL,
2363                         SW_INVALIDATE | SW_ERASE | SW_SCROLLCHILDREN );
2364 }
2365
2366
2367 /******************************************************************************
2368  *              CascadeWindows (USER32.@) Cascades MDI child windows
2369  *
2370  * RETURNS
2371  *    Success: Number of cascaded windows.
2372  *    Failure: 0
2373  */
2374 WORD WINAPI
2375 CascadeWindows (HWND hwndParent, UINT wFlags, const LPRECT lpRect,
2376                 UINT cKids, const HWND *lpKids)
2377 {
2378     FIXME("(0x%08x,0x%08x,...,%u,...): stub\n",
2379            hwndParent, wFlags, cKids);
2380
2381     return 0;
2382 }
2383
2384
2385 /******************************************************************************
2386  *              TileWindows (USER32.@) Tiles MDI child windows
2387  *
2388  * RETURNS
2389  *    Success: Number of tiled windows.
2390  *    Failure: 0
2391  */
2392 WORD WINAPI
2393 TileWindows (HWND hwndParent, UINT wFlags, const LPRECT lpRect,
2394              UINT cKids, const HWND *lpKids)
2395 {
2396     FIXME("(0x%08x,0x%08x,...,%u,...): stub\n",
2397            hwndParent, wFlags, cKids);
2398
2399     return 0;
2400 }
2401
2402 /************************************************************************
2403  *              "More Windows..." functionality
2404  */
2405
2406 /*              MDI_MoreWindowsDlgProc
2407  *
2408  *    This function will process the messages sent to the "More Windows..."
2409  *    dialog.
2410  *    Return values:  0    = cancel pressed
2411  *                    HWND = ok pressed or double-click in the list...
2412  *
2413  */
2414
2415 static BOOL WINAPI MDI_MoreWindowsDlgProc (HWND hDlg, UINT iMsg, WPARAM wParam, LPARAM lParam)
2416 {
2417     switch (iMsg)
2418     {
2419        case WM_INITDIALOG:
2420        {
2421            WND  *pWnd;
2422            UINT widest       = 0;
2423            UINT length;
2424            UINT i;
2425            WND  *pParentWnd  = (WND *)lParam;
2426            MDICLIENTINFO *ci = (MDICLIENTINFO*)pParentWnd->wExtra;
2427            HWND hListBox = GetDlgItem(hDlg, MDI_IDC_LISTBOX);
2428
2429            /* Fill the list, sorted by id... */
2430            for (i = 0; i < ci->nActiveChildren; i++)
2431            {
2432
2433                /* Find the window with the current ID */
2434                for (pWnd = WIN_LockWndPtr(pParentWnd->child); pWnd; WIN_UpdateWndPtr(&pWnd, pWnd->next))
2435                    if (pWnd->wIDmenu == ci->idFirstChild + i)
2436                        break;
2437
2438                SendMessageW(hListBox, LB_ADDSTRING, 0, (LPARAM) pWnd->text);
2439                SendMessageW(hListBox, LB_SETITEMDATA, i, (LPARAM) pWnd);
2440                length = strlenW(pWnd->text);
2441                WIN_ReleaseWndPtr(pWnd);
2442
2443                if (length > widest)
2444                    widest = length;
2445            }
2446            /* Make sure the horizontal scrollbar scrolls ok */
2447            SendMessageW(hListBox, LB_SETHORIZONTALEXTENT, widest * 6, 0);
2448
2449            /* Set the current selection */
2450            SendMessageW(hListBox, LB_SETCURSEL, MDI_MOREWINDOWSLIMIT, 0);
2451            return TRUE;
2452        }
2453
2454        case WM_COMMAND:
2455            switch (LOWORD(wParam))
2456            {
2457                 case IDOK:
2458                 {
2459                     /*  windows are sorted by menu ID, so we must return the
2460                      *  window associated to the given id
2461                      */
2462                     HWND hListBox     = GetDlgItem(hDlg, MDI_IDC_LISTBOX);
2463                     UINT index        = SendMessageW(hListBox, LB_GETCURSEL, 0, 0);
2464                     WND *pWnd         = (WND *)SendMessageW(hListBox, LB_GETITEMDATA, index, 0);
2465
2466                     EndDialog(hDlg, pWnd->hwndSelf);
2467                     return TRUE;
2468                 }
2469                 case IDCANCEL:
2470                     EndDialog(hDlg, 0);
2471                     return TRUE;
2472
2473                 default:
2474                     switch (HIWORD(wParam))
2475                     {
2476                         case LBN_DBLCLK:
2477                         {
2478                             /*  windows are sorted by menu ID, so we must return the
2479                              *  window associated to the given id
2480                              */
2481                             HWND hListBox     = GetDlgItem(hDlg, MDI_IDC_LISTBOX);
2482                             UINT index        = SendMessageW(hListBox, LB_GETCURSEL, 0, 0);
2483                             WND *pWnd         = (WND *)SendMessageW(hListBox, LB_GETITEMDATA, index, 0);
2484
2485                             EndDialog(hDlg, pWnd->hwndSelf);
2486                             return TRUE;
2487                         }
2488                     }
2489                     break;
2490            }
2491            break;
2492     }
2493     return FALSE;
2494 }
2495
2496 /*
2497  *
2498  *                      MDI_MoreWindowsDialog
2499  *
2500  *     Prompts the user with a listbox containing the opened
2501  *     documents. The user can then choose a windows and click
2502  *     on OK to set the current window to the one selected, or
2503  *     CANCEL to cancel. The function returns a handle to the
2504  *     selected window.
2505  */
2506
2507 static HWND MDI_MoreWindowsDialog(WND* wndPtr)
2508 {
2509     LPCVOID template;
2510     HRSRC hRes;
2511     HANDLE hDlgTmpl;
2512
2513     hRes = FindResourceA(GetModuleHandleA("USER32"), "MDI_MOREWINDOWS", RT_DIALOGA);
2514
2515     if (hRes == 0)
2516         return 0;
2517
2518     hDlgTmpl = LoadResource(GetModuleHandleA("USER32"), hRes );
2519
2520     if (hDlgTmpl == 0)
2521         return 0;
2522
2523     template = LockResource( hDlgTmpl );
2524
2525     if (template == 0)
2526         return 0;
2527
2528     return (HWND) DialogBoxIndirectParamA(GetModuleHandleA("USER32"),
2529                                           (LPDLGTEMPLATEA) template,
2530                                           wndPtr->hwndSelf,
2531                                           (DLGPROC) MDI_MoreWindowsDlgProc,
2532                                           (LPARAM) wndPtr);
2533 }
2534
2535 /*
2536  *
2537  *                      MDI_SwapMenuItems
2538  *
2539  *      Will swap the menu IDs for the given 2 positions.
2540  *      pos1 and pos2 are menu IDs
2541  *
2542  *
2543  */
2544
2545 static void MDI_SwapMenuItems(WND *parentWnd, UINT pos1, UINT pos2)
2546 {
2547     WND *pWnd;
2548
2549     for (pWnd = WIN_LockWndPtr(parentWnd->child); pWnd; WIN_UpdateWndPtr(&pWnd,pWnd->next))
2550     {
2551         if (pWnd->wIDmenu == pos1)
2552             pWnd->wIDmenu = pos2;
2553         else
2554             if (pWnd->wIDmenu == pos2)
2555                 pWnd->wIDmenu = pos1;
2556     }
2557
2558     WIN_ReleaseWndPtr(pWnd);
2559 }
2560