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