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