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