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