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