?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Release 960606
[wine/multimedia.git] / windows / mdi.c
bloba48aea37e46c8c84f13ddab2a8552932b7ab5164
1 /* MDI.C
2 *
3 * Copyright 1994, Bob Amstadt
4 * 1995,1996 Alex Korobka
5 *
6 * This file contains routines to support MDI features.
7 *
8 * Notes: Fairly complete implementation. Any volunteers for
9 * "More windows..." stuff?
10 *
11 * Also, Excel and WinWord do _not_ use MDI so if you're trying
12 * to fix them look elsewhere.
13 */
14
15 #include <stdlib.h>
16 #include <string.h>
17 #include <stdio.h>
18 #include <math.h>
19 #include "xmalloc.h"
20 #include "windows.h"
21 #include "win.h"
22 #include "heap.h"
23 #include "nonclient.h"
24 #include "mdi.h"
25 #include "user.h"
26 #include "menu.h"
27 #include "resource.h"
28 #include "stackframe.h"
29 #include "struct32.h"
30 #include "sysmetrics.h"
31 #include "stddebug.h"
32 #include "debug.h"
33
34 #define MDIS_ALLCHILDSTYLES 0x1
35
36 static HBITMAP hBmpClose = 0;
37 static HBITMAP hBmpRestore = 0;
38
39 DWORD SCROLL_SetNCSbState(WND*,int,int,int,int,int,int);
40
41 /* ----------------- declarations ----------------- */
42 void MDI_UpdateFrameText(WND *, HWND, BOOL, LPCSTR);
43 BOOL MDI_AugmentFrameMenu(MDICLIENTINFO*, WND *, HWND);
44 BOOL MDI_RestoreFrameMenu(WND *, HWND);
45
46 void ScrollChildren(HWND , UINT , WPARAM , LPARAM );
47 void CalcChildScroll(HWND, WORD);
48
49 static LONG MDI_ChildActivate(WND* ,HWND );
50
51 /* -------- Miscellaneous service functions ----------
52 *
53 * MDI_GetChildByID
54 */
55
56 static HWND MDI_GetChildByID(WND* wndPtr,int id)
57 {
58 for (wndPtr = wndPtr->child; wndPtr; wndPtr = wndPtr->next)
59 if (wndPtr->wIDmenu == id) return wndPtr->hwndSelf;
60 return 0;
61 }
62
63 static void MDI_PostUpdate(HWND hwnd, MDICLIENTINFO* ci, WORD recalc)
64 {
65 if( !ci->sbNeedUpdate )
66 {
67 ci->sbNeedUpdate = TRUE;
68 PostMessage( hwnd, WM_MDICALCCHILDSCROLL, 0, 0);
69 }
70 ci->sbRecalc = recalc;
71 }
72
73 /**********************************************************************
74 * MDI_MenuAppendItem
75 */
76 #ifdef SUPERFLUOUS_FUNCTIONS
77 static BOOL MDI_MenuAppendItem(WND *clientWnd, HWND hWndChild)
78 {
79 char buffer[128];
80 MDICLIENTINFO *clientInfo = (MDICLIENTINFO*)clientWnd->wExtra;
81 WND *wndPtr = WIN_FindWndPtr(hWndChild);
82 int n = sprintf(buffer, "%d ",
83 clientInfo->nActiveChildren);
84
85 if( !clientInfo->hWindowMenu ) return 0;
86
87 if (wndPtr->text) strncpy(buffer + n, wndPtr->text, sizeof(buffer) - n - 1);
88 return AppendMenu32A( clientInfo->hWindowMenu, MF_STRING,
89 wndPtr->wIDmenu, buffer );
90 }
91 #endif
92
93 /**********************************************************************
94 * MDI_MenuModifyItem
95 */
96 static BOOL MDI_MenuModifyItem(WND* clientWnd, HWND hWndChild )
97 {
98 char buffer[128];
99 MDICLIENTINFO *clientInfo = (MDICLIENTINFO*)clientWnd->wExtra;
100 WND *wndPtr = WIN_FindWndPtr(hWndChild);
101 UINT n = sprintf(buffer, "%d ",
102 wndPtr->wIDmenu - clientInfo->idFirstChild + 1);
103 BOOL bRet = 0;
104
105 if( !clientInfo->hWindowMenu ) return 0;
106
107 if (wndPtr->text) lstrcpyn(buffer + n, wndPtr->text, sizeof(buffer) - n );
108
109 n = GetMenuState(clientInfo->hWindowMenu,wndPtr->wIDmenu ,MF_BYCOMMAND);
110 bRet = ModifyMenu32A(clientInfo->hWindowMenu , wndPtr->wIDmenu,
111 MF_BYCOMMAND | MF_STRING, wndPtr->wIDmenu, buffer );
112 CheckMenuItem(clientInfo->hWindowMenu ,wndPtr->wIDmenu , n & MF_CHECKED);
113 return bRet;
114 }
115
116 /**********************************************************************
117 * MDI_MenuDeleteItem
118 */
119 static BOOL MDI_MenuDeleteItem(WND* clientWnd, HWND hWndChild )
120 {
121 char buffer[128];
122 MDICLIENTINFO *clientInfo = (MDICLIENTINFO*)clientWnd->wExtra;
123 WND *wndPtr = WIN_FindWndPtr(hWndChild);
124 UINT index = 0,id,n;
125
126 if( !clientInfo->nActiveChildren ||
127 !clientInfo->hWindowMenu ) return 0;
128
129 id = wndPtr->wIDmenu;
130 DeleteMenu(clientInfo->hWindowMenu,id,MF_BYCOMMAND);
131
132 /* walk the rest of MDI children to prevent gaps in the id
133 * sequence and in the menu child list
134 */
135
136 for( index = id+1; index <= clientInfo->nActiveChildren +
137 clientInfo->idFirstChild; index++ )
138 {
139 wndPtr = WIN_FindWndPtr(MDI_GetChildByID(clientWnd,index));
140 if( !wndPtr )
141 {
142 dprintf_mdi(stddeb,"MDIMenuDeleteItem: no window for id=%i\n",index);
143 continue;
144 }
145
146 /* set correct id */
147 wndPtr->wIDmenu--;
148
149 n = sprintf(buffer, "%d ",index - clientInfo->idFirstChild);
150 if (wndPtr->text)
151 lstrcpyn(buffer + n, wndPtr->text, sizeof(buffer) - n );
152
153 /* change menu */
154 ModifyMenu32A(clientInfo->hWindowMenu ,index ,MF_BYCOMMAND | MF_STRING,
155 index - 1 , buffer );
156 }
157 return 1;
158 }
159
160 /**********************************************************************
161 * MDI_GetWindow
162 *
163 * returns "activateable" child or zero
164 */
165 HWND MDI_GetWindow(WND *clientWnd, HWND hWnd, WORD wTo )
166 {
167 MDICLIENTINFO *clientInfo = (MDICLIENTINFO*)clientWnd->wExtra;
168 WND *wndPtr, *pWnd, *pWndLast;
169
170 if( !hWnd ) hWnd = clientInfo->hwndActiveChild;
171
172 if( !(wndPtr = WIN_FindWndPtr(hWnd)) ) return 0;
173
174 pWnd = wndPtr;
175 pWndLast = NULL;
176 for (;;)
177 {
178 pWnd = pWnd->next;
179 if (!pWnd) pWnd = wndPtr->parent->child;
180 if (pWnd == wndPtr) /* not found */
181 {
182 if (!wTo || !pWndLast) return 0;
183 break;
184 }
185
186 /* we are not interested in owned popups */
187 if ( !pWnd->owner &&
188 (pWnd->dwStyle & WS_VISIBLE) &&
189 !(pWnd->dwStyle & WS_DISABLED)) /* found one */
190 {
191 pWndLast = pWnd;
192 if (!wTo) break;
193 }
194 }
195 return pWndLast ? pWndLast->hwndSelf : 0;
196 }
197
198 /**********************************************************************
199 * MDI_CalcDefaultChildPos
200 *
201 * It seems that default height is 2/3 of client rect
202 */
203 void MDI_CalcDefaultChildPos(WND* w, WORD n, LPPOINT16 lpPos, INT delta)
204 {
205 RECT16 rect = w->rectClient;
206 INT spacing = GetSystemMetrics(SM_CYCAPTION) + GetSystemMetrics(SM_CYFRAME) - 1;
207 INT nstagger;
208
209 if( rect.bottom - rect.top - delta >= spacing )
210 rect.bottom -= delta;
211
212 nstagger = (rect.bottom - rect.top)/(3*spacing);
213 lpPos[1].x = (rect.right - rect.left - nstagger*spacing);
214 lpPos[1].y = (rect.bottom - rect.top - nstagger*spacing);
215 lpPos[0].x = lpPos[0].y = spacing*(n%(nstagger+1));
216 }
217
218 /**********************************************************************
219 * MDISetMenu
220 */
221 HMENU MDISetMenu(HWND hwnd, BOOL fRefresh, HMENU hmenuFrame, HMENU hmenuWindow)
222 {
223 WND *w = WIN_FindWndPtr(hwnd);
224 MDICLIENTINFO *ci;
225
226 dprintf_mdi(stddeb, "WM_MDISETMENU: %04x %04x %04x %04x\n",
227 hwnd, fRefresh, hmenuFrame, hmenuWindow);
228
229 ci = (MDICLIENTINFO *) w->wExtra;
230
231 if (!fRefresh)
232 {
233 HWND hwndFrame = GetParent(hwnd);
234 HMENU oldFrameMenu = GetMenu(hwndFrame);
235
236 if( ci->hwndChildMaximized && hmenuFrame && hmenuFrame!=oldFrameMenu )
237 MDI_RestoreFrameMenu(w->parent, ci->hwndChildMaximized );
238
239 if( hmenuWindow && hmenuWindow!=ci->hWindowMenu )
240 {
241 /* delete menu items from ci->hWindowMenu
242 * and add them to hmenuWindow */
243
244 INT i = GetMenuItemCount(ci->hWindowMenu) - 1;
245 INT pos = GetMenuItemCount(hmenuWindow) + 1;
246
247 AppendMenu32A( hmenuWindow, MF_SEPARATOR, 0, NULL);
248
249 if( ci->nActiveChildren )
250 {
251 INT j = i - ci->nActiveChildren + 1;
252 char buffer[100];
253 UINT id,state;
254
255 for( ; i >= j ; i-- )
256 {
257 id = GetMenuItemID(ci->hWindowMenu,i );
258 state = GetMenuState(ci->hWindowMenu,i,MF_BYPOSITION);
259
260 GetMenuString(ci->hWindowMenu, i, buffer, 100, MF_BYPOSITION);
261
262 DeleteMenu(ci->hWindowMenu, i , MF_BYPOSITION);
263 InsertMenu32A(hmenuWindow, pos, MF_BYPOSITION | MF_STRING,
264 id, buffer);
265 CheckMenuItem(hmenuWindow ,pos , MF_BYPOSITION | (state & MF_CHECKED));
266 }
267 }
268
269 /* remove separator */
270 DeleteMenu(ci->hWindowMenu, i, MF_BYPOSITION);
271
272 ci->hWindowMenu = hmenuWindow;
273 }
274
275 if( hmenuFrame && hmenuFrame!=oldFrameMenu)
276 {
277 SetMenu(hwndFrame, hmenuFrame);
278 if( ci->hwndChildMaximized )
279 MDI_AugmentFrameMenu(ci, w->parent, ci->hwndChildMaximized );
280 return oldFrameMenu;
281 }
282
283 }
284 return 0;
285 }
286
287 /**********************************************************************
288 * MDIIconArrange
289 */
290 WORD MDIIconArrange(HWND parent)
291 {
292 return ArrangeIconicWindows(parent); /* Any reason why the */
293 /* existing icon arrange */
294 /* can't be used here? */
295 /* -DRP */
296 }
297
298
299 /* ------------------ MDI child window functions ---------------------- */
300
301
302 /**********************************************************************
303 * MDICreateChild
304 */
305 HWND MDICreateChild(WND *w, MDICLIENTINFO *ci, HWND parent, LPARAM lParam )
306 {
307 POINT16 pos[2];
308 MDICREATESTRUCT *cs = (MDICREATESTRUCT *)PTR_SEG_TO_LIN(lParam);
309 DWORD style = cs->style | (WS_CHILD | WS_CLIPSIBLINGS);
310 HWND hwnd, hwndMax = 0;
311 WORD wIDmenu = ci->idFirstChild + ci->nActiveChildren;
312 char lpstrDef[]="junk!";
313
314 /*
315 * Create child window
316 *
317 */
318
319 dprintf_mdi(stdnimp,"MDICreateChild: origin %i,%i - dim %i,%i, style %08x\n",
320 cs->x, cs->y, cs->cx, cs->cy, (unsigned)cs->style);
321 /* calculate placement */
322 MDI_CalcDefaultChildPos(w, ci->nTotalCreated++, pos, 0);
323
324 if( cs->cx == CW_USEDEFAULT16 || !cs->cx )
325 cs->cx = pos[1].x;
326 if( cs->cy == CW_USEDEFAULT16 || !cs->cy )
327 cs->cy = pos[1].y;
328
329 if( cs->x == CW_USEDEFAULT16 )
330 {
331 cs->x = pos[0].x;
332 cs->y = pos[0].y;
333 }
334
335 /* restore current maximized child */
336 if( style & WS_VISIBLE && ci->hwndChildMaximized )
337 {
338 if( style & WS_MAXIMIZE )
339 SendMessage16(w->hwndSelf, WM_SETREDRAW, FALSE, 0L );
340 hwndMax = ci->hwndChildMaximized;
341 ShowWindow( hwndMax, SW_SHOWNOACTIVATE );
342 if( style & WS_MAXIMIZE )
343 SendMessage16(w->hwndSelf, WM_SETREDRAW, TRUE, 0L );
344 }
345
346 /* this menu is needed to set a check mark in MDI_ChildActivate */
347 AppendMenu32A(ci->hWindowMenu ,MF_STRING ,wIDmenu, lpstrDef );
348
349 ci->nActiveChildren++;
350
351 /* fix window style */
352 if( !(w->dwStyle & MDIS_ALLCHILDSTYLES) )
353 {
354 style &= (WS_CHILD | WS_CLIPSIBLINGS | WS_MINIMIZE | WS_MAXIMIZE |
355 WS_CLIPCHILDREN | WS_DISABLED | WS_VSCROLL | WS_HSCROLL );
356 style |= (WS_VISIBLE | WS_OVERLAPPEDWINDOW);
357 }
358
359 hwnd = CreateWindow16( (LPCSTR)PTR_SEG_TO_LIN(cs->szClass),
360 (LPCSTR)PTR_SEG_TO_LIN(cs->szTitle), style,
361 cs->x, cs->y, cs->cx, cs->cy, parent,
362 (HMENU)(DWORD)(WORD)wIDmenu, w->hInstance,
363 (LPVOID)lParam);
364
365 if (hwnd)
366 {
367 MDI_MenuModifyItem(w ,hwnd);
368 dprintf_mdi(stddeb, "MDICreateChild: created child - %04x\n",hwnd);
369 }
370 else
371 {
372 ci->nActiveChildren--;
373 DeleteMenu(ci->hWindowMenu,wIDmenu,MF_BYCOMMAND);
374 if( IsWindow(hwndMax) )
375 ShowWindow(hwndMax, SW_SHOWMAXIMIZED);
376 }
377
378 return hwnd;
379 }
380
381 /**********************************************************************
382 * MDI_ChildGetMinMaxInfo
383 */
384 void MDI_ChildGetMinMaxInfo(WND* clientWnd, HWND hwnd, MINMAXINFO16* lpMinMax )
385 {
386 WND* childWnd = WIN_FindWndPtr(hwnd);
387 RECT16 rect = clientWnd->rectClient;
388
389 MapWindowPoints16(clientWnd->parent->hwndSelf,
390 ((MDICLIENTINFO*)clientWnd->wExtra)->self, (LPPOINT16)&rect, 2);
391 AdjustWindowRectEx16( &rect, childWnd->dwStyle, 0, childWnd->dwExStyle );
392
393 lpMinMax->ptMaxSize.x = rect.right -= rect.left;
394 lpMinMax->ptMaxSize.y = rect.bottom -= rect.top;
395
396 lpMinMax->ptMaxPosition.x = rect.left;
397 lpMinMax->ptMaxPosition.y = rect.top;
398 }
399
400 /**********************************************************************
401 * MDI_SwitchActiveChild
402 *
403 * Notes: SetWindowPos sends WM_CHILDACTIVATE to the child window that is
404 * being activated
405 *
406 * wTo is basically lParam of WM_MDINEXT message or explicit
407 * window handle
408 */
409 void MDI_SwitchActiveChild(HWND clientHwnd, HWND childHwnd, BOOL wTo )
410 {
411 WND *w = WIN_FindWndPtr(clientHwnd);
412 HWND hwndTo = 0;
413 HWND hwndPrev = 0;
414 MDICLIENTINFO *ci;
415
416 hwndTo = MDI_GetWindow(w,childHwnd,(WORD)wTo);
417
418 ci = (MDICLIENTINFO *) w->wExtra;
419
420 dprintf_mdi(stddeb, "MDI_SwitchActiveChild: from %04x, to %04x\n",childHwnd,hwndTo);
421
422 if ( !hwndTo ) return;
423
424 hwndPrev = ci->hwndActiveChild;
425
426 if ( hwndTo != hwndPrev )
427 {
428 BOOL bOptimize = 0;
429
430 if( ci->hwndChildMaximized )
431 {
432 bOptimize = 1;
433 w->dwStyle &= ~WS_VISIBLE;
434 }
435
436 SetWindowPos( hwndTo, HWND_TOP, 0, 0, 0, 0,
437 SWP_NOMOVE | SWP_NOSIZE );
438 if( !wTo && hwndPrev )
439 {
440 SetWindowPos( hwndPrev, HWND_BOTTOM, 0, 0, 0, 0,
441 SWP_NOMOVE | SWP_NOSIZE | SWP_NOACTIVATE);
442 }
443
444 if( bOptimize )
445 ShowWindow( clientHwnd, SW_SHOW );
446 }
447 }
448
449
450 /**********************************************************************
451 * MDIDestroyChild
452 */
453 HWND MDIDestroyChild(WND *w_parent, MDICLIENTINFO *ci, HWND parent,
454 HWND child, BOOL flagDestroy)
455 {
456 WND *childPtr = WIN_FindWndPtr(child);
457
458 if( childPtr )
459 {
460 if( child == ci->hwndActiveChild )
461 {
462 MDI_SwitchActiveChild(parent,child,0);
463
464 if( child == ci->hwndActiveChild )
465 {
466 ShowWindow( child, SW_HIDE);
467 if( child == ci->hwndChildMaximized )
468 {
469 MDI_RestoreFrameMenu(w_parent->parent, child);
470 ci->hwndChildMaximized = 0;
471 MDI_UpdateFrameText(w_parent->parent,parent,TRUE,NULL);
472 }
473
474 MDI_ChildActivate(w_parent,0);
475 }
476 MDI_MenuDeleteItem(w_parent, child);
477 }
478
479 ci->nActiveChildren--;
480
481 dprintf_mdi(stddeb,"MDIDestroyChild: child destroyed - %04x\n",child);
482
483 if (flagDestroy)
484 {
485 MDI_PostUpdate(GetParent(child), ci, SB_BOTH+1);
486 DestroyWindow(child);
487 }
488 }
489
490 return 0;
491 }
492
493
494 /**********************************************************************
495 * MDI_ChildActivate
496 *
497 * Note: hWndChild is NULL when last child is being destroyed
498 */
499 LONG MDI_ChildActivate(WND *clientPtr, HWND hWndChild)
500 {
501 MDICLIENTINFO *clientInfo = (MDICLIENTINFO*)clientPtr->wExtra;
502 HWND prevActiveWnd = clientInfo->hwndActiveChild;
503 WND *wndPtr = WIN_FindWndPtr( hWndChild );
504 WND *wndPrev = WIN_FindWndPtr( prevActiveWnd );
505 BOOL isActiveFrameWnd = 0;
506
507 if( hWndChild == prevActiveWnd ) return 0L;
508
509 if( wndPtr )
510 if( wndPtr->dwStyle & WS_DISABLED ) return 0L;
511
512 dprintf_mdi(stddeb,"MDI_ChildActivate: %04x\n", hWndChild);
513
514 if( GetActiveWindow() == clientPtr->parent->hwndSelf )
515 isActiveFrameWnd = TRUE;
516
517 /* deactivate prev. active child */
518 if( wndPrev )
519 {
520 SendMessage16( prevActiveWnd, WM_NCACTIVATE, FALSE, 0L );
521 #ifdef WINELIB32
522 SendMessage32A( prevActiveWnd, WM_MDIACTIVATE, (WPARAM)prevActiveWnd,
523 (LPARAM)hWndChild);
524 #else
525 SendMessage16( prevActiveWnd, WM_MDIACTIVATE, FALSE,
526 MAKELONG(hWndChild,prevActiveWnd));
527 #endif
528 /* uncheck menu item */
529 if( clientInfo->hWindowMenu )
530 CheckMenuItem( clientInfo->hWindowMenu,
531 wndPrev->wIDmenu, 0);
532 }
533
534 /* set appearance */
535 if( clientInfo->hwndChildMaximized )
536 if( clientInfo->hwndChildMaximized != hWndChild )
537 if( hWndChild )
538 {
539 clientInfo->hwndActiveChild = hWndChild;
540 ShowWindow( hWndChild, SW_SHOWMAXIMIZED);
541 }
542 else
543 ShowWindow( clientInfo->hwndActiveChild,
544 SW_SHOWNORMAL );
545
546 clientInfo->hwndActiveChild = hWndChild;
547
548 /* check if we have any children left */
549 if( !hWndChild )
550 {
551 if( isActiveFrameWnd )
552 SetFocus( clientInfo->self );
553 return 0;
554 }
555
556 /* check menu item */
557 if( clientInfo->hWindowMenu )
558 CheckMenuItem( clientInfo->hWindowMenu,
559 wndPtr->wIDmenu, MF_CHECKED);
560
561 /* bring active child to the top */
562 SetWindowPos( hWndChild, 0,0,0,0,0, SWP_NOSIZE | SWP_NOMOVE | SWP_NOACTIVATE);
563
564 if( isActiveFrameWnd )
565 {
566 SendMessage16( hWndChild, WM_NCACTIVATE, TRUE, 0L);
567 if( GetFocus() == clientInfo->self )
568 SendMessage16( clientInfo->self, WM_SETFOCUS,
569 (WPARAM)clientInfo->self, 0L );
570 else
571 SetFocus( clientInfo->self );
572 }
573
574 #ifdef WINELIB32
575 SendMessage32A( hWndChild, WM_MDIACTIVATE, (WPARAM)hWndChild,
576 (LPARAM)prevActiveWnd );
577 #else
578 SendMessage16( hWndChild, WM_MDIACTIVATE, TRUE,
579 MAKELONG(prevActiveWnd,hWndChild) );
580 #endif
581
582 return 1;
583 }
584
585 /**********************************************************************
586 * MDI_BuildWCL
587 *
588 * iTotal returns number of children available for tiling or cascading
589 */
590 MDIWCL* MDI_BuildWCL(WND* clientWnd, INT16* iTotal)
591 {
592 MDIWCL *listTop,*listNext;
593 WND *childWnd;
594
595 if (!(listTop = (MDIWCL*)malloc( sizeof(MDIWCL) ))) return NULL;
596
597 listTop->hChild = clientWnd->child ? clientWnd->child->hwndSelf : 0;
598 listTop->prev = NULL;
599 *iTotal = 1;
600
601 /* build linked list from top child to bottom */
602
603 childWnd = WIN_FindWndPtr( listTop->hChild );
604 while( childWnd && childWnd->next )
605 {
606 listNext = (MDIWCL*)xmalloc(sizeof(MDIWCL));
607
608 if( (childWnd->dwStyle & WS_DISABLED) ||
609 (childWnd->dwStyle & WS_MINIMIZE) ||
610 !(childWnd->dwStyle & WS_VISIBLE) )
611 {
612 listTop->hChild = 0;
613 (*iTotal)--;
614 }
615
616 listNext->hChild = childWnd->next->hwndSelf;
617 listNext->prev = listTop;
618 listTop = listNext;
619 (*iTotal)++;
620
621 childWnd = childWnd->next;
622 }
623
624 if( (childWnd->dwStyle & WS_DISABLED) ||
625 (childWnd->dwStyle & WS_MINIMIZE) ||
626 !(childWnd->dwStyle & WS_VISIBLE) )
627 {
628 listTop->hChild = 0;
629 (*iTotal)--;
630 }
631
632 return listTop;
633 }
634
635
636 /* -------------------- MDI client window functions ------------------- */
637
638 /**********************************************************************
639 * CreateMDIMenuBitmap
640 */
641 HBITMAP CreateMDIMenuBitmap(void)
642 {
643 HDC hDCSrc = CreateCompatibleDC(0);
644 HDC hDCDest = CreateCompatibleDC(hDCSrc);
645 HBITMAP hbClose = LoadBitmap(0, MAKEINTRESOURCE(OBM_CLOSE) );
646 HBITMAP hbCopy,hb_src,hb_dest;
647
648 hb_src = SelectObject(hDCSrc,hbClose);
649 hbCopy = CreateCompatibleBitmap(hDCSrc,SYSMETRICS_CXSIZE, SYSMETRICS_CYSIZE);
650 hb_dest = SelectObject(hDCDest,hbCopy);
651
652 BitBlt(hDCDest, 0, 0, SYSMETRICS_CXSIZE, SYSMETRICS_CYSIZE,
653 hDCSrc, SYSMETRICS_CXSIZE, 0, SRCCOPY);
654
655 SelectObject(hDCSrc,hb_src);
656 SelectObject(hDCDest,hb_dest);
657
658 DeleteObject(hbClose);
659
660 DeleteDC(hDCDest);
661 DeleteDC(hDCSrc);
662
663 return hbCopy;
664 }
665
666 /**********************************************************************
667 * MDICascade
668 */
669 LONG MDICascade(WND* clientWnd, MDICLIENTINFO *ci)
670 {
671 MDIWCL *listTop,*listPrev;
672 INT16 delta = 0,iToPosition = 0, n = 0;
673 POINT16 pos[2];
674
675 if (ci->hwndChildMaximized)
676 ShowWindow( ci->hwndChildMaximized, SW_NORMAL);
677
678 if (ci->nActiveChildren == 0) return 0;
679
680 if (!(listTop = MDI_BuildWCL(clientWnd,&iToPosition))) return 0;
681
682 if( iToPosition < ci->nActiveChildren )
683 delta = 2 * SYSMETRICS_CYICONSPACING + SYSMETRICS_CYICON;
684
685 /* walk list and move windows */
686 while ( listTop )
687 {
688 dprintf_mdi(stddeb, "MDICascade: move %04x to (%d,%d) size [%d,%d]\n",
689 listTop->hChild, pos[0].x, pos[0].y, pos[1].x, pos[1].y);
690
691 if( listTop->hChild )
692 {
693 MDI_CalcDefaultChildPos(clientWnd, n++, pos, delta);
694 SetWindowPos(listTop->hChild, 0, pos[0].x, pos[0].y, pos[1].x, pos[1].y,
695 SWP_DRAWFRAME | SWP_NOACTIVATE | SWP_NOZORDER);
696 }
697
698 listPrev = listTop->prev;
699 free(listTop);
700 listTop = listPrev;
701 }
702
703 if( iToPosition < ci->nActiveChildren )
704 ArrangeIconicWindows( clientWnd->hwndSelf );
705
706 return 0;
707 }
708
709 /**********************************************************************
710 * MDITile
711 *
712 */
713 LONG MDITile(WND* wndClient, MDICLIENTINFO *ci,WORD wParam)
714 {
715 MDIWCL *listTop,*listPrev;
716 RECT16 rect;
717 int xsize, ysize;
718 int x, y;
719 int rows, columns;
720 int r, c;
721 int i;
722 INT16 iToPosition = 0;
723
724 if (ci->hwndChildMaximized)
725 ShowWindow(ci->hwndChildMaximized, SW_NORMAL);
726
727 if (ci->nActiveChildren == 0) return 0;
728
729 listTop = MDI_BuildWCL(wndClient, &iToPosition);
730
731 dprintf_mdi(stddeb,"MDITile: %i windows to tile\n",iToPosition);
732
733 if( !listTop ) return 0;
734
735 /* tile children */
736 if ( iToPosition )
737 {
738 rect = wndClient->rectClient;
739 rows = (int) sqrt((double) iToPosition);
740 columns = iToPosition / rows;
741
742 if (wParam == MDITILE_HORIZONTAL) /* version >= 3.1 */
743 {
744 i=rows;
745 rows=columns; /* exchange r and c */
746 columns=i;
747 }
748
749 /* hack */
750 if( iToPosition != ci->nActiveChildren)
751 {
752 y = rect.bottom - 2 * SYSMETRICS_CYICONSPACING - SYSMETRICS_CYICON;
753 rect.bottom = ( y - SYSMETRICS_CYICON < rect.top )? rect.bottom: y;
754 }
755
756 ysize = rect.bottom / rows;
757 xsize = rect.right / columns;
758
759 x = 0;
760 i = 0;
761
762 for (c = 1; c <= columns; c++)
763 {
764 if (c == columns)
765 {
766 rows = iToPosition - i;
767 ysize = rect.bottom / rows;
768 }
769
770 y = 0;
771 for (r = 1; r <= rows; r++, i++)
772 {
773 /* shouldn't happen but... */
774 if( !listTop )
775 break;
776
777 /* skip iconized childs from tiling */
778 while (!listTop->hChild)
779 {
780 listPrev = listTop->prev;
781 free(listTop);
782 listTop = listPrev;
783 }
784 SetWindowPos(listTop->hChild, 0, x, y, xsize, ysize,
785 SWP_DRAWFRAME | SWP_NOACTIVATE | SWP_NOZORDER);
786 y += ysize;
787 listPrev = listTop->prev;
788 free(listTop);
789 listTop = listPrev;
790 }
791 x += xsize;
792 }
793 }
794
795 /* free the rest if any */
796 while( listTop )
797 {
798 listPrev = listTop->prev;
799 free(listTop);
800 listTop = listPrev;
801 }
802
803 if (iToPosition < ci->nActiveChildren )
804 ArrangeIconicWindows( wndClient->hwndSelf );
805
806 return 0;
807 }
808
809 /* ----------------------- Frame window ---------------------------- */
810
811
812 /**********************************************************************
813 * MDI_AugmentFrameMenu
814 */
815 BOOL MDI_AugmentFrameMenu(MDICLIENTINFO* ci, WND *frame, HWND hChild)
816 {
817 WND* child = WIN_FindWndPtr(hChild);
818 HGLOBAL handle;
819 HMENU hSysPopup = 0;
820
821 dprintf_mdi(stddeb,"MDI_AugmentFrameMenu: frame %p,child %04x\n",frame,hChild);
822
823 if( !frame->wIDmenu || !child->hSysMenu ) return 0;
824
825 /* create a copy of sysmenu popup and insert it into frame menu bar */
826
827 if (!(handle = SYSRES_LoadResource( SYSRES_MENU_SYSMENU ))) return 0;
828 hSysPopup = LoadMenuIndirect16( GlobalLock16( handle ) );
829 SYSRES_FreeResource( handle );
830
831 dprintf_mdi(stddeb,"\t\tgot popup %04x\n in sysmenu %04x",hSysPopup,child->hSysMenu);
832
833 if( !InsertMenu32A(frame->wIDmenu,0,MF_BYPOSITION | MF_BITMAP | MF_POPUP,
834 hSysPopup, (LPSTR)(DWORD)hBmpClose ))
835 { DestroyMenu(hSysPopup); return 0; }
836
837 if( !AppendMenu32A(frame->wIDmenu,MF_HELP | MF_BITMAP,
838 SC_RESTORE, (LPSTR)(DWORD)hBmpRestore ))
839 {
840 RemoveMenu(frame->wIDmenu,0,MF_BYPOSITION);
841 return 0;
842 }
843
844 EnableMenuItem(hSysPopup, SC_SIZE, MF_BYCOMMAND | MF_GRAYED);
845 EnableMenuItem(hSysPopup, SC_MOVE, MF_BYCOMMAND | MF_GRAYED);
846 EnableMenuItem(hSysPopup, SC_MAXIMIZE, MF_BYCOMMAND | MF_GRAYED);
847
848 child->dwStyle &= ~WS_SYSMENU;
849
850 /* redraw menu */
851 DrawMenuBar(frame->hwndSelf);
852
853 return 1;
854 }
855
856 /**********************************************************************
857 * MDI_RestoreFrameMenu
858 */
859 BOOL MDI_RestoreFrameMenu( WND *frameWnd, HWND hChild)
860 {
861 WND* child = WIN_FindWndPtr(hChild);
862 INT nItems = GetMenuItemCount(frameWnd->wIDmenu) - 1;
863
864 dprintf_mdi(stddeb,"MDI_RestoreFrameMenu: for child %04x\n",hChild);
865
866 if( GetMenuItemID(frameWnd->wIDmenu,nItems) != SC_RESTORE )
867 return 0;
868
869 child->dwStyle |= WS_SYSMENU;
870
871 RemoveMenu(frameWnd->wIDmenu,0,MF_BYPOSITION);
872 DeleteMenu(frameWnd->wIDmenu,nItems-1,MF_BYPOSITION);
873
874 DrawMenuBar(frameWnd->hwndSelf);
875
876 return 1;
877 }
878
879 /**********************************************************************
880 * MDI_UpdateFrameText
881 *
882 * used when child window is maximized/restored
883 *
884 * Note: lpTitle can be NULL
885 */
886 void MDI_UpdateFrameText(WND *frameWnd, HWND hClient, BOOL repaint, LPCSTR lpTitle)
887 {
888 char lpBuffer[MDI_MAXTITLELENGTH+1];
889 WND* clientWnd = WIN_FindWndPtr(hClient);
890
891 MDICLIENTINFO *ci = (MDICLIENTINFO *) clientWnd->wExtra;
892
893 dprintf_mdi(stddeb, "MDI: repaint %i, frameText %s\n", repaint, (lpTitle)?lpTitle:"NULL");
894
895 /* store new "default" title if lpTitle is not NULL */
896 if (lpTitle)
897 {
898 if (ci->frameTitle) HeapFree( SystemHeap, 0, ci->frameTitle );
899 ci->frameTitle = HEAP_strdupA( SystemHeap, 0, lpTitle );
900 }
901
902 if (ci->frameTitle)
903 {
904 WND* childWnd = WIN_FindWndPtr( ci->hwndChildMaximized );
905
906 if( childWnd && childWnd->text )
907 {
908 /* combine frame title and child title if possible */
909
910 LPCSTR lpBracket = " - [";
911 int i_frame_text_length = strlen(ci->frameTitle);
912 int i_child_text_length = strlen(childWnd->text);
913
914 lstrcpyn( lpBuffer, ci->frameTitle, MDI_MAXTITLELENGTH);
915
916 if( i_frame_text_length + 6 < MDI_MAXTITLELENGTH )
917 {
918 strcat( lpBuffer, lpBracket );
919
920 if( i_frame_text_length + i_child_text_length + 6 < MDI_MAXTITLELENGTH )
921 {
922 strcat( lpBuffer, childWnd->text );
923 strcat( lpBuffer, "]" );
924 }
925 else
926 {
927 lstrcpyn( lpBuffer + i_frame_text_length + 4,
928 childWnd->text,
929 MDI_MAXTITLELENGTH - i_frame_text_length - 5 );
930 strcat( lpBuffer, "]" );
931 }
932 }
933 }
934 else
935 {
936 strncpy(lpBuffer, ci->frameTitle, MDI_MAXTITLELENGTH );
937 lpBuffer[MDI_MAXTITLELENGTH]='\0';
938 }
939 }
940 else
941 lpBuffer[0] = '\0';
942
943 DEFWND_SetText( frameWnd, lpBuffer );
944 if( repaint == MDI_REPAINTFRAME)
945 SetWindowPos(frameWnd->hwndSelf, 0,0,0,0,0, SWP_FRAMECHANGED |
946 SWP_NOSIZE | SWP_NOMOVE | SWP_NOACTIVATE | SWP_NOZORDER );
947 }
948
949
950 /* ----------------------------- Interface ---------------------------- */
951
952
953 /**********************************************************************
954 * MDIClientWndProc
955 *
956 * This function is the handler for all MDI requests.
957 */
958 LRESULT MDIClientWndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
959 {
960 LPCREATESTRUCT16 cs;
961 LPCLIENTCREATESTRUCT ccs;
962 MDICLIENTINFO *ci;
963 RECT16 rect;
964 WND *w = WIN_FindWndPtr(hwnd);
965 WND *frameWnd = w->parent;
966
967 ci = (MDICLIENTINFO *) w->wExtra;
968
969 switch (message)
970 {
971 case WM_CREATE:
972 cs = (LPCREATESTRUCT16) PTR_SEG_TO_LIN(lParam);
973 ccs = (LPCLIENTCREATESTRUCT) PTR_SEG_TO_LIN(cs->lpCreateParams);
974
975 ci->hWindowMenu = ccs->hWindowMenu;
976 ci->idFirstChild = ccs->idFirstChild;
977 ci->hwndChildMaximized = 0;
978 ci->nActiveChildren = 0;
979 ci->nTotalCreated = 0;
980 ci->frameTitle = NULL;
981 ci->sbNeedUpdate = 0;
982 ci->self = hwnd;
983 w->dwStyle |= WS_CLIPCHILDREN;
984
985 if (!hBmpClose)
986 {
987 hBmpClose = CreateMDIMenuBitmap();
988 hBmpRestore = LoadBitmap( 0, MAKEINTRESOURCE(OBM_RESTORE) );
989 }
990 MDI_UpdateFrameText(frameWnd, hwnd, MDI_NOFRAMEREPAINT,frameWnd->text);
991
992 AppendMenu32A( ccs->hWindowMenu, MF_SEPARATOR, 0, NULL );
993
994 GetClientRect16(frameWnd->hwndSelf, &rect);
995 NC_HandleNCCalcSize( w, &rect );
996 w->rectClient = rect;
997
998 dprintf_mdi(stddeb,"MDI: Client created - hwnd = %04x, idFirst = %u\n",hwnd,ci->idFirstChild);
999
1000 return 0;
1001
1002 case WM_DESTROY:
1003 if( ci->hwndChildMaximized ) MDI_RestoreFrameMenu(w, frameWnd->hwndSelf);
1004 ci->idFirstChild = GetMenuItemCount(ci->hWindowMenu) - 1;
1005 ci->nActiveChildren++; /* to delete a separator */
1006
1007 while( ci->nActiveChildren-- )
1008 DeleteMenu(ci->hWindowMenu,MF_BYPOSITION,ci->idFirstChild--);
1009
1010 return 0;
1011
1012 case WM_MDIACTIVATE:
1013 if( ci->hwndActiveChild != (HWND)wParam )
1014 SetWindowPos((HWND)wParam, 0,0,0,0,0, SWP_NOSIZE | SWP_NOMOVE );
1015 return 0;
1016
1017 case WM_MDICASCADE:
1018 return MDICascade(w, ci);
1019
1020 case WM_MDICREATE:
1021 return (LONG)MDICreateChild(w, ci, hwnd, lParam );
1022
1023 case WM_MDIDESTROY:
1024 return (LONG)MDIDestroyChild(w, ci, hwnd, (HWND)wParam, TRUE);
1025
1026 case WM_MDIGETACTIVE:
1027 return ((LONG) ci->hwndActiveChild |
1028 ((LONG) (ci->hwndChildMaximized>0) << 16));
1029
1030 case WM_MDIICONARRANGE:
1031 ci->sbNeedUpdate = TRUE;
1032 MDIIconArrange(hwnd);
1033 ci->sbRecalc = SB_BOTH+1;
1034 SendMessage16(hwnd,WM_MDICALCCHILDSCROLL,0,0L);
1035 return 0;
1036
1037 case WM_MDIMAXIMIZE:
1038 ShowWindow((HWND)wParam, SW_MAXIMIZE);
1039 return 0;
1040
1041 case WM_MDINEXT:
1042 MDI_SwitchActiveChild(hwnd, (HWND)wParam, (lParam)?1:0);
1043 break;
1044
1045 case WM_MDIRESTORE:
1046 ShowWindow( (HWND)wParam, SW_NORMAL);
1047 return 0;
1048
1049 case WM_MDISETMENU:
1050 #ifdef WINELIB32
1051 return (LRESULT)MDISetMenu(hwnd, FALSE, (HMENU)wParam, (HMENU)lParam);
1052 #else
1053 return (LRESULT)MDISetMenu(hwnd, wParam, LOWORD(lParam), HIWORD(lParam));
1054 #endif
1055
1056 case WM_MDITILE:
1057 ci->sbNeedUpdate = TRUE;
1058 ShowScrollBar(hwnd,SB_BOTH,FALSE);
1059 MDITile(w, ci,wParam);
1060 ci->sbNeedUpdate = FALSE;
1061 return 0;
1062
1063 case WM_VSCROLL:
1064 case WM_HSCROLL:
1065 ci->sbNeedUpdate = TRUE;
1066 ScrollChildren(hwnd,message,wParam,lParam);
1067 ci->sbNeedUpdate = FALSE;
1068 return 0;
1069
1070 case WM_SETFOCUS:
1071 if( ci->hwndActiveChild )
1072 {
1073 w = WIN_FindWndPtr( ci->hwndActiveChild );
1074 if( !(w->dwStyle & WS_MINIMIZE) )
1075 SetFocus( ci->hwndActiveChild );
1076 }
1077 return 0;
1078
1079 case WM_NCACTIVATE:
1080 if( ci->hwndActiveChild )
1081 SendMessage16(ci->hwndActiveChild, message, wParam, lParam);
1082 break;
1083
1084 case WM_PARENTNOTIFY:
1085 if( wParam == WM_LBUTTONDOWN )
1086 {
1087 POINT16 pt = MAKEPOINT16(lParam);
1088 HWND child = ChildWindowFromPoint16(hwnd, pt);
1089
1090 dprintf_mdi(stddeb,"MDIClient: notification from %04x (%i,%i)\n",child,pt.x,pt.y);
1091
1092 if( child && child != hwnd )
1093 {
1094 WND* wnd = WIN_FindWndPtr( child );
1095
1096 /* if we got owned popup */
1097 if( wnd->owner ) child = wnd->owner->hwndSelf;
1098
1099 if( child != ci->hwndActiveChild )
1100 SetWindowPos(child, 0,0,0,0,0, SWP_NOSIZE | SWP_NOMOVE );
1101 }
1102 }
1103 return 0;
1104
1105 case WM_SIZE:
1106 if( ci->hwndChildMaximized )
1107 {
1108 WND* child = WIN_FindWndPtr(ci->hwndChildMaximized);
1109 RECT16 rect = { 0, 0, LOWORD(lParam), HIWORD(lParam) };
1110
1111 AdjustWindowRectEx16(&rect, child->dwStyle, 0, child->dwExStyle);
1112 MoveWindow(ci->hwndChildMaximized, rect.left, rect.top,
1113 rect.right - rect.left, rect.bottom - rect.top, 1);
1114 }
1115 else
1116 MDI_PostUpdate(hwnd, ci, SB_BOTH+1);
1117
1118 break;
1119
1120 case WM_MDICALCCHILDSCROLL:
1121 if( ci->sbNeedUpdate )
1122 if( ci->sbRecalc )
1123 {
1124 CalcChildScroll(hwnd, ci->sbRecalc-1);
1125 ci->sbRecalc = ci->sbNeedUpdate = 0;
1126 }
1127 return 0;
1128 }
1129
1130 return DefWindowProc16(hwnd, message, wParam, lParam);
1131 }
1132
1133
1134 /***********************************************************************
1135 * DefFrameProc16 (USER.445)
1136 */
1137 LRESULT DefFrameProc16( HWND16 hwnd, HWND16 hwndMDIClient, UINT16 message,
1138 WPARAM16 wParam, LPARAM lParam )
1139 {
1140 HWND childHwnd;
1141 MDICLIENTINFO* ci;
1142 WND* wndPtr;
1143
1144 if (hwndMDIClient)
1145 {
1146 switch (message)
1147 {
1148 case WM_COMMAND:
1149 wndPtr = WIN_FindWndPtr(hwndMDIClient);
1150 ci = (MDICLIENTINFO*)wndPtr->wExtra;
1151
1152 /* check for possible syscommands for maximized MDI child */
1153
1154 if( wParam < ci->idFirstChild ||
1155 wParam >= ci->idFirstChild + ci->nActiveChildren )
1156 {
1157 if( (wParam - 0xF000) & 0xF00F ) break;
1158 switch( wParam )
1159 {
1160 case SC_SIZE:
1161 case SC_MOVE:
1162 case SC_MINIMIZE:
1163 case SC_MAXIMIZE:
1164 case SC_NEXTWINDOW:
1165 case SC_PREVWINDOW:
1166 case SC_CLOSE:
1167 case SC_RESTORE:
1168 if( ci->hwndChildMaximized )
1169 return SendMessage16( ci->hwndChildMaximized, WM_SYSCOMMAND,
1170 wParam, lParam);
1171 }
1172 }
1173 else
1174 {
1175 childHwnd = MDI_GetChildByID( WIN_FindWndPtr(hwndMDIClient),
1176 wParam );
1177 if( childHwnd )
1178 SendMessage16(hwndMDIClient, WM_MDIACTIVATE, (WPARAM)childHwnd , 0L);
1179 }
1180 break;
1181
1182 case WM_NCACTIVATE:
1183 SendMessage16(hwndMDIClient, message, wParam, lParam);
1184 break;
1185
1186 case WM_SETTEXT:
1187 MDI_UpdateFrameText(WIN_FindWndPtr(hwnd), hwndMDIClient,
1188 MDI_REPAINTFRAME,
1189 (LPCSTR)PTR_SEG_TO_LIN(lParam));
1190 return 0;
1191
1192 case WM_SETFOCUS:
1193 SetFocus(hwndMDIClient);
1194 break;
1195
1196 case WM_SIZE:
1197 MoveWindow(hwndMDIClient, 0, 0,
1198 LOWORD(lParam), HIWORD(lParam), TRUE);
1199 break;
1200 }
1201 }
1202
1203 return DefWindowProc16(hwnd, message, wParam, lParam);
1204 }
1205
1206
1207 /***********************************************************************
1208 * DefFrameProc32A (USER32.121)
1209 */
1210 LRESULT DefFrameProc32A( HWND32 hwnd, HWND32 hwndMDIClient, UINT32 message,
1211 WPARAM32 wParam, LPARAM lParam )
1212 {
1213 if (hwndMDIClient)
1214 {
1215 switch (message)
1216 {
1217 case WM_COMMAND:
1218 return DefFrameProc16( hwnd, hwndMDIClient, message,
1219 (WPARAM16)wParam,
1220 MAKELPARAM( (HWND16)lParam, HIWORD(wParam) ) );
1221
1222 case WM_NCACTIVATE:
1223 SendMessage32A(hwndMDIClient, message, wParam, lParam);
1224 break;
1225
1226 case WM_SETTEXT:
1227 return DefFrameProc16( hwnd, hwndMDIClient, message,
1228 wParam, (LPARAM)PTR_SEG_TO_LIN(lParam) );
1229
1230 case WM_SETFOCUS:
1231 case WM_SIZE:
1232 return DefFrameProc16( hwnd, hwndMDIClient, message,
1233 wParam, lParam );
1234 }
1235 }
1236
1237 return DefWindowProc32A(hwnd, message, wParam, lParam);
1238 }
1239
1240
1241 /***********************************************************************
1242 * DefFrameProc32W (USER32.122)
1243 */
1244 LRESULT DefFrameProc32W( HWND32 hwnd, HWND32 hwndMDIClient, UINT32 message,
1245 WPARAM32 wParam, LPARAM lParam )
1246 {
1247 if (hwndMDIClient)
1248 {
1249 switch (message)
1250 {
1251 case WM_COMMAND:
1252 return DefFrameProc16( hwnd, hwndMDIClient, message,
1253 (WPARAM16)wParam,
1254 MAKELPARAM( (HWND16)lParam, HIWORD(wParam) ) );
1255
1256 case WM_NCACTIVATE:
1257 SendMessage32W(hwndMDIClient, message, wParam, lParam);
1258 break;
1259
1260 case WM_SETTEXT:
1261 /* FIXME: Unicode */
1262 return DefFrameProc32A( hwnd, hwndMDIClient, message,
1263 wParam, lParam );
1264
1265 case WM_SETFOCUS:
1266 case WM_SIZE:
1267 return DefFrameProc32A( hwnd, hwndMDIClient, message,
1268 wParam, lParam );
1269 }
1270 }
1271
1272 return DefWindowProc32W( hwnd, message, wParam, lParam );
1273 }
1274
1275
1276 /***********************************************************************
1277 * DefMDIChildProc16 (USER.447)
1278 */
1279 LRESULT DefMDIChildProc16( HWND16 hwnd, UINT16 message,
1280 WPARAM16 wParam, LPARAM lParam )
1281 {
1282 MDICLIENTINFO *ci;
1283 WND *clientWnd;
1284
1285 clientWnd = WIN_FindWndPtr(GetParent(hwnd));
1286 ci = (MDICLIENTINFO *) clientWnd->wExtra;
1287
1288 switch (message)
1289 {
1290 case WM_SETTEXT:
1291 DefWindowProc16(hwnd, message, wParam, lParam);
1292 MDI_MenuModifyItem(clientWnd,hwnd);
1293 if( ci->hwndChildMaximized == hwnd )
1294 MDI_UpdateFrameText( clientWnd->parent, ci->self,
1295 MDI_REPAINTFRAME, NULL );
1296 return 0;
1297
1298 case WM_CLOSE:
1299 SendMessage16(ci->self,WM_MDIDESTROY,(WPARAM)hwnd,0L);
1300 return 0;
1301
1302 case WM_SETFOCUS:
1303 if( ci->hwndActiveChild != hwnd )
1304 MDI_ChildActivate(clientWnd, hwnd);
1305 break;
1306
1307 case WM_CHILDACTIVATE:
1308 MDI_ChildActivate(clientWnd, hwnd);
1309 return 0;
1310
1311 case WM_NCPAINT:
1312 dprintf_mdi(stddeb,"DefMDIChildProc: WM_NCPAINT for %04x, active %04x\n",
1313 hwnd, ci->hwndActiveChild );
1314 break;
1315
1316 case WM_SYSCOMMAND:
1317 switch( wParam )
1318 {
1319 case SC_MOVE:
1320 if( ci->hwndChildMaximized == hwnd) return 0;
1321 break;
1322 case SC_MAXIMIZE:
1323 if( ci->hwndChildMaximized == hwnd)
1324 return SendMessage16( clientWnd->parent->hwndSelf,
1325 message, wParam, lParam);
1326 break;
1327 case SC_NEXTWINDOW:
1328 SendMessage16( ci->self, WM_MDINEXT, 0, 0);
1329 return 0;
1330 case SC_PREVWINDOW:
1331 SendMessage16( ci->self, WM_MDINEXT, 0, 1);
1332 return 0;
1333 }
1334 break;
1335
1336 case WM_GETMINMAXINFO:
1337 MDI_ChildGetMinMaxInfo(clientWnd, hwnd, (MINMAXINFO16*) PTR_SEG_TO_LIN(lParam));
1338 return 0;
1339
1340 case WM_SETVISIBLE:
1341 if( ci->hwndChildMaximized)
1342 ci->sbNeedUpdate = 0;
1343 else
1344 MDI_PostUpdate(clientWnd->hwndSelf, ci, SB_BOTH+1);
1345 break;
1346
1347 case WM_SIZE:
1348 /* do not change */
1349
1350 if( ci->hwndActiveChild == hwnd && wParam != SIZE_MAXIMIZED )
1351 {
1352 ci->hwndChildMaximized = 0;
1353
1354 MDI_RestoreFrameMenu( clientWnd->parent, hwnd);
1355 MDI_UpdateFrameText( clientWnd->parent, ci->self,
1356 MDI_REPAINTFRAME, NULL );
1357 }
1358
1359 if( wParam == SIZE_MAXIMIZED )
1360 {
1361 HWND hMaxChild = ci->hwndChildMaximized;
1362
1363 if( hMaxChild == hwnd ) break;
1364
1365 if( hMaxChild)
1366 {
1367 SendMessage16( hMaxChild, WM_SETREDRAW, FALSE, 0L );
1368
1369 MDI_RestoreFrameMenu( clientWnd->parent, hMaxChild);
1370 ShowWindow( hMaxChild, SW_SHOWNOACTIVATE);
1371
1372 SendMessage16( hMaxChild, WM_SETREDRAW, TRUE, 0L );
1373 }
1374
1375 ci->hwndChildMaximized = hwnd; /* !!! */
1376
1377 MDI_AugmentFrameMenu( ci, clientWnd->parent, hwnd);
1378 MDI_UpdateFrameText( clientWnd->parent, ci->self,
1379 MDI_REPAINTFRAME, NULL );
1380 }
1381
1382 if( wParam == SIZE_MINIMIZED )
1383 {
1384 HWND switchTo = MDI_GetWindow(clientWnd, hwnd, 0);
1385
1386 if( switchTo )
1387 SendMessage16( switchTo, WM_CHILDACTIVATE, 0, 0L);
1388 }
1389
1390 MDI_PostUpdate(clientWnd->hwndSelf, ci, SB_BOTH+1);
1391 break;
1392
1393 case WM_MENUCHAR:
1394
1395 /* MDI children don't have menus */
1396 PostMessage( clientWnd->parent->hwndSelf, WM_SYSCOMMAND,
1397 (WPARAM)SC_KEYMENU, (LPARAM)wParam);
1398 return 0x00010000L;
1399
1400 case WM_NEXTMENU:
1401 /* set current menu to child system menu */
1402
1403 break;
1404 }
1405
1406 return DefWindowProc16(hwnd, message, wParam, lParam);
1407 }
1408
1409
1410 /***********************************************************************
1411 * DefMDIChildProc32A (USER32.123)
1412 */
1413 LRESULT DefMDIChildProc32A( HWND32 hwnd, UINT32 message,
1414 WPARAM32 wParam, LPARAM lParam )
1415 {
1416 MDICLIENTINFO *ci;
1417 WND *clientWnd;
1418
1419 clientWnd = WIN_FindWndPtr(GetParent(hwnd));
1420 ci = (MDICLIENTINFO *) clientWnd->wExtra;
1421
1422 switch (message)
1423 {
1424 case WM_SETTEXT:
1425 DefWindowProc32A(hwnd, message, wParam, lParam);
1426 MDI_MenuModifyItem(clientWnd,hwnd);
1427 if( ci->hwndChildMaximized == hwnd )
1428 MDI_UpdateFrameText( clientWnd->parent, ci->self,
1429 MDI_REPAINTFRAME, NULL );
1430 return 0;
1431
1432 case WM_GETMINMAXINFO:
1433 {
1434 MINMAXINFO16 mmi;
1435 STRUCT32_MINMAXINFO32to16( (MINMAXINFO32 *)lParam, &mmi );
1436 MDI_ChildGetMinMaxInfo( clientWnd, hwnd, &mmi );
1437 STRUCT32_MINMAXINFO16to32( &mmi, (MINMAXINFO32 *)lParam );
1438 }
1439 return 0;
1440
1441 case WM_MENUCHAR:
1442
1443 /* MDI children don't have menus */
1444 PostMessage( clientWnd->parent->hwndSelf, WM_SYSCOMMAND,
1445 (WPARAM)SC_KEYMENU, (LPARAM)LOWORD(wParam) );
1446 return 0x00010000L;
1447
1448 case WM_CLOSE:
1449 case WM_SETFOCUS:
1450 case WM_CHILDACTIVATE:
1451 case WM_NCPAINT:
1452 case WM_SYSCOMMAND:
1453 case WM_SETVISIBLE:
1454 case WM_SIZE:
1455 case WM_NEXTMENU:
1456 return DefMDIChildProc16( hwnd, message, (WPARAM16)wParam, lParam );
1457 }
1458 return DefWindowProc32A(hwnd, message, wParam, lParam);
1459 }
1460
1461
1462 /***********************************************************************
1463 * DefMDIChildProc32W (USER32.124)
1464 */
1465 LRESULT DefMDIChildProc32W( HWND32 hwnd, UINT32 message,
1466 WPARAM32 wParam, LPARAM lParam )
1467 {
1468 MDICLIENTINFO *ci;
1469 WND *clientWnd;
1470
1471 clientWnd = WIN_FindWndPtr(GetParent(hwnd));
1472 ci = (MDICLIENTINFO *) clientWnd->wExtra;
1473
1474 switch (message)
1475 {
1476 case WM_SETTEXT:
1477 DefWindowProc32W(hwnd, message, wParam, lParam);
1478 MDI_MenuModifyItem(clientWnd,hwnd);
1479 if( ci->hwndChildMaximized == hwnd )
1480 MDI_UpdateFrameText( clientWnd->parent, ci->self,
1481 MDI_REPAINTFRAME, NULL );
1482 return 0;
1483
1484 case WM_GETMINMAXINFO:
1485 case WM_MENUCHAR:
1486 case WM_CLOSE:
1487 case WM_SETFOCUS:
1488 case WM_CHILDACTIVATE:
1489 case WM_NCPAINT:
1490 case WM_SYSCOMMAND:
1491 case WM_SETVISIBLE:
1492 case WM_SIZE:
1493 case WM_NEXTMENU:
1494 return DefMDIChildProc32A( hwnd, message, (WPARAM16)wParam, lParam );
1495 }
1496 return DefWindowProc32W(hwnd, message, wParam, lParam);
1497 }
1498
1499
1500 /**********************************************************************
1501 * TranslateMDISysAccel (USER.451)
1502 *
1503 */
1504 BOOL TranslateMDISysAccel(HWND hwndClient, LPMSG msg)
1505 {
1506 WND* clientWnd = WIN_FindWndPtr( hwndClient);
1507 WND* wnd;
1508 MDICLIENTINFO *ci = NULL;
1509 WPARAM wParam = 0;
1510
1511 if( (msg->message != WM_KEYDOWN && msg->message != WM_SYSKEYDOWN) || !clientWnd )
1512 return 0;
1513
1514 ci = (MDICLIENTINFO*) clientWnd->wExtra;
1515 wnd = WIN_FindWndPtr(ci->hwndActiveChild);
1516
1517 if( !wnd ) return 0;
1518
1519 if( wnd->dwStyle & WS_DISABLED ) return 0;
1520
1521 if ((GetKeyState(VK_CONTROL) & 0x8000) && !(GetKeyState(VK_MENU) & 0x8000))
1522 switch( msg->wParam )
1523 {
1524 case VK_F6:
1525 case VK_SEPARATOR:
1526 wParam = ( GetKeyState(VK_SHIFT) & 0x8000 )? SC_NEXTWINDOW: SC_PREVWINDOW;
1527 break;
1528 case VK_RBUTTON:
1529 wParam = SC_CLOSE;
1530 break;
1531 default:
1532 return 0;
1533 }
1534 else
1535 return 0;
1536
1537 dprintf_mdi(stddeb,"TranslateMDISysAccel: wParam = %04x\n", wParam);
1538
1539 SendMessage16(ci->hwndActiveChild,WM_SYSCOMMAND, wParam, (LPARAM)msg->wParam);
1540 return 1;
1541 }
1542
1543
1544 /***********************************************************************
1545 * CalcChildScroll (USER.462)
1546 */
1547 void CalcChildScroll( HWND hwnd, WORD scroll )
1548 {
1549 RECT16 childRect, clientRect;
1550 INT vmin, vmax, hmin, hmax, vpos, hpos;
1551 BOOL noscroll = FALSE;
1552 WND *pWnd, *Wnd;
1553
1554 if (!(Wnd = pWnd = WIN_FindWndPtr( hwnd ))) return;
1555 GetClientRect16( hwnd, &clientRect );
1556 SetRectEmpty16( &childRect );
1557
1558 for ( pWnd = pWnd->child; pWnd; pWnd = pWnd->next )
1559 {
1560 UnionRect16( &childRect, &pWnd->rectWindow, &childRect );
1561 if( pWnd->dwStyle & WS_MAXIMIZE )
1562 noscroll = TRUE;
1563 }
1564 UnionRect16( &childRect, &clientRect, &childRect );
1565
1566 /* jump through the hoops to prevent excessive flashing
1567 */
1568
1569 hmin = childRect.left; hmax = childRect.right - clientRect.right;
1570 hpos = clientRect.left - childRect.left;
1571 vmin = childRect.top; vmax = childRect.bottom - clientRect.bottom;
1572 vpos = clientRect.top - childRect.top;
1573
1574 if( noscroll )
1575 ShowScrollBar(hwnd, SB_BOTH, FALSE);
1576 else
1577 switch( scroll )
1578 {
1579 case SB_HORZ:
1580 vpos = hpos; vmin = hmin; vmax = hmax;
1581 case SB_VERT:
1582 SetScrollPos(hwnd, scroll, vpos, FALSE);
1583 SetScrollRange(hwnd, scroll, vmin, vmax, TRUE);
1584 break;
1585 case SB_BOTH:
1586 SCROLL_SetNCSbState( Wnd, vmin, vmax, vpos,
1587 hmin, hmax, hpos);
1588 SetWindowPos(hwnd, 0, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE
1589 | SWP_NOACTIVATE | SWP_NOZORDER | SWP_FRAMECHANGED );
1590 }
1591 }
1592
1593 /***********************************************************************
1594 * ScrollChildren (USER.463)
1595 */
1596 void ScrollChildren(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
1597 {
1598 WND *wndPtr = WIN_FindWndPtr(hWnd);
1599 short newPos=-1;
1600 short curPos;
1601 short length;
1602 INT16 minPos;
1603 INT16 maxPos;
1604 short shift;
1605
1606 if( !wndPtr ) return;
1607
1608 if( uMsg == WM_HSCROLL )
1609 {
1610 GetScrollRange(hWnd,SB_HORZ,&minPos,&maxPos);
1611 curPos = GetScrollPos(hWnd,SB_HORZ);
1612 length = (wndPtr->rectClient.right - wndPtr->rectClient.left)/2;
1613 shift = SYSMETRICS_CYHSCROLL;
1614 }
1615 else if( uMsg == WM_VSCROLL )
1616 {
1617 GetScrollRange(hWnd,SB_VERT,&minPos,&maxPos);
1618 curPos = GetScrollPos(hWnd,SB_VERT);
1619 length = (wndPtr->rectClient.bottom - wndPtr->rectClient.top)/2;
1620 shift = SYSMETRICS_CXVSCROLL;
1621 }
1622 else return;
1623
1624 switch( wParam )
1625 {
1626 case SB_LINEUP:
1627 newPos = curPos - shift;
1628 break;
1629 case SB_LINEDOWN:
1630 newPos = curPos + shift;
1631 break;
1632 case SB_PAGEUP:
1633 newPos = curPos - length;
1634 break;
1635 case SB_PAGEDOWN:
1636 newPos = curPos + length;
1637 break;
1638
1639 case SB_THUMBPOSITION:
1640 newPos = LOWORD(lParam);
1641 break;
1642
1643 case SB_THUMBTRACK:
1644 return;
1645
1646 case SB_TOP:
1647 newPos = minPos;
1648 break;
1649 case SB_BOTTOM:
1650 newPos = maxPos;
1651 break;
1652 case SB_ENDSCROLL:
1653 CalcChildScroll(hWnd,(uMsg == WM_VSCROLL)?SB_VERT:SB_HORZ);
1654 return;
1655 }
1656
1657 if( newPos > maxPos )
1658 newPos = maxPos;
1659 else if( newPos < minPos )
1660 newPos = minPos;
1661
1662 SetScrollPos(hWnd, (uMsg == WM_VSCROLL)?SB_VERT:SB_HORZ , newPos, TRUE);
1663
1664 if( uMsg == WM_VSCROLL )
1665 ScrollWindow(hWnd ,0 ,curPos - newPos, NULL, NULL);
1666 else
1667 ScrollWindow(hWnd ,curPos - newPos, 0, NULL, NULL);
1668 }
1669
Maarten's multimedia branch