3 * Copyright 1994, Bob Amstadt
4 * 1995,1996 Alex Korobka
6 * This file contains routines to support MDI (Multiple Document
7 * Interface) features .
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
23 * Notes: Fairly complete implementation.
24 * Also, Excel and WinWord do _not_ use MDI so if you're trying
25 * to fix them look elsewhere.
27 * Notes on how the "More Windows..." is implemented:
29 * When we have more than 9 opened windows, a "More Windows..."
30 * option appears in the "Windows" menu. Each child window has
31 * a WND* associated with it, accessible via the children list of
32 * the parent window. This WND* has a wIDmenu member, which reflects
33 * the position of the child in the window list. For example, with
34 * 9 child windows, we could have the following pattern:
38 * Name of the child window pWndChild->wIDmenu
50 * The "Windows" menu, as the "More windows..." dialog, are constructed
51 * in this order. If we add a child, we would have the following list:
54 * Name of the child window pWndChild->wIDmenu
66 * But only 5000 to 5008 would be displayed in the "Windows" menu. We want
67 * the last created child to be in the menu, so we swap the last child with
68 * the 9th... Doc9 will be accessible via the "More Windows..." option.
85 #include <wine/debug.h>
87 WINE_DEFAULT_DEBUG_CHANNEL(mdi
);
89 #define MDI_MAXTITLELENGTH 0xa1
91 #define WM_MDICALCCHILDSCROLL 0x003F /* this is exactly what Windows uses */
93 /* "More Windows..." definitions */
94 #define MDI_MOREWINDOWSLIMIT 9 /* after this number of windows, a "More Windows..."
95 option will appear under the Windows menu */
96 #define MDI_IDC_LISTBOX 100
97 #define IDS_MDI_MOREWINDOWS 13
99 #define MDIF_NEEDUPDATE 0x0001
103 /* At some points, particularly when switching MDI children, active and
104 * maximized MDI children may be not the same window, so we need to track
106 * The only place where we switch to/from maximized state is DefMDIChildProc
107 * WM_SIZE/SIZE_MAXIMIZED handler. We get that notification only after the
108 * ShowWindow(SW_SHOWMAXIMIZED) request, therefore window is guaranteed to
109 * be visible at the time we get the notification, and it's safe to assume
110 * that hwndChildMaximized is always visible.
111 * If the app plays games with WS_VISIBLE, WS_MAXIMIZE or any other window
112 * states it must keep coherency with USER32 on its own. This is true for
116 UINT nActiveChildren
;
117 HWND hwndChildMaximized
;
118 HWND hwndActiveChild
;
119 HWND
*child
; /* array of tracked children */
126 UINT sbRecalc
; /* SB_xxx flags for scrollbar fixup */
127 HBITMAP hBmpClose
; /* ReactOS modification */
130 //static HBITMAP hBmpClose = 0;
132 /* ----------------- declarations ----------------- */
133 static void MDI_UpdateFrameText( HWND
, HWND
, BOOL
, LPCWSTR
);
134 static BOOL
MDI_AugmentFrameMenu( HWND
, HWND
);
135 static BOOL
MDI_RestoreFrameMenu( HWND
, HWND
, HBITMAP
);
136 static LONG
MDI_ChildActivate( HWND
, HWND
);
137 static LRESULT
MDI_RefreshMenu(MDICLIENTINFO
*);
139 static HWND
MDI_MoreWindowsDialog(HWND
);
141 HWND
* WIN_ListChildren (HWND hWndparent
)
149 Status
= NtUserBuildHwndList ( NULL
, hWndparent
, FALSE
, 0, 0, NULL
, &dwCount
);
151 if ( !NT_SUCCESS( Status
) )
154 /* allocate buffer to receive HWND handles */
155 hHeap
= GetProcessHeap();
157 pHwnd
= HeapAlloc ( hHeap
, 0, sizeof(HWND
)*(dwCount
+1) );
160 SetLastError ( ERROR_NOT_ENOUGH_MEMORY
);
164 /* now call kernel again to fill the buffer this time */
165 Status
= NtUserBuildHwndList (NULL
, hWndparent
, FALSE
, 0, 0, pHwnd
, &dwCount
);
167 if ( !NT_SUCCESS( Status
) )
170 HeapFree ( hHeap
, 0, pHwnd
);
174 pHwnd
[dwCount
] = (HWND
) 0;
180 void WINAPI
ScrollChildren(HWND hWnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
);
181 void WINAPI
CalcChildScroll(HWND hwnd
, INT scroll
);
184 /* -------- Miscellaneous service functions ----------
188 static HWND
MDI_GetChildByID(HWND hwnd
, UINT id
, MDICLIENTINFO
*ci
)
192 for (i
= 0; ci
->nActiveChildren
; i
++)
194 if (GetWindowLongPtrW( ci
->child
[i
], GWLP_ID
) == id
)
200 static void MDI_PostUpdate(HWND hwnd
, MDICLIENTINFO
* ci
, WORD recalc
)
202 if( !(ci
->mdiFlags
& MDIF_NEEDUPDATE
) )
204 ci
->mdiFlags
|= MDIF_NEEDUPDATE
;
205 PostMessageA( hwnd
, WM_MDICALCCHILDSCROLL
, 0, 0);
207 ci
->sbRecalc
= recalc
;
211 /*********************************************************************
212 * MDIClient class descriptor
214 const struct builtin_class_descr MDICLIENT_builtin_class
=
216 L
"MDIClient", /* name */
218 MDIClientWndProcA
, /* procA */
219 MDIClientWndProcW
, /* procW */
220 sizeof(MDIWND
), /* extra */
221 IDC_ARROW
, /* cursor */
222 (HBRUSH
)(COLOR_APPWORKSPACE
+1) /* brush */
226 static MDICLIENTINFO
*get_client_info( HWND client
)
229 return (MDICLIENTINFO
*)GetWindowLongPtr(client
, GWLP_MDIWND
);
231 MDICLIENTINFO
*ret
= NULL
;
232 WND
*win
= WIN_GetPtr( client
);
235 if (win
== WND_OTHER_PROCESS
|| win
== WND_DESKTOP
)
237 if (IsWindow(client
)) WARN( "client %p belongs to other process\n", client
);
240 if (win
->flags
& WIN_ISMDICLIENT
)
241 ret
= (MDICLIENTINFO
*)win
->wExtra
;
243 WARN( "%p is not an MDI client\n", client
);
244 WIN_ReleasePtr( win
);
250 static BOOL
is_close_enabled(HWND hwnd
, HMENU hSysMenu
)
252 if (GetClassLongPtrW(hwnd
, GCL_STYLE
) & CS_NOCLOSE
) return FALSE
;
254 if (!hSysMenu
) hSysMenu
= GetSystemMenu(hwnd
, FALSE
);
257 UINT state
= GetMenuState(hSysMenu
, SC_CLOSE
, MF_BYCOMMAND
);
258 if (state
== 0xFFFFFFFF || (state
& (MF_DISABLED
| MF_GRAYED
)))
264 /**********************************************************************
267 * returns "activatable" child different from the current or zero
269 static HWND
MDI_GetWindow(MDICLIENTINFO
*clientInfo
, HWND hWnd
, BOOL bNext
,
276 dwStyleMask
|= WS_DISABLED
| WS_VISIBLE
;
277 if( !hWnd
) hWnd
= clientInfo
->hwndActiveChild
;
279 if (!(list
= WIN_ListChildren( GetParent(hWnd
) ))) return 0;
281 /* start from next after hWnd */
282 while (list
[i
] && list
[i
] != hWnd
) i
++;
285 for ( ; list
[i
]; i
++)
287 if (GetWindow( list
[i
], GW_OWNER
)) continue;
288 if ((GetWindowLongPtrW( list
[i
], GWL_STYLE
) & dwStyleMask
) != WS_VISIBLE
) continue;
290 if (bNext
) goto found
;
292 /* now restart from the beginning */
293 for (i
= 0; list
[i
] && list
[i
] != hWnd
; i
++)
295 if (GetWindow( list
[i
], GW_OWNER
)) continue;
296 if ((GetWindowLongPtrW( list
[i
], GWL_STYLE
) & dwStyleMask
) != WS_VISIBLE
) continue;
298 if (bNext
) goto found
;
301 HeapFree( GetProcessHeap(), 0, list
);
305 /**********************************************************************
306 * MDI_CalcDefaultChildPos
308 * It seems that the default height is about 2/3 of the client rect
310 void MDI_CalcDefaultChildPos( HWND hwndClient
, INT total
, LPPOINT lpPos
, INT delta
, UINT
*id
)
314 INT spacing
= GetSystemMetrics(SM_CYCAPTION
) + GetSystemMetrics(SM_CYFRAME
) - 1;
316 if (total
< 0) /* we are called from CreateWindow */
318 MDICLIENTINFO
*ci
= get_client_info(hwndClient
);
319 total
= ci
? ci
->nTotalCreated
: 0; // Do not portsync wine
320 *id
= ci
? ci
->idFirstChild
+ ci
->nActiveChildren
: 0; // Do not portsync wine
321 TRACE("MDI child id %04x\n", *id
);
324 GetClientRect( hwndClient
, &rect
);
325 if( rect
.bottom
- rect
.top
- delta
>= spacing
)
326 rect
.bottom
-= delta
;
328 nstagger
= (rect
.bottom
- rect
.top
)/(3 * spacing
);
329 lpPos
[1].x
= (rect
.right
- rect
.left
- nstagger
* spacing
);
330 lpPos
[1].y
= (rect
.bottom
- rect
.top
- nstagger
* spacing
);
331 lpPos
[0].x
= lpPos
[0].y
= spacing
* (total
%(nstagger
+1));
334 /**********************************************************************
337 static LRESULT
MDISetMenu( HWND hwnd
, HMENU hmenuFrame
,
341 HWND hwndFrame
= GetParent(hwnd
);
343 TRACE("%p, frame menu %p, window menu %p\n", hwnd
, hmenuFrame
, hmenuWindow
);
345 if (hmenuFrame
&& !IsMenu(hmenuFrame
))
347 WARN("hmenuFrame is not a menu handle\n");
351 if (hmenuWindow
&& !IsMenu(hmenuWindow
))
353 WARN("hmenuWindow is not a menu handle\n");
357 if (!(ci
= get_client_info( hwnd
))) return 0;
359 TRACE("old frame menu %p, old window menu %p\n", ci
->hFrameMenu
, ci
->hWindowMenu
);
363 if (hmenuFrame
== ci
->hFrameMenu
) return (LRESULT
)hmenuFrame
;
365 if (ci
->hwndChildMaximized
)
366 MDI_RestoreFrameMenu( hwndFrame
, ci
->hwndChildMaximized
, ci
->hBmpClose
);
369 if( hmenuWindow
&& hmenuWindow
!= ci
->hWindowMenu
)
371 /* delete menu items from ci->hWindowMenu
372 * and add them to hmenuWindow */
373 /* Agent newsreader calls this function with ci->hWindowMenu == NULL */
374 if( ci
->hWindowMenu
&& ci
->nActiveChildren
)
376 UINT nActiveChildren_old
= ci
->nActiveChildren
;
378 /* Remove all items from old Window menu */
379 ci
->nActiveChildren
= 0;
382 ci
->hWindowMenu
= hmenuWindow
;
384 /* Add items to the new Window menu */
385 ci
->nActiveChildren
= nActiveChildren_old
;
389 ci
->hWindowMenu
= hmenuWindow
;
394 SetMenu(hwndFrame
, hmenuFrame
);
395 if( hmenuFrame
!= ci
->hFrameMenu
)
397 HMENU oldFrameMenu
= ci
->hFrameMenu
;
399 ci
->hFrameMenu
= hmenuFrame
;
400 if (ci
->hwndChildMaximized
)
401 MDI_AugmentFrameMenu( hwndFrame
, ci
->hwndChildMaximized
);
403 return (LRESULT
)oldFrameMenu
;
410 /**********************************************************************
413 static LRESULT
MDI_RefreshMenu(MDICLIENTINFO
*ci
)
415 UINT i
, count
, visible
, id
;
416 WCHAR buf
[MDI_MAXTITLELENGTH
];
418 TRACE("children %u, window menu %p\n", ci
->nActiveChildren
, ci
->hWindowMenu
);
420 if (!ci
->hWindowMenu
)
423 if (!IsMenu(ci
->hWindowMenu
))
425 WARN("Window menu handle %p is no longer valid\n", ci
->hWindowMenu
);
429 /* Windows finds the last separator in the menu, and if after it
430 * there is a menu item with MDI magic ID removes all existing
431 * menu items after it, and then adds visible MDI children.
433 count
= GetMenuItemCount(ci
->hWindowMenu
);
434 for (i
= 0; i
< count
; i
++)
438 memset(&mii
, 0, sizeof(mii
));
439 mii
.cbSize
= sizeof(mii
);
440 mii
.fMask
= MIIM_TYPE
;
441 if (GetMenuItemInfoW(ci
->hWindowMenu
, i
, TRUE
, &mii
))
443 if (mii
.fType
& MF_SEPARATOR
)
445 /* Windows checks only ID of the menu item */
446 memset(&mii
, 0, sizeof(mii
));
447 mii
.cbSize
= sizeof(mii
);
449 if (GetMenuItemInfoW(ci
->hWindowMenu
, i
+ 1, TRUE
, &mii
))
451 if (mii
.wID
== ci
->idFirstChild
)
453 TRACE("removing %u items including separator\n", count
- i
);
454 while (RemoveMenu(ci
->hWindowMenu
, i
, MF_BYPOSITION
))
465 for (i
= 0; i
< ci
->nActiveChildren
; i
++)
467 if (GetWindowLongPtrW(ci
->child
[i
], GWL_STYLE
) & WS_VISIBLE
)
469 id
= ci
->idFirstChild
+ visible
;
471 if (visible
== MDI_MOREWINDOWSLIMIT
)
473 LoadStringW(User32Instance
, IDS_MDI_MOREWINDOWS
, buf
, sizeof(buf
)/sizeof(WCHAR
));
474 AppendMenuW(ci
->hWindowMenu
, MF_STRING
, id
, buf
);
479 /* Visio expects that separator has id 0 */
480 AppendMenuW(ci
->hWindowMenu
, MF_SEPARATOR
, 0, NULL
);
484 SetWindowLongPtrW(ci
->child
[i
], GWLP_ID
, id
);
487 buf
[1] = '0' + visible
;
489 InternalGetWindowText(ci
->child
[i
], buf
+ 3, sizeof(buf
)/sizeof(WCHAR
) - 3);
490 TRACE("Adding %p, id %u %s\n", ci
->child
[i
], id
, debugstr_w(buf
));
491 AppendMenuW(ci
->hWindowMenu
, MF_STRING
, id
, buf
);
493 if (ci
->child
[i
] == ci
->hwndActiveChild
)
494 CheckMenuItem(ci
->hWindowMenu
, id
, MF_CHECKED
);
497 TRACE("MDI child %p is not visible, skipping\n", ci
->child
[i
]);
500 return (LRESULT
)ci
->hFrameMenu
;
504 /* ------------------ MDI child window functions ---------------------- */
506 /**********************************************************************
507 * MDI_ChildGetMinMaxInfo
509 * Note: The rule here is that client rect of the maximized MDI child
510 * is equal to the client rect of the MDI client window.
512 static void MDI_ChildGetMinMaxInfo( HWND client
, HWND hwnd
, MINMAXINFO
* lpMinMax
)
516 GetClientRect( client
, &rect
);
517 AdjustWindowRectEx( &rect
, GetWindowLongPtrW( hwnd
, GWL_STYLE
),
518 0, GetWindowLongPtrW( hwnd
, GWL_EXSTYLE
));
520 lpMinMax
->ptMaxSize
.x
= rect
.right
-= rect
.left
;
521 lpMinMax
->ptMaxSize
.y
= rect
.bottom
-= rect
.top
;
523 lpMinMax
->ptMaxPosition
.x
= rect
.left
;
524 lpMinMax
->ptMaxPosition
.y
= rect
.top
;
526 TRACE("max rect %s\n", wine_dbgstr_rect(&rect
));
529 /**********************************************************************
530 * MDI_SwitchActiveChild
532 * Note: SetWindowPos sends WM_CHILDACTIVATE to the child window that is
535 static void MDI_SwitchActiveChild( MDICLIENTINFO
*ci
, HWND hwndTo
, BOOL activate
)
539 hwndPrev
= ci
->hwndActiveChild
;
541 TRACE("from %p, to %p\n", hwndPrev
, hwndTo
);
543 if ( hwndTo
!= hwndPrev
)
545 BOOL was_zoomed
= IsZoomed(hwndPrev
);
549 /* restore old MDI child */
550 SendMessageW( hwndPrev
, WM_SETREDRAW
, FALSE
, 0 );
551 ShowWindow( hwndPrev
, SW_RESTORE
);
552 SendMessageW( hwndPrev
, WM_SETREDRAW
, TRUE
, 0 );
554 /* activate new MDI child */
555 SetWindowPos( hwndTo
, HWND_TOP
, 0, 0, 0, 0, SWP_NOMOVE
| SWP_NOSIZE
);
556 /* maximize new MDI child */
557 ShowWindow( hwndTo
, SW_MAXIMIZE
);
559 /* activate new MDI child */
560 SetWindowPos( hwndTo
, HWND_TOP
, 0, 0, 0, 0, SWP_NOMOVE
| SWP_NOSIZE
| (activate
? 0 : SWP_NOACTIVATE
) );
565 /**********************************************************************
568 static LRESULT
MDIDestroyChild( HWND client
, MDICLIENTINFO
*ci
,
569 HWND child
, BOOL flagDestroy
)
573 TRACE("# of managed children %u\n", ci
->nActiveChildren
);
575 if( child
== ci
->hwndActiveChild
)
577 HWND next
= MDI_GetWindow(ci
, child
, TRUE
, 0);
579 MDI_SwitchActiveChild(ci
, next
, TRUE
);
582 ShowWindow(child
, SW_HIDE
);
583 if (child
== ci
->hwndChildMaximized
)
585 HWND frame
= GetParent(client
);
586 MDI_RestoreFrameMenu(frame
, child
, ci
->hBmpClose
);
587 ci
->hwndChildMaximized
= 0;
588 MDI_UpdateFrameText(frame
, client
, TRUE
, NULL
);
591 MDI_ChildActivate(client
, 0);
595 for (i
= 0; i
< ci
->nActiveChildren
; i
++)
597 if (ci
->child
[i
] == child
)
599 HWND
*new_child
= HeapAlloc(GetProcessHeap(), 0, (ci
->nActiveChildren
- 1) * sizeof(HWND
));
600 if (new_child
!= NULL
)
602 memcpy(new_child
, ci
->child
, i
* sizeof(HWND
));
603 if (i
+ 1 < ci
->nActiveChildren
)
604 memcpy(new_child
+ i
, ci
->child
+ i
+ 1, (ci
->nActiveChildren
- i
- 1) * sizeof(HWND
));
605 HeapFree(GetProcessHeap(), 0, ci
->child
);
606 ci
->child
= new_child
;
611 for (c
= i
; c
< ci
->nActiveChildren
- 1; c
++)
613 ci
->child
[c
] = ci
->child
[c
+1];
617 ci
->nActiveChildren
--;
624 SendMessageW(client
, WM_MDIREFRESHMENU
, 0, 0);
625 MDI_PostUpdate(GetParent(child
), ci
, SB_BOTH
+1);
626 DestroyWindow(child
);
629 TRACE("child destroyed - %p\n", child
);
634 /**********************************************************************
637 * Called in response to WM_CHILDACTIVATE, or when last MDI child
638 * is being deactivated.
640 static LONG
MDI_ChildActivate( HWND client
, HWND child
)
642 MDICLIENTINFO
*clientInfo
;
643 HWND prevActiveWnd
, frame
;
644 BOOL isActiveFrameWnd
;
646 clientInfo
= get_client_info( client
);
648 if (clientInfo
->hwndActiveChild
== child
) return 0;
650 TRACE("%p\n", child
);
652 frame
= GetParent(client
);
653 isActiveFrameWnd
= (GetActiveWindow() == frame
);
654 prevActiveWnd
= clientInfo
->hwndActiveChild
;
656 /* deactivate prev. active child */
659 SendMessageW( prevActiveWnd
, WM_NCACTIVATE
, FALSE
, 0L );
660 SendMessageW( prevActiveWnd
, WM_MDIACTIVATE
, (WPARAM
)prevActiveWnd
, (LPARAM
)child
);
663 MDI_SwitchActiveChild( clientInfo
, child
, FALSE
);
664 clientInfo
->hwndActiveChild
= child
;
666 MDI_RefreshMenu(clientInfo
);
668 if( isActiveFrameWnd
)
670 SendMessageW( child
, WM_NCACTIVATE
, TRUE
, 0L);
671 /* Let the client window manage focus for children, but if the focus
672 * is already on the client (for instance this is the 1st child) then
673 * SetFocus won't work. It appears that Windows sends WM_SETFOCUS
674 * manually in this case.
676 if (SetFocus(client
) == client
)
677 SendMessageW( client
, WM_SETFOCUS
, (WPARAM
)client
, 0 );
680 SendMessageW( child
, WM_MDIACTIVATE
, (WPARAM
)prevActiveWnd
, (LPARAM
)child
);
684 /* -------------------- MDI client window functions ------------------- */
686 /**********************************************************************
687 * CreateMDIMenuBitmap
689 static HBITMAP
CreateMDIMenuBitmap(void)
691 HDC hDCSrc
= CreateCompatibleDC(0);
692 HDC hDCDest
= CreateCompatibleDC(hDCSrc
);
693 HBITMAP hbClose
= LoadBitmapW(0, MAKEINTRESOURCEW(OBM_OLD_CLOSE
) );
695 HBITMAP hobjSrc
, hobjDest
;
697 hobjSrc
= SelectObject(hDCSrc
, hbClose
);
698 hbCopy
= CreateCompatibleBitmap(hDCSrc
,GetSystemMetrics(SM_CXSIZE
),GetSystemMetrics(SM_CYSIZE
));
699 hobjDest
= SelectObject(hDCDest
, hbCopy
);
701 BitBlt(hDCDest
, 0, 0, GetSystemMetrics(SM_CXSIZE
), GetSystemMetrics(SM_CYSIZE
),
702 hDCSrc
, GetSystemMetrics(SM_CXSIZE
), 0, SRCCOPY
);
704 SelectObject(hDCSrc
, hobjSrc
);
705 DeleteObject(hbClose
);
708 hobjSrc
= SelectObject( hDCDest
, GetStockObject(BLACK_PEN
) );
710 MoveToEx( hDCDest
, GetSystemMetrics(SM_CXSIZE
) - 1, 0, NULL
);
711 LineTo( hDCDest
, GetSystemMetrics(SM_CXSIZE
) - 1, GetSystemMetrics(SM_CYSIZE
) - 1);
713 SelectObject(hDCDest
, hobjSrc
);
714 SelectObject(hDCDest
, hobjDest
);
720 /**********************************************************************
723 static LONG
MDICascade( HWND client
, MDICLIENTINFO
*ci
)
726 BOOL has_icons
= FALSE
;
729 if (ci
->hwndChildMaximized
)
730 SendMessageW(client
, WM_MDIRESTORE
, (WPARAM
)ci
->hwndChildMaximized
, 0);
732 if (ci
->nActiveChildren
== 0) return 0;
734 if (!(win_array
= WIN_ListChildren( client
))) return 0;
736 /* remove all the windows we don't want */
737 for (i
= total
= 0; win_array
[i
]; i
++)
739 if (!IsWindowVisible( win_array
[i
] )) continue;
740 if (GetWindow( win_array
[i
], GW_OWNER
)) continue; /* skip owned windows */
741 if (IsIconic( win_array
[i
] ))
746 win_array
[total
++] = win_array
[i
];
748 win_array
[total
] = 0;
752 INT delta
= 0, n
= 0, i
;
754 if (has_icons
) delta
= GetSystemMetrics(SM_CYICONSPACING
) + GetSystemMetrics(SM_CYICON
);
756 /* walk the list (backwards) and move windows */
757 for (i
= total
- 1; i
>= 0; i
--)
760 LONG posOptions
= SWP_DRAWFRAME
| SWP_NOACTIVATE
| SWP_NOZORDER
;
762 MDI_CalcDefaultChildPos(client
, n
++, pos
, delta
, NULL
);
763 TRACE("move %p to (%ld,%ld) size [%ld,%ld]\n",
764 win_array
[i
], pos
[0].x
, pos
[0].y
, pos
[1].x
, pos
[1].y
);
765 style
= GetWindowLongW(win_array
[i
], GWL_STYLE
);
767 if (!(style
& WS_SIZEBOX
)) posOptions
|= SWP_NOSIZE
;
768 SetWindowPos( win_array
[i
], 0, pos
[0].x
, pos
[0].y
, pos
[1].x
, pos
[1].y
,
772 HeapFree( GetProcessHeap(), 0, win_array
);
774 if (has_icons
) ArrangeIconicWindows( client
);
778 /**********************************************************************
781 static void MDITile( HWND client
, MDICLIENTINFO
*ci
, WPARAM wParam
)
784 int i
, total
, rows
, columns
;
785 BOOL has_icons
= FALSE
;
787 if (ci
->hwndChildMaximized
)
788 SendMessageW(client
, WM_MDIRESTORE
, (WPARAM
)ci
->hwndChildMaximized
, 0);
790 if (ci
->nActiveChildren
== 0) return;
792 if (!(win_array
= WIN_ListChildren( client
))) return;
794 /* remove all the windows we don't want */
795 for (i
= total
= rows
= 0; win_array
[i
]; i
++)
797 if (!IsWindowVisible( win_array
[i
] )) continue;
798 if (GetWindow( win_array
[i
], GW_OWNER
)) continue; /* skip owned windows (icon titles) */
799 if (IsIconic( win_array
[i
] ))
804 if ((wParam
& MDITILE_SKIPDISABLED
) && !IsWindowEnabled( win_array
[i
] )) continue;
805 if(total
== (rows
* (rows
+ 2))) rows
++; /* total+1 == (rows+1)*(rows+1) */
806 win_array
[total
++] = win_array
[i
];
808 win_array
[total
] = 0;
810 TRACE("%u windows to tile\n", total
);
814 HWND
*pWnd
= win_array
;
816 int x
, y
, xsize
, ysize
;
819 GetClientRect(client
,&rect
);
820 columns
= total
/rows
;
821 //while(total < rows*columns) rows++;
823 if( wParam
& MDITILE_HORIZONTAL
) /* version >= 3.1 */
826 rows
= columns
; /* exchange r and c */
832 y
= rect
.bottom
- 2 * GetSystemMetrics(SM_CYICONSPACING
) - GetSystemMetrics(SM_CYICON
);
833 rect
.bottom
= ( y
- GetSystemMetrics(SM_CYICON
) < rect
.top
)? rect
.bottom
: y
;
836 ysize
= rect
.bottom
/ rows
;
837 xsize
= rect
.right
/ columns
;
839 for (x
= i
= 0, c
= 1; c
<= columns
&& *pWnd
; c
++)
844 ysize
= rect
.bottom
/ rows
;
848 for (r
= 1; r
<= rows
&& *pWnd
; r
++, i
++)
850 LONG posOptions
= SWP_DRAWFRAME
| SWP_NOACTIVATE
| SWP_NOZORDER
;
851 LONG style
= GetWindowLongW(win_array
[i
], GWL_STYLE
);
852 if (!(style
& WS_SIZEBOX
)) posOptions
|= SWP_NOSIZE
;
854 SetWindowPos(*pWnd
, 0, x
, y
, xsize
, ysize
, posOptions
);
861 HeapFree( GetProcessHeap(), 0, win_array
);
862 if (has_icons
) ArrangeIconicWindows( client
);
865 /* ----------------------- Frame window ---------------------------- */
868 /**********************************************************************
869 * MDI_AugmentFrameMenu
871 static BOOL
MDI_AugmentFrameMenu( HWND frame
, HWND hChild
)
873 HMENU menu
= GetMenu( frame
);
875 HBITMAP hSysMenuBitmap
= 0;
880 TRACE("frame %p,child %p\n",frame
,hChild
);
882 if( !menu
) return FALSE
;
884 /* if the system buttons already exist do not add them again */
885 nItems
= GetMenuItemCount(menu
) - 1;
886 iId
= GetMenuItemID(menu
,nItems
) ;
887 if (iId
== SC_RESTORE
|| iId
== SC_CLOSE
)
889 ERR("system buttons already exist\n");
893 /* create a copy of sysmenu popup and insert it into frame menu bar */
894 if (!(hSysPopup
= GetSystemMenu(hChild
, FALSE
)))
896 TRACE("child %p doesn't have a system menu\n", hChild
);
900 AppendMenuW(menu
, MF_HELP
| MF_BITMAP
,
901 SC_CLOSE
, is_close_enabled(hChild
, hSysPopup
) ?
902 (LPCWSTR
)HBMMENU_MBAR_CLOSE
: (LPCWSTR
)HBMMENU_MBAR_CLOSE_D
);
903 AppendMenuW(menu
, MF_HELP
| MF_BITMAP
,
904 SC_RESTORE
, (LPCWSTR
)HBMMENU_MBAR_RESTORE
);
905 AppendMenuW(menu
, MF_HELP
| MF_BITMAP
,
906 SC_MINIMIZE
, (LPCWSTR
)HBMMENU_MBAR_MINIMIZE
) ;
908 /* The system menu is replaced by the child icon */
909 hIcon
= (HICON
)SendMessageW(hChild
, WM_GETICON
, ICON_SMALL
, 0);
911 hIcon
= (HICON
)GetClassLongPtrW(hChild
, GCLP_HICONSM
);
913 hIcon
= (HICON
)SendMessageW(hChild
, WM_GETICON
, ICON_BIG
, 0);
915 hIcon
= (HICON
)GetClassLongPtrW(hChild
, GCLP_HICON
);
917 hIcon
= LoadImageW(0, (LPWSTR
)IDI_WINLOGO
, IMAGE_ICON
, GetSystemMetrics(SM_CXSMICON
),
918 GetSystemMetrics(SM_CYSMICON
), LR_DEFAULTCOLOR
);
922 HBITMAP hBitmap
, hOldBitmap
;
924 HDC hdc
= GetDC(hChild
);
929 cx
= GetSystemMetrics(SM_CXSMICON
);
930 cy
= GetSystemMetrics(SM_CYSMICON
);
931 hMemDC
= CreateCompatibleDC(hdc
);
932 hBitmap
= CreateCompatibleBitmap(hdc
, cx
, cy
);
933 hOldBitmap
= SelectObject(hMemDC
, hBitmap
);
934 SetMapMode(hMemDC
, MM_TEXT
);
935 hBrush
= CreateSolidBrush(GetSysColor(COLOR_MENU
));
936 DrawIconEx(hMemDC
, 0, 0, hIcon
, cx
, cy
, 0, hBrush
, DI_NORMAL
);
937 SelectObject (hMemDC
, hOldBitmap
);
938 DeleteObject(hBrush
);
940 ReleaseDC(hChild
, hdc
);
941 hSysMenuBitmap
= hBitmap
;
945 if( !InsertMenuA(menu
,0,MF_BYPOSITION
| MF_BITMAP
| MF_POPUP
,
946 (UINT_PTR
)hSysPopup
, (LPSTR
)hSysMenuBitmap
))
948 TRACE("not inserted\n");
949 DestroyMenu(hSysPopup
);
953 EnableMenuItem(hSysPopup
, SC_SIZE
, MF_BYCOMMAND
| MF_GRAYED
);
954 EnableMenuItem(hSysPopup
, SC_MOVE
, MF_BYCOMMAND
| MF_GRAYED
);
955 EnableMenuItem(hSysPopup
, SC_MAXIMIZE
, MF_BYCOMMAND
| MF_GRAYED
);
956 SetMenuDefaultItem(hSysPopup
, SC_CLOSE
, FALSE
);
964 /**********************************************************************
965 * MDI_RestoreFrameMenu
967 static BOOL
MDI_RestoreFrameMenu( HWND frame
, HWND hChild
, HBITMAP hBmpClose
)
969 MENUITEMINFOW menuInfo
;
970 HMENU menu
= GetMenu( frame
);
974 TRACE("frame %p,child %p\n",frame
, hChild
);
976 if (!menu
) return FALSE
;
978 /* if there is no system buttons then nothing to do */
979 nItems
= GetMenuItemCount(menu
) - 1;
980 iId
= GetMenuItemID(menu
, nItems
);
981 if ( !(iId
== SC_RESTORE
|| iId
== SC_CLOSE
) )
983 ERR("no system buttons then nothing to do\n");
988 * Remove the system menu, If that menu is the icon of the window
989 * as it is in win95, we have to delete the bitmap.
991 memset(&menuInfo
, 0, sizeof(menuInfo
));
992 menuInfo
.cbSize
= sizeof(menuInfo
);
993 menuInfo
.fMask
= MIIM_DATA
| MIIM_TYPE
| MIIM_BITMAP
;
995 GetMenuItemInfoW(menu
,
1000 RemoveMenu(menu
,0,MF_BYPOSITION
);
1002 if ( (menuInfo
.fType
& MFT_BITMAP
) &&
1003 (menuInfo
.dwTypeData
!= 0) &&
1004 (menuInfo
.dwTypeData
!= (LPWSTR
)hBmpClose
) )
1006 DeleteObject(menuInfo
.dwTypeData
);
1009 if ( menuInfo
.hbmpItem
!= 0 )
1010 DeleteObject(menuInfo
.hbmpItem
);
1013 DeleteMenu(menu
, SC_CLOSE
, MF_BYCOMMAND
);
1015 DeleteMenu(menu
, SC_RESTORE
, MF_BYCOMMAND
);
1017 DeleteMenu(menu
, SC_MINIMIZE
, MF_BYCOMMAND
);
1025 /**********************************************************************
1026 * MDI_UpdateFrameText
1028 * used when child window is maximized/restored
1030 * Note: lpTitle can be NULL
1032 static void MDI_UpdateFrameText( HWND frame
, HWND hClient
, BOOL repaint
, LPCWSTR lpTitle
)
1034 WCHAR lpBuffer
[MDI_MAXTITLELENGTH
+1];
1035 MDICLIENTINFO
*ci
= get_client_info( hClient
);
1037 TRACE("frameText %s\n", debugstr_w(lpTitle
));
1041 if (!lpTitle
&& !ci
->frameTitle
) /* first time around, get title from the frame window */
1043 GetWindowTextW( frame
, lpBuffer
, sizeof(lpBuffer
)/sizeof(WCHAR
) );
1047 /* store new "default" title if lpTitle is not NULL */
1050 HeapFree( GetProcessHeap(), 0, ci
->frameTitle
);
1051 if ((ci
->frameTitle
= HeapAlloc( GetProcessHeap(), 0, (strlenW(lpTitle
)+1)*sizeof(WCHAR
))))
1052 strcpyW( ci
->frameTitle
, lpTitle
);
1057 if (ci
->hwndChildMaximized
)
1059 /* combine frame title and child title if possible */
1061 static const WCHAR lpBracket
[] = {' ','-',' ','[',0};
1062 static const WCHAR lpBracket2
[] = {']',0};
1063 int i_frame_text_length
= strlenW(ci
->frameTitle
);
1065 lstrcpynW( lpBuffer
, ci
->frameTitle
, MDI_MAXTITLELENGTH
);
1067 if( i_frame_text_length
+ 6 < MDI_MAXTITLELENGTH
)
1069 strcatW( lpBuffer
, lpBracket
);
1070 if (GetWindowTextW( ci
->hwndActiveChild
, lpBuffer
+ i_frame_text_length
+ 4,
1071 MDI_MAXTITLELENGTH
- i_frame_text_length
- 5 ))
1072 strcatW( lpBuffer
, lpBracket2
);
1074 lpBuffer
[i_frame_text_length
] = 0; /* remove bracket */
1079 lstrcpynW(lpBuffer
, ci
->frameTitle
, MDI_MAXTITLELENGTH
+1 );
1085 DefWindowProcW( frame
, WM_SETTEXT
, 0, (LPARAM
)lpBuffer
);
1089 if (!NtUserCallTwoParam((DWORD_PTR
)frame
,DC_ACTIVE
,TWOPARAM_ROUTINE_REDRAWTITLE
))
1090 SetWindowPos( frame
, 0,0,0,0,0, SWP_FRAMECHANGED
|
1091 SWP_NOSIZE
| SWP_NOMOVE
| SWP_NOACTIVATE
| SWP_NOZORDER
);
1096 /* ----------------------------- Interface ---------------------------- */
1099 /**********************************************************************
1100 * MDIClientWndProc_common
1102 LRESULT WINAPI
MDIClientWndProc_common( HWND hwnd
, UINT message
, WPARAM wParam
, LPARAM lParam
, BOOL unicode
)
1104 MDICLIENTINFO
*ci
= NULL
;
1106 TRACE("%p %04x (%s) %08lx %08lx\n", hwnd
, message
, SPY_GetMsgName(message
, hwnd
), wParam
, lParam
);
1108 if (!(ci
= get_client_info( hwnd
)))
1110 if (message
== WM_NCCREATE
)
1113 if (!(ci
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(*ci
))))
1115 SetWindowLongPtrW( hwnd
, GWLP_MDIWND
, (LONG_PTR
)ci
);
1117 NtUserSetWindowFNID( hwnd
, FNID_MDICLIENT
); // wine uses WIN_ISMDICLIENT
1119 if (message
== WM_NCCREATE
) win_set_flags( hwnd
, WIN_ISMDICLIENT
, 0 );
1122 return unicode
? DefWindowProcW( hwnd
, message
, wParam
, lParam
) :
1123 DefWindowProcA( hwnd
, message
, wParam
, lParam
);
1130 /* Since we are using only cs->lpCreateParams, we can safely
1131 * cast to LPCREATESTRUCTA here */
1132 LPCREATESTRUCTA cs
= (LPCREATESTRUCTA
)lParam
;
1133 LPCLIENTCREATESTRUCT ccs
= (LPCLIENTCREATESTRUCT
)cs
->lpCreateParams
;
1135 ci
->hWindowMenu
= ccs
->hWindowMenu
;
1136 ci
->idFirstChild
= ccs
->idFirstChild
;
1137 ci
->hwndChildMaximized
= 0;
1139 ci
->nActiveChildren
= 0;
1140 ci
->nTotalCreated
= 0;
1141 ci
->frameTitle
= NULL
;
1143 ci
->hFrameMenu
= GetMenu(cs
->hwndParent
);
1145 if (!ci
->hBmpClose
) ci
->hBmpClose
= CreateMDIMenuBitmap();
1147 TRACE("Client created: hwnd %p, Window menu %p, idFirst = %04x\n",
1148 hwnd
, ci
->hWindowMenu
, ci
->idFirstChild
);
1154 if( ci
->hwndChildMaximized
)
1155 MDI_RestoreFrameMenu(GetParent(hwnd
), ci
->hwndChildMaximized
, ci
->hBmpClose
);
1157 ci
->nActiveChildren
= 0;
1158 MDI_RefreshMenu(ci
);
1160 HeapFree( GetProcessHeap(), 0, ci
->child
);
1161 HeapFree( GetProcessHeap(), 0, ci
->frameTitle
);
1163 HeapFree( GetProcessHeap(), 0, ci
);
1164 SetWindowLongPtrW( hwnd
, GWLP_MDIWND
, 0 );
1172 NtUserSetWindowFNID(hwnd
, FNID_DESTROY
);
1177 case WM_MDIACTIVATE
:
1179 if( ci
->hwndActiveChild
!= (HWND
)wParam
)
1180 SetWindowPos((HWND
)wParam
, 0,0,0,0,0, SWP_NOSIZE
| SWP_NOMOVE
);
1185 return MDICascade(hwnd
, ci
);
1194 MDICREATESTRUCTW
*csW
= (MDICREATESTRUCTW
*)lParam
;
1195 child
= CreateWindowExW(WS_EX_MDICHILD
, csW
->szClass
,
1196 csW
->szTitle
, csW
->style
,
1197 csW
->x
, csW
->y
, csW
->cx
, csW
->cy
,
1198 hwnd
, 0, csW
->hOwner
,
1199 (LPVOID
)csW
->lParam
);
1203 MDICREATESTRUCTA
*csA
= (MDICREATESTRUCTA
*)lParam
;
1204 child
= CreateWindowExA(WS_EX_MDICHILD
, csA
->szClass
,
1205 csA
->szTitle
, csA
->style
,
1206 csA
->x
, csA
->y
, csA
->cx
, csA
->cy
,
1207 hwnd
, 0, csA
->hOwner
,
1208 (LPVOID
)csA
->lParam
);
1210 return (LRESULT
)child
;
1215 return MDIDestroyChild( hwnd
, ci
, (HWND
)wParam
, TRUE
);
1217 case WM_MDIGETACTIVE
:
1218 if (lParam
) *(BOOL
*)lParam
= IsZoomed(ci
->hwndActiveChild
);
1219 return (LRESULT
)ci
->hwndActiveChild
;
1221 case WM_MDIICONARRANGE
:
1222 ci
->mdiFlags
|= MDIF_NEEDUPDATE
;
1223 ArrangeIconicWindows( hwnd
);
1224 ci
->sbRecalc
= SB_BOTH
+1;
1226 PostMessageA( hwnd
, WM_MDICALCCHILDSCROLL
, 0, 0 ); //// ReactOS: Post not send!
1228 SendMessageW( hwnd
, WM_MDICALCCHILDSCROLL
, 0, 0 );
1232 case WM_MDIMAXIMIZE
:
1233 ShowWindow( (HWND
)wParam
, SW_MAXIMIZE
);
1236 case WM_MDINEXT
: /* lParam != 0 means previous window */
1238 HWND hwnd
= wParam
? WIN_GetFullHandle((HWND
)wParam
) : ci
->hwndActiveChild
;
1239 HWND next
= MDI_GetWindow( ci
, hwnd
, !lParam
, 0 );
1240 MDI_SwitchActiveChild( ci
, next
, TRUE
);
1242 SetWindowPos(hwnd
, HWND_BOTTOM
, 0, 0, 0, 0, SWP_NOSIZE
| SWP_NOMOVE
| SWP_NOACTIVATE
);
1247 ShowWindow( (HWND
)wParam
, SW_SHOWNORMAL
);
1251 return MDISetMenu( hwnd
, (HMENU
)wParam
, (HMENU
)lParam
);
1253 case WM_MDIREFRESHMENU
:
1254 return MDI_RefreshMenu( ci
);
1257 ci
->mdiFlags
|= MDIF_NEEDUPDATE
;
1258 ShowScrollBar( hwnd
, SB_BOTH
, FALSE
);
1259 MDITile( hwnd
, ci
, wParam
);
1260 ci
->mdiFlags
&= ~MDIF_NEEDUPDATE
;
1265 ci
->mdiFlags
|= MDIF_NEEDUPDATE
;
1266 ScrollChildren( hwnd
, message
, wParam
, lParam
);
1267 ci
->mdiFlags
&= ~MDIF_NEEDUPDATE
;
1271 if (ci
->hwndActiveChild
&& !IsIconic( ci
->hwndActiveChild
))
1272 SetFocus( ci
->hwndActiveChild
);
1276 if( ci
->hwndActiveChild
)
1277 SendMessageW(ci
->hwndActiveChild
, message
, wParam
, lParam
);
1280 case WM_PARENTNOTIFY
:
1281 switch (LOWORD(wParam
))
1284 if (GetWindowLongPtrW((HWND
)lParam
, GWL_EXSTYLE
) & WS_EX_MDICHILD
)
1286 // ReactOS See rev 33503
1288 ci
->child
= HeapAlloc(GetProcessHeap(), 0, sizeof(HWND
));
1290 ci
->child
= HeapReAlloc(GetProcessHeap(), 0, ci
->child
, sizeof(HWND
) * (ci
->nActiveChildren
+ 1));
1292 TRACE("Adding MDI child %p, # of children %d\n",
1293 (HWND
)lParam
, ci
->nActiveChildren
);
1295 if (ci
->child
!= NULL
)
1297 ci
->child
[ci
->nActiveChildren
] = (HWND
)lParam
;
1298 ci
->nTotalCreated
++;
1299 ci
->nActiveChildren
++;
1304 case WM_LBUTTONDOWN
:
1308 pt
.x
= (short)LOWORD(lParam
);
1309 pt
.y
= (short)HIWORD(lParam
);
1310 child
= ChildWindowFromPoint(hwnd
, pt
);
1312 TRACE("notification from %p (%li,%li)\n",child
,pt
.x
,pt
.y
);
1314 if( child
&& child
!= hwnd
&& child
!= ci
->hwndActiveChild
)
1315 SetWindowPos(child
, 0,0,0,0,0, SWP_NOSIZE
| SWP_NOMOVE
);
1320 return MDIDestroyChild( hwnd
, ci
, WIN_GetFullHandle( (HWND
)lParam
), FALSE
);
1325 if( ci
->hwndActiveChild
&& IsZoomed(ci
->hwndActiveChild
) )
1329 SetRect(&rect
, 0, 0, LOWORD(lParam
), HIWORD(lParam
));
1330 AdjustWindowRectEx(&rect
, GetWindowLongPtrA(ci
->hwndActiveChild
, GWL_STYLE
),
1331 0, GetWindowLongPtrA(ci
->hwndActiveChild
, GWL_EXSTYLE
) );
1332 MoveWindow(ci
->hwndActiveChild
, rect
.left
, rect
.top
,
1333 rect
.right
- rect
.left
, rect
.bottom
- rect
.top
, 1);
1336 MDI_PostUpdate(hwnd
, ci
, SB_BOTH
+1);
1340 case WM_MDICALCCHILDSCROLL
:
1341 if( (ci
->mdiFlags
& MDIF_NEEDUPDATE
) && ci
->sbRecalc
)
1343 CalcChildScroll(hwnd
, ci
->sbRecalc
-1);
1345 ci
->mdiFlags
&= ~MDIF_NEEDUPDATE
;
1349 return unicode
? DefWindowProcW( hwnd
, message
, wParam
, lParam
) :
1350 DefWindowProcA( hwnd
, message
, wParam
, lParam
);
1353 /***********************************************************************
1356 LRESULT WINAPI
MDIClientWndProcA( HWND hwnd
, UINT message
, WPARAM wParam
, LPARAM lParam
)
1358 if (!IsWindow(hwnd
)) return 0;
1359 return MDIClientWndProc_common( hwnd
, message
, wParam
, lParam
, FALSE
);
1362 /***********************************************************************
1365 LRESULT WINAPI
MDIClientWndProcW( HWND hwnd
, UINT message
, WPARAM wParam
, LPARAM lParam
)
1367 if (!IsWindow(hwnd
)) return 0;
1368 return MDIClientWndProc_common( hwnd
, message
, wParam
, lParam
, TRUE
);
1371 /***********************************************************************
1372 * DefFrameProcA (USER32.@)
1374 LRESULT WINAPI
DefFrameProcA( HWND hwnd
, HWND hwndMDIClient
,
1375 UINT message
, WPARAM wParam
, LPARAM lParam
)
1383 DWORD len
= MultiByteToWideChar( CP_ACP
, 0, (LPSTR
)lParam
, -1, NULL
, 0 );
1384 LPWSTR text
= HeapAlloc( GetProcessHeap(), 0, len
* sizeof(WCHAR
) );
1387 MultiByteToWideChar( CP_ACP
, 0, (LPSTR
)lParam
, -1, text
, len
);
1388 MDI_UpdateFrameText( hwnd
, hwndMDIClient
, FALSE
, text
);
1389 HeapFree( GetProcessHeap(), 0, text
);
1391 return 1; /* success. FIXME: check text length */
1398 return DefFrameProcW( hwnd
, hwndMDIClient
, message
, wParam
, lParam
);
1401 return DefWindowProcA(hwnd
, message
, wParam
, lParam
);
1405 /***********************************************************************
1406 * DefFrameProcW (USER32.@)
1408 LRESULT WINAPI
DefFrameProcW( HWND hwnd
, HWND hwndMDIClient
,
1409 UINT message
, WPARAM wParam
, LPARAM lParam
)
1411 MDICLIENTINFO
*ci
= get_client_info( hwndMDIClient
);
1413 TRACE("%p %p %04x (%s) %08lx %08lx\n", hwnd
, hwndMDIClient
, message
, SPY_GetMsgName(message
, hwnd
), wParam
, lParam
);
1421 WORD id
= LOWORD(wParam
);
1422 /* check for possible syscommands for maximized MDI child */
1423 if (id
< ci
->idFirstChild
|| id
>= ci
->idFirstChild
+ ci
->nActiveChildren
)
1425 if( (id
- 0xf000) & 0xf00f ) break;
1426 if( !ci
->hwndChildMaximized
) break;
1430 if (!is_close_enabled(ci
->hwndActiveChild
, 0)) break;
1438 return SendMessageW( ci
->hwndChildMaximized
, WM_SYSCOMMAND
,
1445 if (id
- ci
->idFirstChild
== MDI_MOREWINDOWSLIMIT
)
1446 /* User chose "More Windows..." */
1447 childHwnd
= MDI_MoreWindowsDialog(hwndMDIClient
);
1449 /* User chose one of the windows listed in the "Windows" menu */
1450 childHwnd
= MDI_GetChildByID(hwndMDIClient
, id
, ci
);
1453 SendMessageW( hwndMDIClient
, WM_MDIACTIVATE
, (WPARAM
)childHwnd
, 0 );
1459 SendMessageW(hwndMDIClient
, message
, wParam
, lParam
);
1463 MDI_UpdateFrameText( hwnd
, hwndMDIClient
, FALSE
, (LPWSTR
)lParam
);
1464 return 1; /* success. FIXME: check text length */
1467 SetFocus(hwndMDIClient
);
1471 MoveWindow(hwndMDIClient
, 0, 0, LOWORD(lParam
), HIWORD(lParam
), TRUE
);
1476 MDINEXTMENU
*next_menu
= (MDINEXTMENU
*)lParam
;
1478 if (!IsIconic(hwnd
) && ci
->hwndActiveChild
&& !IsZoomed(ci
->hwndActiveChild
))
1480 /* control menu is between the frame system menu and
1481 * the first entry of menu bar */
1482 // WND *wndPtr = WIN_GetPtr(hwnd);
1484 if( (wParam
== VK_LEFT
&& GetMenu(hwnd
) == next_menu
->hmenuIn
) ||
1485 (wParam
== VK_RIGHT
&& GetSubMenu(GetMenu(hwnd
), 0) == next_menu
->hmenuIn
) )
1487 // WIN_ReleasePtr(wndPtr);
1488 // wndPtr = WIN_GetPtr(ci->hwndActiveChild);
1489 next_menu
->hmenuNext
= GetSubMenu(GetMenu(ci
->hwndActiveChild
), 0);
1490 next_menu
->hwndNext
= ci
->hwndActiveChild
;
1492 // WIN_ReleasePtr(wndPtr);
1499 return DefWindowProcW( hwnd
, message
, wParam
, lParam
);
1502 /***********************************************************************
1503 * DefMDIChildProcA (USER32.@)
1505 LRESULT WINAPI
DefMDIChildProcA( HWND hwnd
, UINT message
,
1506 WPARAM wParam
, LPARAM lParam
)
1508 HWND client
= GetParent(hwnd
);
1509 MDICLIENTINFO
*ci
= get_client_info( client
);
1511 TRACE("%p %04x (%s) %08lx %08lx\n", hwnd
, message
, SPY_GetMsgName(message
, hwnd
), wParam
, lParam
);
1513 hwnd
= WIN_GetFullHandle( hwnd
);
1514 if (!ci
) return DefWindowProcA( hwnd
, message
, wParam
, lParam
);
1519 DefWindowProcA(hwnd
, message
, wParam
, lParam
);
1520 if( ci
->hwndChildMaximized
== hwnd
)
1521 MDI_UpdateFrameText( GetParent(client
), client
, TRUE
, NULL
);
1522 MDI_RefreshMenu( ci
);
1523 return 1; /* success. FIXME: check text length */
1525 case WM_GETMINMAXINFO
:
1529 case WM_CHILDACTIVATE
:
1537 return DefMDIChildProcW( hwnd
, message
, wParam
, lParam
);
1539 return DefWindowProcA(hwnd
, message
, wParam
, lParam
);
1543 /***********************************************************************
1544 * DefMDIChildProcW (USER32.@)
1546 LRESULT WINAPI
DefMDIChildProcW( HWND hwnd
, UINT message
,
1547 WPARAM wParam
, LPARAM lParam
)
1549 HWND client
= GetParent(hwnd
);
1550 MDICLIENTINFO
*ci
= get_client_info( client
);
1552 TRACE("%p %04x (%s) %08lx %08lx\n", hwnd
, message
, SPY_GetMsgName(message
, hwnd
), wParam
, lParam
);
1554 hwnd
= WIN_GetFullHandle( hwnd
);
1555 if (!ci
) return DefWindowProcW( hwnd
, message
, wParam
, lParam
);
1560 DefWindowProcW(hwnd
, message
, wParam
, lParam
);
1561 if( ci
->hwndChildMaximized
== hwnd
)
1562 MDI_UpdateFrameText( GetParent(client
), client
, TRUE
, NULL
);
1563 MDI_RefreshMenu( ci
);
1564 return 1; /* success. FIXME: check text length */
1566 case WM_GETMINMAXINFO
:
1567 MDI_ChildGetMinMaxInfo( client
, hwnd
, (MINMAXINFO
*)lParam
);
1571 return MAKELRESULT( 0, MNC_CLOSE
); /* MDI children don't have menu bars */
1574 SendMessageW( client
, WM_MDIDESTROY
, (WPARAM
)hwnd
, 0 );
1578 if (ci
->hwndActiveChild
!= hwnd
)
1579 MDI_ChildActivate( client
, hwnd
);
1582 case WM_CHILDACTIVATE
:
1583 if (IsWindowEnabled( hwnd
))
1584 MDI_ChildActivate( client
, hwnd
);
1588 switch (wParam
& 0xfff0)
1591 if( ci
->hwndChildMaximized
== hwnd
)
1598 if (ci
->hwndChildMaximized
== hwnd
)
1599 return SendMessageW( GetParent(client
), message
, wParam
, lParam
);
1602 SendMessageW( client
, WM_MDINEXT
, (WPARAM
)ci
->hwndActiveChild
, 0);
1605 SendMessageW( client
, WM_MDINEXT
, (WPARAM
)ci
->hwndActiveChild
, 1);
1612 //// Commented out r57663
1613 /*if (ci->hwndChildMaximized) ci->mdiFlags &= ~MDIF_NEEDUPDATE;
1614 else*/ MDI_PostUpdate(client
, ci
, SB_BOTH
+1);
1618 /* This is the only place where we switch to/from maximized state */
1620 TRACE("current active %p, maximized %p\n", ci
->hwndActiveChild
, ci
->hwndChildMaximized
);
1622 if( ci
->hwndChildMaximized
== hwnd
&& wParam
!= SIZE_MAXIMIZED
)
1626 ci
->hwndChildMaximized
= 0;
1628 frame
= GetParent(client
);
1629 MDI_RestoreFrameMenu( frame
, hwnd
, ci
->hBmpClose
);
1630 MDI_UpdateFrameText( frame
, client
, TRUE
, NULL
);
1633 if( wParam
== SIZE_MAXIMIZED
)
1635 HWND frame
, hMaxChild
= ci
->hwndChildMaximized
;
1637 if( hMaxChild
== hwnd
) break;
1641 SendMessageW( hMaxChild
, WM_SETREDRAW
, FALSE
, 0 );
1643 MDI_RestoreFrameMenu( GetParent(client
), hMaxChild
, ci
->hBmpClose
);
1644 ShowWindow( hMaxChild
, SW_SHOWNOACTIVATE
);
1646 SendMessageW( hMaxChild
, WM_SETREDRAW
, TRUE
, 0 );
1649 TRACE("maximizing child %p\n", hwnd
);
1651 /* keep track of the maximized window. */
1652 ci
->hwndChildMaximized
= hwnd
; /* !!! */
1654 frame
= GetParent(client
);
1655 MDI_AugmentFrameMenu( frame
, hwnd
);
1656 MDI_UpdateFrameText( frame
, client
, TRUE
, NULL
);
1659 if( wParam
== SIZE_MINIMIZED
)
1661 HWND switchTo
= MDI_GetWindow( ci
, hwnd
, TRUE
, WS_MINIMIZE
);
1663 if (!switchTo
) switchTo
= hwnd
;
1664 SendMessageW( switchTo
, WM_CHILDACTIVATE
, 0, 0 );
1667 MDI_PostUpdate(client
, ci
, SB_BOTH
+1);
1672 MDINEXTMENU
*next_menu
= (MDINEXTMENU
*)lParam
;
1673 HWND parent
= GetParent(client
);
1675 if( wParam
== VK_LEFT
) /* switch to frame system menu */
1677 // WND *wndPtr = WIN_GetPtr( parent );
1678 next_menu
->hmenuNext
= GetSubMenu( GetMenu(parent
), 0 );
1679 // WIN_ReleasePtr( wndPtr );
1681 if( wParam
== VK_RIGHT
) /* to frame menu bar */
1683 next_menu
->hmenuNext
= GetMenu(parent
);
1685 next_menu
->hwndNext
= parent
;
1692 SendMessageW( hwnd
, WM_SYSCOMMAND
, SC_KEYMENU
, VK_SPACE
);
1698 /* Remove itself from the Window menu */
1699 MDI_RefreshMenu(ci
);
1702 return DefWindowProcW(hwnd
, message
, wParam
, lParam
);
1705 /**********************************************************************
1706 * CreateMDIWindowA (USER32.@) Creates a MDI child
1709 * Success: Handle to created window
1712 HWND WINAPI
CreateMDIWindowA(
1713 LPCSTR lpClassName
, /* [in] Pointer to registered child class name */
1714 LPCSTR lpWindowName
, /* [in] Pointer to window name */
1715 DWORD dwStyle
, /* [in] Window style */
1716 INT X
, /* [in] Horizontal position of window */
1717 INT Y
, /* [in] Vertical position of window */
1718 INT nWidth
, /* [in] Width of window */
1719 INT nHeight
, /* [in] Height of window */
1720 HWND hWndParent
, /* [in] Handle to parent window */
1721 HINSTANCE hInstance
, /* [in] Handle to application instance */
1722 LPARAM lParam
) /* [in] Application-defined value */
1724 TRACE("(%s,%s,%08lx,%d,%d,%d,%d,%p,%p,%08lx)\n",
1725 debugstr_a(lpClassName
),debugstr_a(lpWindowName
),dwStyle
,X
,Y
,
1726 nWidth
,nHeight
,hWndParent
,hInstance
,lParam
);
1728 return CreateWindowExA(WS_EX_MDICHILD
, lpClassName
, lpWindowName
,
1729 dwStyle
, X
, Y
, nWidth
, nHeight
, hWndParent
,
1730 0, hInstance
, (LPVOID
)lParam
);
1733 /***********************************************************************
1734 * CreateMDIWindowW (USER32.@) Creates a MDI child
1737 * Success: Handle to created window
1740 HWND WINAPI
CreateMDIWindowW(
1741 LPCWSTR lpClassName
, /* [in] Pointer to registered child class name */
1742 LPCWSTR lpWindowName
, /* [in] Pointer to window name */
1743 DWORD dwStyle
, /* [in] Window style */
1744 INT X
, /* [in] Horizontal position of window */
1745 INT Y
, /* [in] Vertical position of window */
1746 INT nWidth
, /* [in] Width of window */
1747 INT nHeight
, /* [in] Height of window */
1748 HWND hWndParent
, /* [in] Handle to parent window */
1749 HINSTANCE hInstance
, /* [in] Handle to application instance */
1750 LPARAM lParam
) /* [in] Application-defined value */
1752 TRACE("(%s,%s,%08lx,%d,%d,%d,%d,%p,%p,%08lx)\n",
1753 debugstr_w(lpClassName
), debugstr_w(lpWindowName
), dwStyle
, X
, Y
,
1754 nWidth
, nHeight
, hWndParent
, hInstance
, lParam
);
1756 return CreateWindowExW(WS_EX_MDICHILD
, lpClassName
, lpWindowName
,
1757 dwStyle
, X
, Y
, nWidth
, nHeight
, hWndParent
,
1758 0, hInstance
, (LPVOID
)lParam
);
1761 /**********************************************************************
1762 * TranslateMDISysAccel (USER32.@)
1764 BOOL WINAPI
TranslateMDISysAccel( HWND hwndClient
, LPMSG msg
)
1766 if (msg
->message
== WM_KEYDOWN
|| msg
->message
== WM_SYSKEYDOWN
)
1768 MDICLIENTINFO
*ci
= get_client_info( hwndClient
);
1771 if (!ci
|| !IsWindowEnabled(ci
->hwndActiveChild
)) return 0;
1773 /* translate if the Ctrl key is down and Alt not. */
1775 if( (GetKeyState(VK_CONTROL
) & 0x8000) && !(GetKeyState(VK_MENU
) & 0x8000))
1777 switch( msg
->wParam
)
1781 wParam
= ( GetKeyState(VK_SHIFT
) & 0x8000 ) ? SC_NEXTWINDOW
: SC_PREVWINDOW
;
1785 if (is_close_enabled(ci
->hwndActiveChild
, 0))
1794 TRACE("wParam = %04lx\n", wParam
);
1795 SendMessageW(ci
->hwndActiveChild
, WM_SYSCOMMAND
, wParam
, msg
->wParam
);
1799 return FALSE
; /* failure */
1802 /***********************************************************************
1803 * CalcChildScroll (USER32.@)
1805 void WINAPI
CalcChildScroll( HWND hwnd
, INT scroll
)
1808 RECT childRect
, clientRect
;
1811 WINDOWINFO WindowInfo
;
1813 GetClientRect( hwnd
, &clientRect
);
1814 SetRectEmpty( &childRect
);
1816 /* The rectangle returned by GetClientRect always has 0,0 as top left
1817 * because it is in client coordinates. The rectangles returned by
1818 * GetWindowRect are in screen coordinates to make this complicated.
1820 * Apparently (in ReactOS at least) the rcClient returned by GetWindowInfo
1821 * is in screen coordinates too.
1823 WindowInfo
.cbSize
= sizeof(WindowInfo
);
1824 if (!GetWindowInfo(hwnd
, &WindowInfo
))
1826 ERR("Can't get window info\n");
1830 TRACE("CalcChildScroll 1\n");
1831 if ((list
= WIN_ListChildren( hwnd
)))
1834 for (i
= 0; list
[i
]; i
++)
1836 style
= GetWindowLongPtrW( list
[i
], GWL_STYLE
);
1837 if (style
& WS_MAXIMIZE
)
1839 HeapFree( GetProcessHeap(), 0, list
);
1840 ShowScrollBar( hwnd
, SB_BOTH
, FALSE
);
1841 ERR("CalcChildScroll 2\n");
1844 if (style
& WS_VISIBLE
)
1847 GetWindowRect( list
[i
], &rect
);
1848 OffsetRect(&rect
, -WindowInfo
.rcClient
.left
,
1849 -WindowInfo
.rcClient
.top
);
1850 //WIN_GetRectangles( list[i], COORDS_PARENT, &rect, NULL );
1851 TRACE("CalcChildScroll L\n");
1852 UnionRect( &childRect
, &rect
, &childRect
);
1855 HeapFree( GetProcessHeap(), 0, list
);
1857 UnionRect( &childRect
, &clientRect
, &childRect
);
1858 TRACE("CalcChildScroll 3\n");
1859 /* set common info values */
1860 info
.cbSize
= sizeof(info
);
1861 info
.fMask
= SIF_POS
| SIF_RANGE
| SIF_PAGE
;
1864 /* set the specific values and apply but only if window style allows */
1865 /* Note how we set nPos to 0 because we scroll the clients instead of
1866 * the window, and we set nPage to 1 bigger than the clientRect because
1867 * otherwise the scrollbar never disables. This causes a somewhat ugly
1868 * effect though while scrolling.
1870 style
= GetWindowLongW( hwnd
, GWL_STYLE
);
1875 if (style
& (WS_HSCROLL
| WS_VSCROLL
))
1877 info
.nMin
= childRect
.left
;
1878 info
.nMax
= childRect
.right
;
1879 info
.nPage
= 1 + clientRect
.right
- clientRect
.left
;
1880 //info.nMax = childRect.right - clientRect.right;
1881 //info.nPos = clientRect.left - childRect.left;
1882 SetScrollInfo(hwnd
, SB_HORZ
, &info
, TRUE
);
1884 if (scroll
== SB_HORZ
) break;
1887 if (style
& (WS_HSCROLL
| WS_VSCROLL
))
1889 info
.nMin
= childRect
.top
;
1890 info
.nMax
= childRect
.bottom
;
1891 info
.nPage
= 1 + clientRect
.bottom
- clientRect
.top
;
1892 //info.nMax = childRect.bottom - clientRect.bottom;
1893 //info.nPos = clientRect.top - childRect.top;
1894 SetScrollInfo(hwnd
, SB_VERT
, &info
, TRUE
);
1901 /***********************************************************************
1902 * ScrollChildren (USER32.@)
1904 void WINAPI
ScrollChildren(HWND hWnd
, UINT uMsg
, WPARAM wParam
,
1908 INT curPos
, length
, minPos
, maxPos
, shift
;
1911 GetClientRect( hWnd
, &rect
);
1916 GetScrollRange(hWnd
,SB_HORZ
,&minPos
,&maxPos
);
1917 curPos
= GetScrollPos(hWnd
,SB_HORZ
);
1918 length
= (rect
.right
- rect
.left
) / 2;
1919 shift
= GetSystemMetrics(SM_CYHSCROLL
);
1922 GetScrollRange(hWnd
,SB_VERT
,&minPos
,&maxPos
);
1923 curPos
= GetScrollPos(hWnd
,SB_VERT
);
1924 length
= (rect
.bottom
- rect
.top
) / 2;
1925 shift
= GetSystemMetrics(SM_CXVSCROLL
);
1934 newPos
= curPos
- shift
;
1937 newPos
= curPos
+ shift
;
1940 newPos
= curPos
- length
;
1943 newPos
= curPos
+ length
;
1946 case SB_THUMBPOSITION
:
1947 newPos
= LOWORD(lParam
);
1960 CalcChildScroll(hWnd
,(uMsg
== WM_VSCROLL
)?SB_VERT
:SB_HORZ
);
1964 if( newPos
> maxPos
)
1967 if( newPos
< minPos
)
1970 SetScrollPos(hWnd
, (uMsg
== WM_VSCROLL
)?SB_VERT
:SB_HORZ
, newPos
, TRUE
);
1972 if( uMsg
== WM_VSCROLL
)
1973 ScrollWindowEx(hWnd
,0 ,curPos
- newPos
, NULL
, NULL
, 0, NULL
,
1974 SW_INVALIDATE
| SW_ERASE
| SW_SCROLLCHILDREN
);
1976 ScrollWindowEx(hWnd
,curPos
- newPos
, 0, NULL
, NULL
, 0, NULL
,
1977 SW_INVALIDATE
| SW_ERASE
| SW_SCROLLCHILDREN
);
1981 /******************************************************************************
1982 * CascadeWindows (USER32.@) Cascades MDI child windows
1985 * Success: Number of cascaded windows.
1989 CascadeWindows (HWND hwndParent
, UINT wFlags
, LPCRECT lpRect
,
1990 UINT cKids
, const HWND
*lpKids
)
1992 FIXME("(%p,0x%08x,...,%u,...): stub\n", hwndParent
, wFlags
, cKids
);
1997 /***********************************************************************
1998 * CascadeChildWindows (USER32.@)
2000 WORD WINAPI
CascadeChildWindows( HWND parent
, UINT flags
)
2002 return CascadeWindows( parent
, flags
, NULL
, 0, NULL
);
2006 /******************************************************************************
2007 * TileWindows (USER32.@) Tiles MDI child windows
2010 * Success: Number of tiled windows.
2014 TileWindows (HWND hwndParent
, UINT wFlags
, LPCRECT lpRect
,
2015 UINT cKids
, const HWND
*lpKids
)
2017 FIXME("(%p,0x%08x,...,%u,...): stub\n", hwndParent
, wFlags
, cKids
);
2022 /***********************************************************************
2023 * TileChildWindows (USER32.@)
2025 WORD WINAPI
TileChildWindows( HWND parent
, UINT flags
)
2027 return TileWindows( parent
, flags
, NULL
, 0, NULL
);
2031 /************************************************************************
2032 * "More Windows..." functionality
2035 /* MDI_MoreWindowsDlgProc
2037 * This function will process the messages sent to the "More Windows..."
2039 * Return values: 0 = cancel pressed
2040 * HWND = ok pressed or double-click in the list...
2044 static INT_PTR WINAPI
MDI_MoreWindowsDlgProc (HWND hDlg
, UINT iMsg
, WPARAM wParam
, LPARAM lParam
)
2053 MDICLIENTINFO
*ci
= get_client_info( (HWND
)lParam
);
2054 HWND hListBox
= GetDlgItem(hDlg
, MDI_IDC_LISTBOX
);
2056 for (i
= 0; i
< ci
->nActiveChildren
; i
++)
2058 WCHAR buffer
[MDI_MAXTITLELENGTH
];
2060 if (!InternalGetWindowText( ci
->child
[i
], buffer
, sizeof(buffer
)/sizeof(WCHAR
) ))
2062 SendMessageW(hListBox
, LB_ADDSTRING
, 0, (LPARAM
)buffer
);
2063 SendMessageW(hListBox
, LB_SETITEMDATA
, i
, (LPARAM
)ci
->child
[i
] );
2064 length
= strlenW(buffer
); /* FIXME: should use GetTextExtentPoint */
2065 if (length
> widest
)
2068 /* Make sure the horizontal scrollbar scrolls ok */
2069 SendMessageW(hListBox
, LB_SETHORIZONTALEXTENT
, widest
* 6, 0);
2071 /* Set the current selection */
2072 SendMessageW(hListBox
, LB_SETCURSEL
, MDI_MOREWINDOWSLIMIT
, 0);
2077 switch (LOWORD(wParam
))
2080 if (HIWORD(wParam
) != LBN_DBLCLK
) break;
2084 /* windows are sorted by menu ID, so we must return the
2085 * window associated to the given id
2087 HWND hListBox
= GetDlgItem(hDlg
, MDI_IDC_LISTBOX
);
2088 UINT index
= SendMessageW(hListBox
, LB_GETCURSEL
, 0, 0);
2089 LRESULT res
= SendMessageW(hListBox
, LB_GETITEMDATA
, index
, 0);
2090 EndDialog(hDlg
, res
);
2104 * MDI_MoreWindowsDialog
2106 * Prompts the user with a listbox containing the opened
2107 * documents. The user can then choose a windows and click
2108 * on OK to set the current window to the one selected, or
2109 * CANCEL to cancel. The function returns a handle to the
2113 static HWND
MDI_MoreWindowsDialog(HWND hwnd
)
2119 hRes
= FindResourceA(User32Instance
, "MDI_MOREWINDOWS", (LPSTR
)RT_DIALOG
);
2124 hDlgTmpl
= LoadResource(User32Instance
, hRes
);
2129 template = LockResource( hDlgTmpl
);
2134 return (HWND
) DialogBoxIndirectParamA(User32Instance
, template, hwnd
,
2135 MDI_MoreWindowsDlgProc
, (LPARAM
) hwnd
);