quartz: Free two assert calls from having side effects.
[wine/testsucceed.git] / dlls / comctl32 / propsheet.c
blobe6d2d30b3ea37508f285707b05d743d6937938be
1 /*
2 * Property Sheets
4 * Copyright 1998 Francis Beaudet
5 * Copyright 1999 Thuy Nguyen
6 * Copyright 2004 Maxime Bellenge
7 * Copyright 2004 Filip Navara
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
23 * This code was audited for completeness against the documented features
24 * of Comctl32.dll version 6.0 on Sep. 12, 2004, by Filip Navara.
26 * Unless otherwise noted, we believe this code to be complete, as per
27 * the specification mentioned above.
28 * If you discover missing features, or bugs, please note them below.
30 * TODO:
31 * - Tab order
32 * - Wizard 97 header resizing
33 * - Enforcing of minimal wizard size
34 * - Messages:
35 * o PSM_INSERTPAGE
36 * o PSM_RECALCPAGESIZES
37 * o PSM_SETHEADERSUBTITLE
38 * o PSM_SETHEADERTITLE
39 * o WM_HELP
40 * o WM_CONTEXTMENU
41 * - Notifications:
42 * o PSN_GETOBJECT
43 * o PSN_QUERYINITIALFOCUS
44 * o PSN_TRANSLATEACCELERATOR
45 * - Styles:
46 * o PSH_RTLREADING
47 * o PSH_STRETCHWATERMARK
48 * o PSH_USEPAGELANG
49 * o PSH_USEPSTARTPAGE
50 * - Page styles:
51 * o PSP_USEFUSIONCONTEXT
52 * o PSP_USEREFPARENT
55 #include <stdarg.h>
56 #include <string.h>
58 #define NONAMELESSUNION
59 #define NONAMELESSSTRUCT
60 #include "windef.h"
61 #include "winbase.h"
62 #include "wingdi.h"
63 #include "winuser.h"
64 #include "winnls.h"
65 #include "commctrl.h"
66 #include "prsht.h"
67 #include "comctl32.h"
68 #include "uxtheme.h"
70 #include "wine/debug.h"
71 #include "wine/unicode.h"
73 /******************************************************************************
74 * Data structures
76 #include "pshpack2.h"
78 typedef struct
80 WORD dlgVer;
81 WORD signature;
82 DWORD helpID;
83 DWORD exStyle;
84 DWORD style;
85 } MyDLGTEMPLATEEX;
87 typedef struct
89 DWORD helpid;
90 DWORD exStyle;
91 DWORD style;
92 short x;
93 short y;
94 short cx;
95 short cy;
96 DWORD id;
97 } MyDLGITEMTEMPLATEEX;
98 #include "poppack.h"
100 typedef struct tagPropPageInfo
102 HPROPSHEETPAGE hpage; /* to keep track of pages not passed to PropertySheet */
103 HWND hwndPage;
104 BOOL isDirty;
105 LPCWSTR pszText;
106 BOOL hasHelp;
107 BOOL useCallback;
108 BOOL hasIcon;
109 } PropPageInfo;
111 typedef struct tagPropSheetInfo
113 HWND hwnd;
114 PROPSHEETHEADERW ppshheader;
115 BOOL unicode;
116 LPWSTR strPropertiesFor;
117 int nPages;
118 int active_page;
119 BOOL isModeless;
120 BOOL hasHelp;
121 BOOL hasApply;
122 BOOL hasFinish;
123 BOOL usePropPage;
124 BOOL useCallback;
125 BOOL activeValid;
126 PropPageInfo* proppage;
127 HFONT hFont;
128 HFONT hFontBold;
129 int width;
130 int height;
131 HIMAGELIST hImageList;
132 BOOL ended;
133 INT result;
134 } PropSheetInfo;
136 typedef struct
138 int x;
139 int y;
140 } PADDING_INFO;
142 /******************************************************************************
143 * Defines and global variables
146 static const WCHAR PropSheetInfoStr[] =
147 {'P','r','o','p','e','r','t','y','S','h','e','e','t','I','n','f','o',0 };
149 #define PSP_INTERNAL_UNICODE 0x80000000
151 #define MAX_CAPTION_LENGTH 255
152 #define MAX_TABTEXT_LENGTH 255
153 #define MAX_BUTTONTEXT_LENGTH 64
155 #define INTRNL_ANY_WIZARD (PSH_WIZARD | PSH_WIZARD97_OLD | PSH_WIZARD97_NEW | PSH_WIZARD_LITE)
157 /* Wizard metrics specified in DLUs */
158 #define WIZARD_PADDING 7
159 #define WIZARD_HEADER_HEIGHT 36
161 /******************************************************************************
162 * Prototypes
164 static PADDING_INFO PROPSHEET_GetPaddingInfo(HWND hwndDlg);
165 static void PROPSHEET_SetTitleW(HWND hwndDlg, DWORD dwStyle, LPCWSTR lpszText);
166 static BOOL PROPSHEET_CanSetCurSel(HWND hwndDlg);
167 static BOOL PROPSHEET_SetCurSel(HWND hwndDlg,
168 int index,
169 int skipdir,
170 HPROPSHEETPAGE hpage);
171 static int PROPSHEET_GetPageIndex(HPROPSHEETPAGE hpage, const PropSheetInfo* psInfo);
172 static PADDING_INFO PROPSHEET_GetPaddingInfoWizard(HWND hwndDlg, const PropSheetInfo* psInfo);
173 static BOOL PROPSHEET_DoCommand(HWND hwnd, WORD wID);
175 static INT_PTR CALLBACK
176 PROPSHEET_DialogProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
178 WINE_DEFAULT_DEBUG_CHANNEL(propsheet);
180 #define add_flag(a) if (dwFlags & a) {strcat(string, #a );strcat(string," ");}
181 /******************************************************************************
182 * PROPSHEET_UnImplementedFlags
184 * Document use of flags we don't implement yet.
186 static VOID PROPSHEET_UnImplementedFlags(DWORD dwFlags)
188 CHAR string[256];
190 string[0] = '\0';
193 * unhandled header flags:
194 * PSH_RTLREADING 0x00000800
195 * PSH_STRETCHWATERMARK 0x00040000
196 * PSH_USEPAGELANG 0x00200000
199 add_flag(PSH_RTLREADING);
200 add_flag(PSH_STRETCHWATERMARK);
201 add_flag(PSH_USEPAGELANG);
202 if (string[0] != '\0')
203 FIXME("%s\n", string);
205 #undef add_flag
207 /******************************************************************************
208 * PROPSHEET_GetPageRect
210 * Retrieve rect from tab control and map into the dialog for SetWindowPos
212 static void PROPSHEET_GetPageRect(const PropSheetInfo * psInfo, HWND hwndDlg,
213 RECT *rc, LPCPROPSHEETPAGEW ppshpage)
215 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD) {
216 HWND hwndChild;
217 RECT r;
219 if (((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
220 (psInfo->ppshheader.dwFlags & PSH_HEADER) &&
221 !(ppshpage->dwFlags & PSP_HIDEHEADER)) ||
222 (psInfo->ppshheader.dwFlags & PSH_WIZARD))
224 rc->left = rc->top = WIZARD_PADDING;
226 else
228 rc->left = rc->top = 0;
230 rc->right = psInfo->width - rc->left;
231 rc->bottom = psInfo->height - rc->top;
232 MapDialogRect(hwndDlg, rc);
234 if ((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
235 (psInfo->ppshheader.dwFlags & PSH_HEADER) &&
236 !(ppshpage->dwFlags & PSP_HIDEHEADER))
238 hwndChild = GetDlgItem(hwndDlg, IDC_SUNKEN_LINEHEADER);
239 GetClientRect(hwndChild, &r);
240 MapWindowPoints(hwndChild, hwndDlg, (LPPOINT) &r, 2);
241 rc->top += r.bottom + 1;
243 } else {
244 HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
245 GetClientRect(hwndTabCtrl, rc);
246 SendMessageW(hwndTabCtrl, TCM_ADJUSTRECT, FALSE, (LPARAM)rc);
247 MapWindowPoints(hwndTabCtrl, hwndDlg, (LPPOINT)rc, 2);
251 /******************************************************************************
252 * PROPSHEET_FindPageByResId
254 * Find page index corresponding to page resource id.
256 static INT PROPSHEET_FindPageByResId(const PropSheetInfo * psInfo, LRESULT resId)
258 INT i;
260 for (i = 0; i < psInfo->nPages; i++)
262 LPCPROPSHEETPAGEA lppsp = (LPCPROPSHEETPAGEA)psInfo->proppage[i].hpage;
264 /* Fixme: if resource ID is a string shall we use strcmp ??? */
265 if (lppsp->u.pszTemplate == (LPVOID)resId)
266 break;
269 return i;
272 /******************************************************************************
273 * PROPSHEET_AtoW
275 * Convert ASCII to Unicode since all data is saved as Unicode.
277 static void PROPSHEET_AtoW(LPCWSTR *tostr, LPCSTR frstr)
279 INT len;
280 WCHAR *to;
282 TRACE("<%s>\n", frstr);
283 len = MultiByteToWideChar(CP_ACP, 0, frstr, -1, 0, 0);
284 to = Alloc(len * sizeof(WCHAR));
285 MultiByteToWideChar(CP_ACP, 0, frstr, -1, to, len);
286 *tostr = to;
289 /******************************************************************************
290 * PROPSHEET_CollectSheetInfoCommon
292 * Common code for PROPSHEET_CollectSheetInfoA/W
294 static void PROPSHEET_CollectSheetInfoCommon(PropSheetInfo * psInfo, DWORD dwFlags)
296 PROPSHEET_UnImplementedFlags(dwFlags);
298 psInfo->hasHelp = dwFlags & PSH_HASHELP;
299 psInfo->hasApply = !(dwFlags & PSH_NOAPPLYNOW);
300 psInfo->hasFinish = dwFlags & PSH_WIZARDHASFINISH;
301 psInfo->isModeless = dwFlags & PSH_MODELESS;
302 psInfo->usePropPage = dwFlags & PSH_PROPSHEETPAGE;
303 if (psInfo->active_page < 0 || psInfo->active_page >= psInfo->nPages)
304 psInfo->active_page = 0;
306 psInfo->result = 0;
307 psInfo->hImageList = 0;
308 psInfo->activeValid = FALSE;
311 /******************************************************************************
312 * PROPSHEET_CollectSheetInfoA
314 * Collect relevant data.
316 static void PROPSHEET_CollectSheetInfoA(LPCPROPSHEETHEADERA lppsh,
317 PropSheetInfo * psInfo)
319 DWORD dwSize = min(lppsh->dwSize,sizeof(PROPSHEETHEADERA));
320 DWORD dwFlags = lppsh->dwFlags;
322 psInfo->useCallback = (dwFlags & PSH_USECALLBACK )&& (lppsh->pfnCallback);
324 memcpy(&psInfo->ppshheader,lppsh,dwSize);
325 TRACE("\n** PROPSHEETHEADER **\ndwSize\t\t%d\ndwFlags\t\t%08x\nhwndParent\t%p\nhInstance\t%p\npszCaption\t'%s'\nnPages\t\t%d\npfnCallback\t%p\n",
326 lppsh->dwSize, lppsh->dwFlags, lppsh->hwndParent, lppsh->hInstance,
327 debugstr_a(lppsh->pszCaption), lppsh->nPages, lppsh->pfnCallback);
329 if (lppsh->dwFlags & INTRNL_ANY_WIZARD)
330 psInfo->ppshheader.pszCaption = NULL;
331 else
333 if (!IS_INTRESOURCE(lppsh->pszCaption))
335 int len = MultiByteToWideChar(CP_ACP, 0, lppsh->pszCaption, -1, NULL, 0);
336 WCHAR *caption = Alloc( len*sizeof (WCHAR) );
338 MultiByteToWideChar(CP_ACP, 0, lppsh->pszCaption, -1, caption, len);
339 psInfo->ppshheader.pszCaption = caption;
342 psInfo->nPages = lppsh->nPages;
344 if (dwFlags & PSH_USEPSTARTPAGE)
346 TRACE("PSH_USEPSTARTPAGE is on\n");
347 psInfo->active_page = 0;
349 else
350 psInfo->active_page = lppsh->u2.nStartPage;
352 PROPSHEET_CollectSheetInfoCommon(psInfo, dwFlags);
355 /******************************************************************************
356 * PROPSHEET_CollectSheetInfoW
358 * Collect relevant data.
360 static void PROPSHEET_CollectSheetInfoW(LPCPROPSHEETHEADERW lppsh,
361 PropSheetInfo * psInfo)
363 DWORD dwSize = min(lppsh->dwSize,sizeof(PROPSHEETHEADERW));
364 DWORD dwFlags = lppsh->dwFlags;
366 psInfo->useCallback = (dwFlags & PSH_USECALLBACK) && (lppsh->pfnCallback);
368 memcpy(&psInfo->ppshheader,lppsh,dwSize);
369 TRACE("\n** PROPSHEETHEADER **\ndwSize\t\t%d\ndwFlags\t\t%08x\nhwndParent\t%p\nhInstance\t%p\npszCaption\t%s\nnPages\t\t%d\npfnCallback\t%p\n",
370 lppsh->dwSize, lppsh->dwFlags, lppsh->hwndParent, lppsh->hInstance, debugstr_w(lppsh->pszCaption), lppsh->nPages, lppsh->pfnCallback);
372 if (lppsh->dwFlags & INTRNL_ANY_WIZARD)
373 psInfo->ppshheader.pszCaption = NULL;
374 else
376 if (!IS_INTRESOURCE(lppsh->pszCaption))
378 int len = strlenW(lppsh->pszCaption);
379 WCHAR *caption = Alloc( (len+1)*sizeof(WCHAR) );
381 psInfo->ppshheader.pszCaption = strcpyW( caption, lppsh->pszCaption );
384 psInfo->nPages = lppsh->nPages;
386 if (dwFlags & PSH_USEPSTARTPAGE)
388 TRACE("PSH_USEPSTARTPAGE is on\n");
389 psInfo->active_page = 0;
391 else
392 psInfo->active_page = lppsh->u2.nStartPage;
394 PROPSHEET_CollectSheetInfoCommon(psInfo, dwFlags);
397 /******************************************************************************
398 * PROPSHEET_CollectPageInfo
400 * Collect property sheet data.
401 * With code taken from DIALOG_ParseTemplate32.
403 static BOOL PROPSHEET_CollectPageInfo(LPCPROPSHEETPAGEW lppsp,
404 PropSheetInfo * psInfo,
405 int index, BOOL resize)
407 const DLGTEMPLATE* pTemplate;
408 const WORD* p;
409 DWORD dwFlags;
410 int width, height;
412 if (!lppsp)
413 return FALSE;
415 TRACE("\n");
416 psInfo->proppage[index].hpage = (HPROPSHEETPAGE)lppsp;
417 psInfo->proppage[index].hwndPage = 0;
418 psInfo->proppage[index].isDirty = FALSE;
421 * Process property page flags.
423 dwFlags = lppsp->dwFlags;
424 psInfo->proppage[index].useCallback = (dwFlags & PSP_USECALLBACK) && (lppsp->pfnCallback);
425 psInfo->proppage[index].hasHelp = dwFlags & PSP_HASHELP;
426 psInfo->proppage[index].hasIcon = dwFlags & (PSP_USEHICON | PSP_USEICONID);
428 /* as soon as we have a page with the help flag, set the sheet flag on */
429 if (psInfo->proppage[index].hasHelp)
430 psInfo->hasHelp = TRUE;
433 * Process page template.
435 if (dwFlags & PSP_DLGINDIRECT)
436 pTemplate = lppsp->u.pResource;
437 else if(dwFlags & PSP_INTERNAL_UNICODE )
439 HRSRC hResource = FindResourceW(lppsp->hInstance,
440 lppsp->u.pszTemplate,
441 (LPWSTR)RT_DIALOG);
442 HGLOBAL hTemplate = LoadResource(lppsp->hInstance,
443 hResource);
444 pTemplate = LockResource(hTemplate);
446 else
448 HRSRC hResource = FindResourceA(lppsp->hInstance,
449 (LPCSTR)lppsp->u.pszTemplate,
450 (LPSTR)RT_DIALOG);
451 HGLOBAL hTemplate = LoadResource(lppsp->hInstance,
452 hResource);
453 pTemplate = LockResource(hTemplate);
457 * Extract the size of the page and the caption.
459 if (!pTemplate)
460 return FALSE;
462 p = (const WORD *)pTemplate;
464 if (((const MyDLGTEMPLATEEX*)pTemplate)->signature == 0xFFFF)
466 /* DLGTEMPLATEEX (not defined in any std. header file) */
468 p++; /* dlgVer */
469 p++; /* signature */
470 p += 2; /* help ID */
471 p += 2; /* ext style */
472 p += 2; /* style */
474 else
476 /* DLGTEMPLATE */
478 p += 2; /* style */
479 p += 2; /* ext style */
482 p++; /* nb items */
483 p++; /* x */
484 p++; /* y */
485 width = (WORD)*p; p++;
486 height = (WORD)*p; p++;
488 /* Special calculation for interior wizard pages so the largest page is
489 * calculated correctly. We need to add all the padding and space occupied
490 * by the header so the width and height sums up to the whole wizard client
491 * area. */
492 if ((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
493 (psInfo->ppshheader.dwFlags & PSH_HEADER) &&
494 !(dwFlags & PSP_HIDEHEADER))
496 height += 2 * WIZARD_PADDING + WIZARD_HEADER_HEIGHT;
497 width += 2 * WIZARD_PADDING;
499 if (psInfo->ppshheader.dwFlags & PSH_WIZARD)
501 height += 2 * WIZARD_PADDING;
502 width += 2 * WIZARD_PADDING;
505 /* remember the largest width and height */
506 if (resize)
508 if (width > psInfo->width)
509 psInfo->width = width;
511 if (height > psInfo->height)
512 psInfo->height = height;
515 /* menu */
516 switch ((WORD)*p)
518 case 0x0000:
519 p++;
520 break;
521 case 0xffff:
522 p += 2;
523 break;
524 default:
525 p += lstrlenW( p ) + 1;
526 break;
529 /* class */
530 switch ((WORD)*p)
532 case 0x0000:
533 p++;
534 break;
535 case 0xffff:
536 p += 2;
537 break;
538 default:
539 p += lstrlenW( p ) + 1;
540 break;
543 /* Extract the caption */
544 psInfo->proppage[index].pszText = p;
545 TRACE("Tab %d %s\n",index,debugstr_w( p ));
547 if (dwFlags & PSP_USETITLE)
549 WCHAR szTitle[256];
550 const WCHAR *pTitle;
551 static const WCHAR pszNull[] = { '(','n','u','l','l',')',0 };
552 WCHAR *text;
553 int len;
555 if (IS_INTRESOURCE( lppsp->pszTitle ))
557 if (!LoadStringW( lppsp->hInstance, (DWORD_PTR)lppsp->pszTitle,szTitle,sizeof(szTitle)/sizeof(szTitle[0]) ))
559 pTitle = pszNull;
560 FIXME("Could not load resource #%04x?\n",LOWORD(lppsp->pszTitle));
562 else
563 pTitle = szTitle;
565 else
566 pTitle = lppsp->pszTitle;
568 len = strlenW(pTitle);
569 text = Alloc( (len+1)*sizeof (WCHAR) );
570 psInfo->proppage[index].pszText = strcpyW( text, pTitle);
574 * Build the image list for icons
576 if ((dwFlags & PSP_USEHICON) || (dwFlags & PSP_USEICONID))
578 HICON hIcon;
579 int icon_cx = GetSystemMetrics(SM_CXSMICON);
580 int icon_cy = GetSystemMetrics(SM_CYSMICON);
582 if (dwFlags & PSP_USEICONID)
583 hIcon = LoadImageW(lppsp->hInstance, lppsp->u2.pszIcon, IMAGE_ICON,
584 icon_cx, icon_cy, LR_DEFAULTCOLOR);
585 else
586 hIcon = lppsp->u2.hIcon;
588 if ( hIcon )
590 if (psInfo->hImageList == 0 )
591 psInfo->hImageList = ImageList_Create(icon_cx, icon_cy, ILC_COLOR, 1, 1);
593 ImageList_AddIcon(psInfo->hImageList, hIcon);
598 return TRUE;
601 /******************************************************************************
602 * PROPSHEET_CreateDialog
604 * Creates the actual property sheet.
606 static INT_PTR PROPSHEET_CreateDialog(PropSheetInfo* psInfo)
608 LRESULT ret;
609 LPCVOID template;
610 LPVOID temp = 0;
611 HRSRC hRes;
612 DWORD resSize;
613 WORD resID = IDD_PROPSHEET;
615 TRACE("(%p)\n", psInfo);
616 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
617 resID = IDD_WIZARD;
619 if( psInfo->unicode )
621 if(!(hRes = FindResourceW(COMCTL32_hModule,
622 MAKEINTRESOURCEW(resID),
623 (LPWSTR)RT_DIALOG)))
624 return -1;
626 else
628 if(!(hRes = FindResourceA(COMCTL32_hModule,
629 MAKEINTRESOURCEA(resID),
630 (LPSTR)RT_DIALOG)))
631 return -1;
634 if(!(template = LoadResource(COMCTL32_hModule, hRes)))
635 return -1;
638 * Make a copy of the dialog template.
640 resSize = SizeofResource(COMCTL32_hModule, hRes);
642 temp = Alloc(resSize);
644 if (!temp)
645 return -1;
647 memcpy(temp, template, resSize);
649 if (psInfo->ppshheader.dwFlags & PSH_NOCONTEXTHELP)
651 if (((MyDLGTEMPLATEEX*)temp)->signature == 0xFFFF)
652 ((MyDLGTEMPLATEEX*)temp)->style &= ~DS_CONTEXTHELP;
653 else
654 ((DLGTEMPLATE*)temp)->style &= ~DS_CONTEXTHELP;
656 if ((psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD) &&
657 (psInfo->ppshheader.dwFlags & PSH_WIZARDCONTEXTHELP))
659 if (((MyDLGTEMPLATEEX*)temp)->signature == 0xFFFF)
660 ((MyDLGTEMPLATEEX*)temp)->style |= DS_CONTEXTHELP;
661 else
662 ((DLGTEMPLATE*)temp)->style |= DS_CONTEXTHELP;
665 if (psInfo->useCallback)
666 (*(psInfo->ppshheader.pfnCallback))(0, PSCB_PRECREATE, (LPARAM)temp);
668 /* NOTE: MSDN states "Returns a positive value if successful, or -1
669 * otherwise for modal property sheets.", but this is wrong. The
670 * actual return value is either TRUE (success), FALSE (cancel) or
671 * -1 (error). */
672 if( psInfo->unicode )
674 ret = (INT_PTR)CreateDialogIndirectParamW(psInfo->ppshheader.hInstance,
675 temp, psInfo->ppshheader.hwndParent,
676 PROPSHEET_DialogProc, (LPARAM)psInfo);
677 if ( !ret ) ret = -1;
679 else
681 ret = (INT_PTR)CreateDialogIndirectParamA(psInfo->ppshheader.hInstance,
682 temp, psInfo->ppshheader.hwndParent,
683 PROPSHEET_DialogProc, (LPARAM)psInfo);
684 if ( !ret ) ret = -1;
687 Free(temp);
689 return ret;
692 /******************************************************************************
693 * PROPSHEET_SizeMismatch
695 * Verify that the tab control and the "largest" property sheet page dlg. template
696 * match in size.
698 static BOOL PROPSHEET_SizeMismatch(HWND hwndDlg, const PropSheetInfo* psInfo)
700 HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
701 RECT rcOrigTab, rcPage;
704 * Original tab size.
706 GetClientRect(hwndTabCtrl, &rcOrigTab);
707 TRACE("orig tab %s\n", wine_dbgstr_rect(&rcOrigTab));
710 * Biggest page size.
712 rcPage.left = 0;
713 rcPage.top = 0;
714 rcPage.right = psInfo->width;
715 rcPage.bottom = psInfo->height;
717 MapDialogRect(hwndDlg, &rcPage);
718 TRACE("biggest page %s\n", wine_dbgstr_rect(&rcPage));
720 if ( (rcPage.right - rcPage.left) != (rcOrigTab.right - rcOrigTab.left) )
721 return TRUE;
722 if ( (rcPage.bottom - rcPage.top) != (rcOrigTab.bottom - rcOrigTab.top) )
723 return TRUE;
725 return FALSE;
728 /******************************************************************************
729 * PROPSHEET_AdjustSize
731 * Resizes the property sheet and the tab control to fit the largest page.
733 static BOOL PROPSHEET_AdjustSize(HWND hwndDlg, PropSheetInfo* psInfo)
735 HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
736 HWND hwndButton = GetDlgItem(hwndDlg, IDOK);
737 RECT rc,tabRect;
738 int buttonHeight;
739 PADDING_INFO padding = PROPSHEET_GetPaddingInfo(hwndDlg);
740 RECT units;
741 LONG style;
743 /* Get the height of buttons */
744 GetClientRect(hwndButton, &rc);
745 buttonHeight = rc.bottom;
748 * Biggest page size.
750 rc.left = 0;
751 rc.top = 0;
752 rc.right = psInfo->width;
753 rc.bottom = psInfo->height;
755 MapDialogRect(hwndDlg, &rc);
757 /* retrieve the dialog units */
758 units.left = units.right = 4;
759 units.top = units.bottom = 8;
760 MapDialogRect(hwndDlg, &units);
763 * Resize the tab control.
765 GetClientRect(hwndTabCtrl,&tabRect);
767 SendMessageW(hwndTabCtrl, TCM_ADJUSTRECT, FALSE, (LPARAM)&tabRect);
769 if ((rc.bottom - rc.top) < (tabRect.bottom - tabRect.top))
771 rc.bottom = rc.top + tabRect.bottom - tabRect.top;
772 psInfo->height = MulDiv((rc.bottom - rc.top),8,units.top);
775 if ((rc.right - rc.left) < (tabRect.right - tabRect.left))
777 rc.right = rc.left + tabRect.right - tabRect.left;
778 psInfo->width = MulDiv((rc.right - rc.left),4,units.left);
781 SendMessageW(hwndTabCtrl, TCM_ADJUSTRECT, TRUE, (LPARAM)&rc);
783 rc.right -= rc.left;
784 rc.bottom -= rc.top;
785 TRACE("setting tab %p, rc (0,0)-(%d,%d)\n",
786 hwndTabCtrl, rc.right, rc.bottom);
787 SetWindowPos(hwndTabCtrl, 0, 0, 0, rc.right, rc.bottom,
788 SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE);
790 GetClientRect(hwndTabCtrl, &rc);
792 TRACE("tab client rc %s\n", wine_dbgstr_rect(&rc));
794 rc.right += (padding.x * 2);
795 rc.bottom += buttonHeight + (3 * padding.y);
797 style = GetWindowLongW(hwndDlg, GWL_STYLE);
798 if (!(style & WS_CHILD))
799 AdjustWindowRect(&rc, style, FALSE);
801 rc.right -= rc.left;
802 rc.bottom -= rc.top;
805 * Resize the property sheet.
807 TRACE("setting dialog %p, rc (0,0)-(%d,%d)\n",
808 hwndDlg, rc.right, rc.bottom);
809 SetWindowPos(hwndDlg, 0, 0, 0, rc.right, rc.bottom,
810 SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE);
811 return TRUE;
814 /******************************************************************************
815 * PROPSHEET_AdjustSizeWizard
817 * Resizes the property sheet to fit the largest page.
819 static BOOL PROPSHEET_AdjustSizeWizard(HWND hwndDlg, const PropSheetInfo* psInfo)
821 HWND hwndLine = GetDlgItem(hwndDlg, IDC_SUNKEN_LINE);
822 RECT rc, lineRect, dialogRect;
824 /* Biggest page size */
825 rc.left = 0;
826 rc.top = 0;
827 rc.right = psInfo->width;
828 rc.bottom = psInfo->height;
829 MapDialogRect(hwndDlg, &rc);
831 TRACE("Biggest page %s\n", wine_dbgstr_rect(&rc));
833 /* Add space for the buttons row */
834 GetWindowRect(hwndLine, &lineRect);
835 MapWindowPoints(NULL, hwndDlg, (LPPOINT)&lineRect, 2);
836 GetClientRect(hwndDlg, &dialogRect);
837 rc.bottom += dialogRect.bottom - lineRect.top - 1;
839 /* Convert the client coordinates to window coordinates */
840 AdjustWindowRect(&rc, GetWindowLongW(hwndDlg, GWL_STYLE), FALSE);
842 /* Resize the property sheet */
843 TRACE("setting dialog %p, rc (0,0)-(%d,%d)\n",
844 hwndDlg, rc.right, rc.bottom);
845 SetWindowPos(hwndDlg, 0, 0, 0, rc.right - rc.left, rc.bottom - rc.top,
846 SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE);
848 return TRUE;
851 /******************************************************************************
852 * PROPSHEET_AdjustButtons
854 * Adjusts the buttons' positions.
856 static BOOL PROPSHEET_AdjustButtons(HWND hwndParent, const PropSheetInfo* psInfo)
858 HWND hwndButton = GetDlgItem(hwndParent, IDOK);
859 RECT rcSheet;
860 int x, y;
861 int num_buttons = 2;
862 int buttonWidth, buttonHeight;
863 PADDING_INFO padding = PROPSHEET_GetPaddingInfo(hwndParent);
865 if (psInfo->hasApply)
866 num_buttons++;
868 if (psInfo->hasHelp)
869 num_buttons++;
872 * Obtain the size of the buttons.
874 GetClientRect(hwndButton, &rcSheet);
875 buttonWidth = rcSheet.right;
876 buttonHeight = rcSheet.bottom;
879 * Get the size of the property sheet.
881 GetClientRect(hwndParent, &rcSheet);
884 * All buttons will be at this y coordinate.
886 y = rcSheet.bottom - (padding.y + buttonHeight);
889 * Position OK button and make it default.
891 hwndButton = GetDlgItem(hwndParent, IDOK);
893 x = rcSheet.right - ((padding.x + buttonWidth) * num_buttons);
895 SetWindowPos(hwndButton, 0, x, y, 0, 0,
896 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
898 SendMessageW(hwndParent, DM_SETDEFID, IDOK, 0);
902 * Position Cancel button.
904 hwndButton = GetDlgItem(hwndParent, IDCANCEL);
906 x += padding.x + buttonWidth;
908 SetWindowPos(hwndButton, 0, x, y, 0, 0,
909 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
912 * Position Apply button.
914 hwndButton = GetDlgItem(hwndParent, IDC_APPLY_BUTTON);
916 if(psInfo->hasApply)
917 x += padding.x + buttonWidth;
918 else
919 ShowWindow(hwndButton, SW_HIDE);
921 SetWindowPos(hwndButton, 0, x, y, 0, 0,
922 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
923 EnableWindow(hwndButton, FALSE);
926 * Position Help button.
928 hwndButton = GetDlgItem(hwndParent, IDHELP);
930 x += padding.x + buttonWidth;
931 SetWindowPos(hwndButton, 0, x, y, 0, 0,
932 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
934 if(!psInfo->hasHelp)
935 ShowWindow(hwndButton, SW_HIDE);
937 return TRUE;
940 /******************************************************************************
941 * PROPSHEET_AdjustButtonsWizard
943 * Adjusts the buttons' positions.
945 static BOOL PROPSHEET_AdjustButtonsWizard(HWND hwndParent,
946 const PropSheetInfo* psInfo)
948 HWND hwndButton = GetDlgItem(hwndParent, IDCANCEL);
949 HWND hwndLine = GetDlgItem(hwndParent, IDC_SUNKEN_LINE);
950 HWND hwndLineHeader = GetDlgItem(hwndParent, IDC_SUNKEN_LINEHEADER);
951 RECT rcSheet;
952 int x, y;
953 int num_buttons = 3;
954 int buttonWidth, buttonHeight, lineHeight, lineWidth;
955 PADDING_INFO padding = PROPSHEET_GetPaddingInfoWizard(hwndParent, psInfo);
957 if (psInfo->hasHelp)
958 num_buttons++;
959 if (psInfo->hasFinish)
960 num_buttons++;
963 * Obtain the size of the buttons.
965 GetClientRect(hwndButton, &rcSheet);
966 buttonWidth = rcSheet.right;
967 buttonHeight = rcSheet.bottom;
969 GetClientRect(hwndLine, &rcSheet);
970 lineHeight = rcSheet.bottom;
973 * Get the size of the property sheet.
975 GetClientRect(hwndParent, &rcSheet);
978 * All buttons will be at this y coordinate.
980 y = rcSheet.bottom - (padding.y + buttonHeight);
983 * Position the Back button.
985 hwndButton = GetDlgItem(hwndParent, IDC_BACK_BUTTON);
987 x = rcSheet.right - ((padding.x + buttonWidth) * (num_buttons - 1)) - buttonWidth;
989 SetWindowPos(hwndButton, 0, x, y, 0, 0,
990 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
993 * Position the Next button.
995 hwndButton = GetDlgItem(hwndParent, IDC_NEXT_BUTTON);
997 x += buttonWidth;
999 SetWindowPos(hwndButton, 0, x, y, 0, 0,
1000 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
1003 * Position the Finish button.
1005 hwndButton = GetDlgItem(hwndParent, IDC_FINISH_BUTTON);
1007 if (psInfo->hasFinish)
1008 x += padding.x + buttonWidth;
1010 SetWindowPos(hwndButton, 0, x, y, 0, 0,
1011 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
1013 if (!psInfo->hasFinish)
1014 ShowWindow(hwndButton, SW_HIDE);
1017 * Position the Cancel button.
1019 hwndButton = GetDlgItem(hwndParent, IDCANCEL);
1021 x += padding.x + buttonWidth;
1023 SetWindowPos(hwndButton, 0, x, y, 0, 0,
1024 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
1027 * Position Help button.
1029 hwndButton = GetDlgItem(hwndParent, IDHELP);
1031 if (psInfo->hasHelp)
1033 x += padding.x + buttonWidth;
1035 SetWindowPos(hwndButton, 0, x, y, 0, 0,
1036 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
1038 else
1039 ShowWindow(hwndButton, SW_HIDE);
1041 if (psInfo->ppshheader.dwFlags &
1042 (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW | PSH_WIZARD_LITE))
1043 padding.x = 0;
1046 * Position and resize the sunken line.
1048 x = padding.x;
1049 y = rcSheet.bottom - ((padding.y * 2) + buttonHeight + lineHeight);
1051 lineWidth = rcSheet.right - (padding.x * 2);
1052 SetWindowPos(hwndLine, 0, x, y, lineWidth, 2,
1053 SWP_NOZORDER | SWP_NOACTIVATE);
1056 * Position and resize the header sunken line.
1059 SetWindowPos(hwndLineHeader, 0, 0, 0, rcSheet.right, 2,
1060 SWP_NOZORDER | SWP_NOMOVE | SWP_NOACTIVATE);
1061 if (!(psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)))
1062 ShowWindow(hwndLineHeader, SW_HIDE);
1064 return TRUE;
1067 /******************************************************************************
1068 * PROPSHEET_GetPaddingInfo
1070 * Returns the layout information.
1072 static PADDING_INFO PROPSHEET_GetPaddingInfo(HWND hwndDlg)
1074 HWND hwndTab = GetDlgItem(hwndDlg, IDC_TABCONTROL);
1075 RECT rcTab;
1076 PADDING_INFO padding;
1078 GetWindowRect(hwndTab, &rcTab);
1079 MapWindowPoints( 0, hwndDlg, (POINT *)&rcTab, 2 );
1081 padding.x = rcTab.left;
1082 padding.y = rcTab.top;
1084 return padding;
1087 /******************************************************************************
1088 * PROPSHEET_GetPaddingInfoWizard
1090 * Returns the layout information.
1091 * Vertical spacing is the distance between the line and the buttons.
1092 * Do NOT use the Help button to gather padding information when it isn't mapped
1093 * (PSH_HASHELP), as app writers aren't forced to supply correct coordinates
1094 * for it in this case !
1095 * FIXME: I'm not sure about any other coordinate problems with these evil
1096 * buttons. Fix it in case additional problems appear or maybe calculate
1097 * a padding in a completely different way, as this is somewhat messy.
1099 static PADDING_INFO PROPSHEET_GetPaddingInfoWizard(HWND hwndDlg, const PropSheetInfo*
1100 psInfo)
1102 PADDING_INFO padding;
1103 RECT rc;
1104 HWND hwndControl;
1105 INT idButton;
1106 POINT ptButton, ptLine;
1108 TRACE("\n");
1109 if (psInfo->hasHelp)
1111 idButton = IDHELP;
1113 else
1115 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
1117 idButton = IDC_NEXT_BUTTON;
1119 else
1121 /* hopefully this is ok */
1122 idButton = IDCANCEL;
1126 hwndControl = GetDlgItem(hwndDlg, idButton);
1127 GetWindowRect(hwndControl, &rc);
1128 MapWindowPoints( 0, hwndDlg, (POINT *)&rc, 2 );
1129 ptButton.x = rc.left;
1130 ptButton.y = rc.top;
1132 /* Line */
1133 hwndControl = GetDlgItem(hwndDlg, IDC_SUNKEN_LINE);
1134 GetWindowRect(hwndControl, &rc);
1135 MapWindowPoints( 0, hwndDlg, (POINT *)&rc, 2 );
1136 ptLine.x = rc.left;
1137 ptLine.y = rc.bottom;
1139 padding.y = ptButton.y - ptLine.y;
1141 if (padding.y < 0)
1142 ERR("padding negative ! Please report this !\n");
1144 /* this is most probably not correct, but the best we have now */
1145 padding.x = padding.y;
1146 return padding;
1149 /******************************************************************************
1150 * PROPSHEET_CreateTabControl
1152 * Insert the tabs in the tab control.
1154 static BOOL PROPSHEET_CreateTabControl(HWND hwndParent,
1155 const PropSheetInfo * psInfo)
1157 HWND hwndTabCtrl = GetDlgItem(hwndParent, IDC_TABCONTROL);
1158 TCITEMW item;
1159 int i, nTabs;
1160 int iImage = 0;
1162 TRACE("\n");
1163 item.mask = TCIF_TEXT;
1164 item.cchTextMax = MAX_TABTEXT_LENGTH;
1166 nTabs = psInfo->nPages;
1169 * Set the image list for icons.
1171 if (psInfo->hImageList)
1173 SendMessageW(hwndTabCtrl, TCM_SETIMAGELIST, 0, (LPARAM)psInfo->hImageList);
1176 SendMessageW(GetDlgItem(hwndTabCtrl, IDC_TABCONTROL), WM_SETREDRAW, 0, 0);
1177 for (i = 0; i < nTabs; i++)
1179 if ( psInfo->proppage[i].hasIcon )
1181 item.mask |= TCIF_IMAGE;
1182 item.iImage = iImage++;
1184 else
1186 item.mask &= ~TCIF_IMAGE;
1189 item.pszText = (LPWSTR) psInfo->proppage[i].pszText;
1190 SendMessageW(hwndTabCtrl, TCM_INSERTITEMW, i, (LPARAM)&item);
1192 SendMessageW(GetDlgItem(hwndTabCtrl, IDC_TABCONTROL), WM_SETREDRAW, 1, 0);
1194 return TRUE;
1197 /******************************************************************************
1198 * PROPSHEET_WizardSubclassProc
1200 * Subclassing window procedure for wizard exterior pages to prevent drawing
1201 * background and so drawing above the watermark.
1203 static LRESULT CALLBACK
1204 PROPSHEET_WizardSubclassProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam, UINT_PTR uID, DWORD_PTR dwRef)
1206 switch (uMsg)
1208 case WM_ERASEBKGND:
1209 return TRUE;
1211 case WM_CTLCOLORSTATIC:
1212 SetBkColor((HDC)wParam, GetSysColor(COLOR_WINDOW));
1213 return (INT_PTR)GetSysColorBrush(COLOR_WINDOW);
1216 return DefSubclassProc(hwnd, uMsg, wParam, lParam);
1220 * Get the size of an in-memory Template
1222 *( Based on the code of PROPSHEET_CollectPageInfo)
1223 * See also dialog.c/DIALOG_ParseTemplate32().
1226 static UINT GetTemplateSize(const DLGTEMPLATE* pTemplate)
1229 const WORD* p = (const WORD *)pTemplate;
1230 BOOL istemplateex = (((const MyDLGTEMPLATEEX*)pTemplate)->signature == 0xFFFF);
1231 WORD nrofitems;
1232 UINT ret;
1234 if (istemplateex)
1236 /* DLGTEMPLATEEX (not defined in any std. header file) */
1238 TRACE("is DLGTEMPLATEEX\n");
1239 p++; /* dlgVer */
1240 p++; /* signature */
1241 p += 2; /* help ID */
1242 p += 2; /* ext style */
1243 p += 2; /* style */
1245 else
1247 /* DLGTEMPLATE */
1249 TRACE("is DLGTEMPLATE\n");
1250 p += 2; /* style */
1251 p += 2; /* ext style */
1254 nrofitems = (WORD)*p; p++; /* nb items */
1255 p++; /* x */
1256 p++; /* y */
1257 p++; /* width */
1258 p++; /* height */
1260 /* menu */
1261 switch ((WORD)*p)
1263 case 0x0000:
1264 p++;
1265 break;
1266 case 0xffff:
1267 p += 2;
1268 break;
1269 default:
1270 TRACE("menu %s\n",debugstr_w( p ));
1271 p += lstrlenW( p ) + 1;
1272 break;
1275 /* class */
1276 switch ((WORD)*p)
1278 case 0x0000:
1279 p++;
1280 break;
1281 case 0xffff:
1282 p += 2; /* 0xffff plus predefined window class ordinal value */
1283 break;
1284 default:
1285 TRACE("class %s\n",debugstr_w( p ));
1286 p += lstrlenW( p ) + 1;
1287 break;
1290 /* title */
1291 TRACE("title %s\n",debugstr_w( p ));
1292 p += lstrlenW( p ) + 1;
1294 /* font, if DS_SETFONT set */
1295 if ((DS_SETFONT & ((istemplateex)? ((const MyDLGTEMPLATEEX*)pTemplate)->style :
1296 pTemplate->style)))
1298 p+=(istemplateex)?3:1;
1299 TRACE("font %s\n",debugstr_w( p ));
1300 p += lstrlenW( p ) + 1; /* the font name */
1303 /* now process the DLGITEMTEMPLATE(EX) structs (plus custom data)
1304 * that are following the DLGTEMPLATE(EX) data */
1305 TRACE("%d items\n",nrofitems);
1306 while (nrofitems > 0)
1308 p = (WORD*)(((DWORD_PTR)p + 3) & ~3); /* DWORD align */
1310 /* skip header */
1311 p += (istemplateex ? sizeof(MyDLGITEMTEMPLATEEX) : sizeof(DLGITEMTEMPLATE))/sizeof(WORD);
1313 /* check class */
1314 switch ((WORD)*p)
1316 case 0x0000:
1317 p++;
1318 break;
1319 case 0xffff:
1320 TRACE("class ordinal 0x%08x\n",*(const DWORD*)p);
1321 p += 2;
1322 break;
1323 default:
1324 TRACE("class %s\n",debugstr_w( p ));
1325 p += lstrlenW( p ) + 1;
1326 break;
1329 /* check title text */
1330 switch ((WORD)*p)
1332 case 0x0000:
1333 p++;
1334 break;
1335 case 0xffff:
1336 TRACE("text ordinal 0x%08x\n",*(const DWORD*)p);
1337 p += 2;
1338 break;
1339 default:
1340 TRACE("text %s\n",debugstr_w( p ));
1341 p += lstrlenW( p ) + 1;
1342 break;
1344 p += *p / sizeof(WORD) + 1; /* Skip extra data */
1345 --nrofitems;
1348 ret = (p - (const WORD*)pTemplate) * sizeof(WORD);
1349 TRACE("%p %p size 0x%08x\n", p, pTemplate, ret);
1350 return ret;
1353 /******************************************************************************
1354 * PROPSHEET_CreatePage
1356 * Creates a page.
1358 static BOOL PROPSHEET_CreatePage(HWND hwndParent,
1359 int index,
1360 const PropSheetInfo * psInfo,
1361 LPCPROPSHEETPAGEW ppshpage)
1363 const DLGTEMPLATE* pTemplate;
1364 HWND hwndPage;
1365 DWORD resSize;
1366 DLGTEMPLATE* pTemplateCopy = NULL;
1368 TRACE("index %d\n", index);
1370 if (ppshpage == NULL)
1372 return FALSE;
1375 if (ppshpage->dwFlags & PSP_DLGINDIRECT)
1377 pTemplate = ppshpage->u.pResource;
1378 resSize = GetTemplateSize(pTemplate);
1380 else if(ppshpage->dwFlags & PSP_INTERNAL_UNICODE)
1382 HRSRC hResource;
1383 HANDLE hTemplate;
1385 hResource = FindResourceW(ppshpage->hInstance,
1386 ppshpage->u.pszTemplate,
1387 (LPWSTR)RT_DIALOG);
1388 if(!hResource)
1389 return FALSE;
1391 resSize = SizeofResource(ppshpage->hInstance, hResource);
1393 hTemplate = LoadResource(ppshpage->hInstance, hResource);
1394 if(!hTemplate)
1395 return FALSE;
1397 pTemplate = LockResource(hTemplate);
1399 * Make a copy of the dialog template to make it writable
1402 else
1404 HRSRC hResource;
1405 HANDLE hTemplate;
1407 hResource = FindResourceA(ppshpage->hInstance,
1408 (LPCSTR)ppshpage->u.pszTemplate,
1409 (LPSTR)RT_DIALOG);
1410 if(!hResource)
1411 return FALSE;
1413 resSize = SizeofResource(ppshpage->hInstance, hResource);
1415 hTemplate = LoadResource(ppshpage->hInstance, hResource);
1416 if(!hTemplate)
1417 return FALSE;
1419 pTemplate = LockResource(hTemplate);
1421 * Make a copy of the dialog template to make it writable
1424 pTemplateCopy = Alloc(resSize);
1425 if (!pTemplateCopy)
1426 return FALSE;
1428 TRACE("copying pTemplate %p into pTemplateCopy %p (%d)\n", pTemplate, pTemplateCopy, resSize);
1429 memcpy(pTemplateCopy, pTemplate, resSize);
1431 if (((MyDLGTEMPLATEEX*)pTemplateCopy)->signature == 0xFFFF)
1433 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style |= WS_CHILD | WS_TABSTOP | DS_CONTROL;
1434 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~DS_MODALFRAME;
1435 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_CAPTION;
1436 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_SYSMENU;
1437 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_POPUP;
1438 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_DISABLED;
1439 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_VISIBLE;
1440 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_THICKFRAME;
1442 ((MyDLGTEMPLATEEX*)pTemplateCopy)->exStyle |= WS_EX_CONTROLPARENT;
1444 else
1446 pTemplateCopy->style |= WS_CHILD | WS_TABSTOP | DS_CONTROL;
1447 pTemplateCopy->style &= ~DS_MODALFRAME;
1448 pTemplateCopy->style &= ~WS_CAPTION;
1449 pTemplateCopy->style &= ~WS_SYSMENU;
1450 pTemplateCopy->style &= ~WS_POPUP;
1451 pTemplateCopy->style &= ~WS_DISABLED;
1452 pTemplateCopy->style &= ~WS_VISIBLE;
1453 pTemplateCopy->style &= ~WS_THICKFRAME;
1455 pTemplateCopy->dwExtendedStyle |= WS_EX_CONTROLPARENT;
1458 if (psInfo->proppage[index].useCallback)
1459 (*(ppshpage->pfnCallback))(0, PSPCB_CREATE,
1460 (LPPROPSHEETPAGEW)ppshpage);
1462 if(ppshpage->dwFlags & PSP_INTERNAL_UNICODE)
1463 hwndPage = CreateDialogIndirectParamW(ppshpage->hInstance,
1464 pTemplateCopy,
1465 hwndParent,
1466 ppshpage->pfnDlgProc,
1467 (LPARAM)ppshpage);
1468 else
1469 hwndPage = CreateDialogIndirectParamA(ppshpage->hInstance,
1470 pTemplateCopy,
1471 hwndParent,
1472 ppshpage->pfnDlgProc,
1473 (LPARAM)ppshpage);
1474 /* Free a no more needed copy */
1475 Free(pTemplateCopy);
1477 psInfo->proppage[index].hwndPage = hwndPage;
1479 /* Subclass exterior wizard pages */
1480 if((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
1481 (psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
1482 (ppshpage->dwFlags & PSP_HIDEHEADER))
1484 SetWindowSubclass(hwndPage, PROPSHEET_WizardSubclassProc, 1,
1485 (DWORD_PTR)ppshpage);
1487 if (!(psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD))
1488 EnableThemeDialogTexture (hwndPage, ETDT_ENABLETAB);
1490 return TRUE;
1493 /******************************************************************************
1494 * PROPSHEET_LoadWizardBitmaps
1496 * Loads the watermark and header bitmaps for a wizard.
1498 static VOID PROPSHEET_LoadWizardBitmaps(PropSheetInfo *psInfo)
1500 if (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD))
1502 /* if PSH_USEHBMWATERMARK is not set, load the resource from pszbmWatermark
1503 and put the HBITMAP in hbmWatermark. Thus all the rest of the code always
1504 considers hbmWatermark as valid. */
1505 if ((psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
1506 !(psInfo->ppshheader.dwFlags & PSH_USEHBMWATERMARK))
1508 psInfo->ppshheader.u4.hbmWatermark =
1509 CreateMappedBitmap(psInfo->ppshheader.hInstance, (INT_PTR)psInfo->ppshheader.u4.pszbmWatermark, 0, NULL, 0);
1512 /* Same behavior as for watermarks */
1513 if ((psInfo->ppshheader.dwFlags & PSH_HEADER) &&
1514 !(psInfo->ppshheader.dwFlags & PSH_USEHBMHEADER))
1516 psInfo->ppshheader.u5.hbmHeader =
1517 CreateMappedBitmap(psInfo->ppshheader.hInstance, (INT_PTR)psInfo->ppshheader.u5.pszbmHeader, 0, NULL, 0);
1523 /******************************************************************************
1524 * PROPSHEET_ShowPage
1526 * Displays or creates the specified page.
1528 static BOOL PROPSHEET_ShowPage(HWND hwndDlg, int index, PropSheetInfo * psInfo)
1530 HWND hwndTabCtrl;
1531 HWND hwndLineHeader;
1532 HWND control;
1533 LPCPROPSHEETPAGEW ppshpage;
1535 TRACE("active_page %d, index %d\n", psInfo->active_page, index);
1536 if (index == psInfo->active_page)
1538 if (GetTopWindow(hwndDlg) != psInfo->proppage[index].hwndPage)
1539 SetWindowPos(psInfo->proppage[index].hwndPage, HWND_TOP, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE);
1540 return TRUE;
1543 ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
1544 if (psInfo->proppage[index].hwndPage == 0)
1546 PROPSHEET_CreatePage(hwndDlg, index, psInfo, ppshpage);
1549 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
1551 PROPSHEET_SetTitleW(hwndDlg, psInfo->ppshheader.dwFlags,
1552 psInfo->proppage[index].pszText);
1554 control = GetNextDlgTabItem(psInfo->proppage[index].hwndPage, NULL, FALSE);
1555 if(control != NULL)
1556 SetFocus(control);
1559 if (psInfo->active_page != -1)
1560 ShowWindow(psInfo->proppage[psInfo->active_page].hwndPage, SW_HIDE);
1562 ShowWindow(psInfo->proppage[index].hwndPage, SW_SHOW);
1564 /* Synchronize current selection with tab control
1565 * It seems to be needed even in case of PSH_WIZARD (no tab controls there) */
1566 hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
1567 SendMessageW(hwndTabCtrl, TCM_SETCURSEL, index, 0);
1569 psInfo->active_page = index;
1570 psInfo->activeValid = TRUE;
1572 if (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW) )
1574 hwndLineHeader = GetDlgItem(hwndDlg, IDC_SUNKEN_LINEHEADER);
1575 ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
1577 if ((ppshpage->dwFlags & PSP_HIDEHEADER) || (!(psInfo->ppshheader.dwFlags & PSH_HEADER)) )
1578 ShowWindow(hwndLineHeader, SW_HIDE);
1579 else
1580 ShowWindow(hwndLineHeader, SW_SHOW);
1583 return TRUE;
1586 /******************************************************************************
1587 * PROPSHEET_Back
1589 static BOOL PROPSHEET_Back(HWND hwndDlg)
1591 PSHNOTIFY psn;
1592 HWND hwndPage;
1593 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1594 LRESULT result;
1595 int idx;
1597 TRACE("active_page %d\n", psInfo->active_page);
1598 if (psInfo->active_page < 0)
1599 return FALSE;
1601 psn.hdr.code = PSN_WIZBACK;
1602 psn.hdr.hwndFrom = hwndDlg;
1603 psn.hdr.idFrom = 0;
1604 psn.lParam = 0;
1606 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1608 result = SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1609 if (result == -1)
1610 return FALSE;
1611 else if (result == 0)
1612 idx = psInfo->active_page - 1;
1613 else
1614 idx = PROPSHEET_FindPageByResId(psInfo, result);
1616 if (idx >= 0 && idx < psInfo->nPages)
1618 if (PROPSHEET_CanSetCurSel(hwndDlg))
1620 SetFocus(GetDlgItem(hwndDlg, IDC_BACK_BUTTON));
1621 SendMessageW(hwndDlg, DM_SETDEFID, IDC_BACK_BUTTON, 0);
1622 PROPSHEET_SetCurSel(hwndDlg, idx, -1, 0);
1625 return TRUE;
1628 /******************************************************************************
1629 * PROPSHEET_Next
1631 static BOOL PROPSHEET_Next(HWND hwndDlg)
1633 PSHNOTIFY psn;
1634 HWND hwndPage;
1635 LRESULT msgResult = 0;
1636 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1637 int idx;
1639 TRACE("active_page %d\n", psInfo->active_page);
1640 if (psInfo->active_page < 0)
1641 return FALSE;
1643 psn.hdr.code = PSN_WIZNEXT;
1644 psn.hdr.hwndFrom = hwndDlg;
1645 psn.hdr.idFrom = 0;
1646 psn.lParam = 0;
1648 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1650 msgResult = SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1651 if (msgResult == -1)
1652 return FALSE;
1653 else if (msgResult == 0)
1654 idx = psInfo->active_page + 1;
1655 else
1656 idx = PROPSHEET_FindPageByResId(psInfo, msgResult);
1658 if (idx < psInfo->nPages )
1660 if (PROPSHEET_CanSetCurSel(hwndDlg) != FALSE)
1662 SetFocus(GetDlgItem(hwndDlg, IDC_NEXT_BUTTON));
1663 SendMessageW(hwndDlg, DM_SETDEFID, IDC_NEXT_BUTTON, 0);
1664 PROPSHEET_SetCurSel(hwndDlg, idx, 1, 0);
1668 return TRUE;
1671 /******************************************************************************
1672 * PROPSHEET_Finish
1674 static BOOL PROPSHEET_Finish(HWND hwndDlg)
1676 PSHNOTIFY psn;
1677 HWND hwndPage;
1678 LRESULT msgResult = 0;
1679 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1681 TRACE("active_page %d\n", psInfo->active_page);
1682 if (psInfo->active_page < 0)
1683 return FALSE;
1685 psn.hdr.code = PSN_WIZFINISH;
1686 psn.hdr.hwndFrom = hwndDlg;
1687 psn.hdr.idFrom = 0;
1688 psn.lParam = 0;
1690 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1692 msgResult = SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1694 TRACE("msg result %ld\n", msgResult);
1696 if (msgResult != 0)
1697 return FALSE;
1699 if (psInfo->result == 0)
1700 psInfo->result = IDOK;
1701 if (psInfo->isModeless)
1702 psInfo->activeValid = FALSE;
1703 else
1704 psInfo->ended = TRUE;
1706 return TRUE;
1709 /******************************************************************************
1710 * PROPSHEET_Apply
1712 static BOOL PROPSHEET_Apply(HWND hwndDlg, LPARAM lParam)
1714 int i;
1715 HWND hwndPage;
1716 PSHNOTIFY psn;
1717 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1719 TRACE("active_page %d\n", psInfo->active_page);
1720 if (psInfo->active_page < 0)
1721 return FALSE;
1723 psn.hdr.hwndFrom = hwndDlg;
1724 psn.hdr.idFrom = 0;
1725 psn.lParam = 0;
1729 * Send PSN_KILLACTIVE to the current page.
1731 psn.hdr.code = PSN_KILLACTIVE;
1733 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1735 if (SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn) != FALSE)
1736 return FALSE;
1739 * Send PSN_APPLY to all pages.
1741 psn.hdr.code = PSN_APPLY;
1742 psn.lParam = lParam;
1744 for (i = 0; i < psInfo->nPages; i++)
1746 hwndPage = psInfo->proppage[i].hwndPage;
1747 if (hwndPage)
1749 switch (SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn))
1751 case PSNRET_INVALID:
1752 PROPSHEET_ShowPage(hwndDlg, i, psInfo);
1753 /* fall through */
1754 case PSNRET_INVALID_NOCHANGEPAGE:
1755 return FALSE;
1760 if(lParam)
1762 psInfo->activeValid = FALSE;
1764 else if(psInfo->active_page >= 0)
1766 psn.hdr.code = PSN_SETACTIVE;
1767 psn.lParam = 0;
1768 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1769 SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1772 return TRUE;
1775 /******************************************************************************
1776 * PROPSHEET_Cancel
1778 static void PROPSHEET_Cancel(HWND hwndDlg, LPARAM lParam)
1780 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1781 HWND hwndPage;
1782 PSHNOTIFY psn;
1783 int i;
1785 TRACE("active_page %d\n", psInfo->active_page);
1786 if (psInfo->active_page < 0)
1787 return;
1789 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1790 psn.hdr.code = PSN_QUERYCANCEL;
1791 psn.hdr.hwndFrom = hwndDlg;
1792 psn.hdr.idFrom = 0;
1793 psn.lParam = 0;
1795 if (SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn))
1796 return;
1798 psn.hdr.code = PSN_RESET;
1799 psn.lParam = lParam;
1801 for (i = 0; i < psInfo->nPages; i++)
1803 hwndPage = psInfo->proppage[i].hwndPage;
1805 if (hwndPage)
1806 SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1809 if (psInfo->isModeless)
1811 /* makes PSM_GETCURRENTPAGEHWND return NULL */
1812 psInfo->activeValid = FALSE;
1814 else
1815 psInfo->ended = TRUE;
1818 /******************************************************************************
1819 * PROPSHEET_Help
1821 static void PROPSHEET_Help(HWND hwndDlg)
1823 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1824 HWND hwndPage;
1825 PSHNOTIFY psn;
1827 TRACE("active_page %d\n", psInfo->active_page);
1828 if (psInfo->active_page < 0)
1829 return;
1831 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1832 psn.hdr.code = PSN_HELP;
1833 psn.hdr.hwndFrom = hwndDlg;
1834 psn.hdr.idFrom = 0;
1835 psn.lParam = 0;
1837 SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1840 /******************************************************************************
1841 * PROPSHEET_Changed
1843 static void PROPSHEET_Changed(HWND hwndDlg, HWND hwndDirtyPage)
1845 int i;
1846 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1848 TRACE("\n");
1849 if (!psInfo) return;
1851 * Set the dirty flag of this page.
1853 for (i = 0; i < psInfo->nPages; i++)
1855 if (psInfo->proppage[i].hwndPage == hwndDirtyPage)
1856 psInfo->proppage[i].isDirty = TRUE;
1860 * Enable the Apply button.
1862 if (psInfo->hasApply)
1864 HWND hwndApplyBtn = GetDlgItem(hwndDlg, IDC_APPLY_BUTTON);
1866 EnableWindow(hwndApplyBtn, TRUE);
1870 /******************************************************************************
1871 * PROPSHEET_UnChanged
1873 static void PROPSHEET_UnChanged(HWND hwndDlg, HWND hwndCleanPage)
1875 int i;
1876 BOOL noPageDirty = TRUE;
1877 HWND hwndApplyBtn = GetDlgItem(hwndDlg, IDC_APPLY_BUTTON);
1878 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1880 TRACE("\n");
1881 if ( !psInfo ) return;
1882 for (i = 0; i < psInfo->nPages; i++)
1884 /* set the specified page as clean */
1885 if (psInfo->proppage[i].hwndPage == hwndCleanPage)
1886 psInfo->proppage[i].isDirty = FALSE;
1888 /* look to see if there's any dirty pages */
1889 if (psInfo->proppage[i].isDirty)
1890 noPageDirty = FALSE;
1894 * Disable Apply button.
1896 if (noPageDirty)
1897 EnableWindow(hwndApplyBtn, FALSE);
1900 /******************************************************************************
1901 * PROPSHEET_PressButton
1903 static void PROPSHEET_PressButton(HWND hwndDlg, int buttonID)
1905 TRACE("buttonID %d\n", buttonID);
1906 switch (buttonID)
1908 case PSBTN_APPLYNOW:
1909 PROPSHEET_DoCommand(hwndDlg, IDC_APPLY_BUTTON);
1910 break;
1911 case PSBTN_BACK:
1912 PROPSHEET_Back(hwndDlg);
1913 break;
1914 case PSBTN_CANCEL:
1915 PROPSHEET_DoCommand(hwndDlg, IDCANCEL);
1916 break;
1917 case PSBTN_FINISH:
1918 PROPSHEET_Finish(hwndDlg);
1919 break;
1920 case PSBTN_HELP:
1921 PROPSHEET_DoCommand(hwndDlg, IDHELP);
1922 break;
1923 case PSBTN_NEXT:
1924 PROPSHEET_Next(hwndDlg);
1925 break;
1926 case PSBTN_OK:
1927 PROPSHEET_DoCommand(hwndDlg, IDOK);
1928 break;
1929 default:
1930 FIXME("Invalid button index %d\n", buttonID);
1935 /*************************************************************************
1936 * BOOL PROPSHEET_CanSetCurSel [Internal]
1938 * Test whether the current page can be changed by sending a PSN_KILLACTIVE
1940 * PARAMS
1941 * hwndDlg [I] handle to a Dialog hWnd
1943 * RETURNS
1944 * TRUE if Current Selection can change
1946 * NOTES
1948 static BOOL PROPSHEET_CanSetCurSel(HWND hwndDlg)
1950 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1951 HWND hwndPage;
1952 PSHNOTIFY psn;
1953 BOOL res = FALSE;
1955 if (!psInfo)
1957 res = FALSE;
1958 goto end;
1961 TRACE("active_page %d\n", psInfo->active_page);
1962 if (psInfo->active_page < 0)
1964 res = TRUE;
1965 goto end;
1969 * Notify the current page.
1971 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1972 psn.hdr.code = PSN_KILLACTIVE;
1973 psn.hdr.hwndFrom = hwndDlg;
1974 psn.hdr.idFrom = 0;
1975 psn.lParam = 0;
1977 res = !SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1979 end:
1980 TRACE("<-- %d\n", res);
1981 return res;
1984 /******************************************************************************
1985 * PROPSHEET_SetCurSel
1987 static BOOL PROPSHEET_SetCurSel(HWND hwndDlg,
1988 int index,
1989 int skipdir,
1990 HPROPSHEETPAGE hpage
1993 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1994 HWND hwndHelp = GetDlgItem(hwndDlg, IDHELP);
1995 HWND hwndTabControl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
1997 TRACE("index %d, skipdir %d, hpage %p\n", index, skipdir, hpage);
1998 /* hpage takes precedence over index */
1999 if (hpage != NULL)
2000 index = PROPSHEET_GetPageIndex(hpage, psInfo);
2002 if (index < 0 || index >= psInfo->nPages)
2004 TRACE("Could not find page to select!\n");
2005 return FALSE;
2008 /* unset active page while doing this transition. */
2009 if (psInfo->active_page != -1)
2010 ShowWindow(psInfo->proppage[psInfo->active_page].hwndPage, SW_HIDE);
2011 psInfo->active_page = -1;
2013 while (1) {
2014 int result;
2015 PSHNOTIFY psn;
2016 RECT rc;
2017 LPCPROPSHEETPAGEW ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
2019 if (hwndTabControl)
2020 SendMessageW(hwndTabControl, TCM_SETCURSEL, index, 0);
2022 psn.hdr.code = PSN_SETACTIVE;
2023 psn.hdr.hwndFrom = hwndDlg;
2024 psn.hdr.idFrom = 0;
2025 psn.lParam = 0;
2027 if (!psInfo->proppage[index].hwndPage) {
2028 PROPSHEET_CreatePage(hwndDlg, index, psInfo, ppshpage);
2031 /* Resize the property sheet page to the fit in the Tab control
2032 * (for regular property sheets) or to fit in the client area (for
2033 * wizards).
2034 * NOTE: The resizing happens every time the page is selected and
2035 * not only when it's created (some applications depend on it). */
2036 PROPSHEET_GetPageRect(psInfo, hwndDlg, &rc, ppshpage);
2037 TRACE("setting page %p, rc (%s) w=%d, h=%d\n",
2038 psInfo->proppage[index].hwndPage, wine_dbgstr_rect(&rc),
2039 rc.right - rc.left, rc.bottom - rc.top);
2040 SetWindowPos(psInfo->proppage[index].hwndPage, HWND_TOP,
2041 rc.left, rc.top,
2042 rc.right - rc.left, rc.bottom - rc.top, 0);
2044 result = SendMessageW(psInfo->proppage[index].hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
2045 if (!result)
2046 break;
2047 if (result == -1) {
2048 index+=skipdir;
2049 if (index < 0) {
2050 index = 0;
2051 WARN("Tried to skip before first property sheet page!\n");
2052 break;
2054 if (index >= psInfo->nPages) {
2055 WARN("Tried to skip after last property sheet page!\n");
2056 index = psInfo->nPages-1;
2057 break;
2060 else if (result != 0)
2062 int old_index = index;
2063 index = PROPSHEET_FindPageByResId(psInfo, result);
2064 if(index >= psInfo->nPages) {
2065 index = old_index;
2066 WARN("Tried to skip to nonexistent page by res id\n");
2067 break;
2069 continue;
2073 /* Invalidate the header area */
2074 if ( (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
2075 (psInfo->ppshheader.dwFlags & PSH_HEADER) )
2077 HWND hwndLineHeader = GetDlgItem(hwndDlg, IDC_SUNKEN_LINEHEADER);
2078 RECT r;
2080 GetClientRect(hwndLineHeader, &r);
2081 MapWindowPoints(hwndLineHeader, hwndDlg, (LPPOINT) &r, 2);
2082 SetRect(&r, 0, 0, r.right + 1, r.top - 1);
2084 InvalidateRect(hwndDlg, &r, TRUE);
2088 * Display the new page.
2090 PROPSHEET_ShowPage(hwndDlg, index, psInfo);
2092 if (psInfo->proppage[index].hasHelp)
2093 EnableWindow(hwndHelp, TRUE);
2094 else
2095 EnableWindow(hwndHelp, FALSE);
2097 return TRUE;
2100 /******************************************************************************
2101 * PROPSHEET_SetCurSelId
2103 * Selects the page, specified by resource id.
2105 static void PROPSHEET_SetCurSelId(HWND hwndDlg, int id)
2107 int idx;
2108 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2110 idx = PROPSHEET_FindPageByResId(psInfo, id);
2111 if (idx < psInfo->nPages )
2113 if (PROPSHEET_CanSetCurSel(hwndDlg) != FALSE)
2114 PROPSHEET_SetCurSel(hwndDlg, idx, 1, 0);
2118 /******************************************************************************
2119 * PROPSHEET_SetTitleA
2121 static void PROPSHEET_SetTitleA(HWND hwndDlg, DWORD dwStyle, LPCSTR lpszText)
2123 if(!IS_INTRESOURCE(lpszText))
2125 WCHAR szTitle[256];
2126 MultiByteToWideChar(CP_ACP, 0, lpszText, -1,
2127 szTitle, sizeof(szTitle)/sizeof(WCHAR));
2128 PROPSHEET_SetTitleW(hwndDlg, dwStyle, szTitle);
2130 else
2132 PROPSHEET_SetTitleW(hwndDlg, dwStyle, (LPCWSTR)lpszText);
2136 /******************************************************************************
2137 * PROPSHEET_SetTitleW
2139 static void PROPSHEET_SetTitleW(HWND hwndDlg, DWORD dwStyle, LPCWSTR lpszText)
2141 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2142 WCHAR szTitle[256];
2144 TRACE("%s (style %08x)\n", debugstr_w(lpszText), dwStyle);
2145 if (IS_INTRESOURCE(lpszText)) {
2146 if (!LoadStringW(psInfo->ppshheader.hInstance,
2147 LOWORD(lpszText), szTitle, sizeof(szTitle)/sizeof(szTitle[0])))
2148 return;
2149 lpszText = szTitle;
2151 if (dwStyle & PSH_PROPTITLE)
2153 WCHAR* dest;
2154 int lentitle = strlenW(lpszText);
2155 int lenprop = strlenW(psInfo->strPropertiesFor);
2157 dest = Alloc( (lentitle + lenprop + 1)*sizeof (WCHAR));
2158 wsprintfW(dest, psInfo->strPropertiesFor, lpszText);
2160 SetWindowTextW(hwndDlg, dest);
2161 Free(dest);
2163 else
2164 SetWindowTextW(hwndDlg, lpszText);
2167 /******************************************************************************
2168 * PROPSHEET_SetFinishTextA
2170 static void PROPSHEET_SetFinishTextA(HWND hwndDlg, LPCSTR lpszText)
2172 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2173 HWND hwndButton = GetDlgItem(hwndDlg, IDC_FINISH_BUTTON);
2175 TRACE("'%s'\n", lpszText);
2176 /* Set text, show and enable the Finish button */
2177 SetWindowTextA(hwndButton, lpszText);
2178 ShowWindow(hwndButton, SW_SHOW);
2179 EnableWindow(hwndButton, TRUE);
2181 /* Make it default pushbutton */
2182 SendMessageW(hwndDlg, DM_SETDEFID, IDC_FINISH_BUTTON, 0);
2184 /* Hide Back button */
2185 hwndButton = GetDlgItem(hwndDlg, IDC_BACK_BUTTON);
2186 ShowWindow(hwndButton, SW_HIDE);
2188 if (!psInfo->hasFinish)
2190 /* Hide Next button */
2191 hwndButton = GetDlgItem(hwndDlg, IDC_NEXT_BUTTON);
2192 ShowWindow(hwndButton, SW_HIDE);
2196 /******************************************************************************
2197 * PROPSHEET_SetFinishTextW
2199 static void PROPSHEET_SetFinishTextW(HWND hwndDlg, LPCWSTR lpszText)
2201 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2202 HWND hwndButton = GetDlgItem(hwndDlg, IDC_FINISH_BUTTON);
2204 TRACE("%s\n", debugstr_w(lpszText));
2205 /* Set text, show and enable the Finish button */
2206 SetWindowTextW(hwndButton, lpszText);
2207 ShowWindow(hwndButton, SW_SHOW);
2208 EnableWindow(hwndButton, TRUE);
2210 /* Make it default pushbutton */
2211 SendMessageW(hwndDlg, DM_SETDEFID, IDC_FINISH_BUTTON, 0);
2213 /* Hide Back button */
2214 hwndButton = GetDlgItem(hwndDlg, IDC_BACK_BUTTON);
2215 ShowWindow(hwndButton, SW_HIDE);
2217 if (!psInfo->hasFinish)
2219 /* Hide Next button */
2220 hwndButton = GetDlgItem(hwndDlg, IDC_NEXT_BUTTON);
2221 ShowWindow(hwndButton, SW_HIDE);
2225 /******************************************************************************
2226 * PROPSHEET_QuerySiblings
2228 static LRESULT PROPSHEET_QuerySiblings(HWND hwndDlg,
2229 WPARAM wParam, LPARAM lParam)
2231 int i = 0;
2232 HWND hwndPage;
2233 LRESULT msgResult = 0;
2234 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2236 while ((i < psInfo->nPages) && (msgResult == 0))
2238 hwndPage = psInfo->proppage[i].hwndPage;
2239 msgResult = SendMessageW(hwndPage, PSM_QUERYSIBLINGS, wParam, lParam);
2240 i++;
2243 return msgResult;
2247 /******************************************************************************
2248 * PROPSHEET_AddPage
2250 static BOOL PROPSHEET_AddPage(HWND hwndDlg,
2251 HPROPSHEETPAGE hpage)
2253 PropPageInfo * ppi;
2254 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2255 HWND hwndTabControl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
2256 TCITEMW item;
2257 LPCPROPSHEETPAGEW ppsp = (LPCPROPSHEETPAGEW)hpage;
2259 TRACE("hpage %p\n", hpage);
2261 * Allocate and fill in a new PropPageInfo entry.
2263 ppi = ReAlloc(psInfo->proppage, sizeof(PropPageInfo) * (psInfo->nPages + 1));
2264 if (!ppi)
2265 return FALSE;
2267 psInfo->proppage = ppi;
2268 if (!PROPSHEET_CollectPageInfo(ppsp, psInfo, psInfo->nPages, FALSE))
2269 return FALSE;
2271 psInfo->proppage[psInfo->nPages].hpage = hpage;
2273 if (ppsp->dwFlags & PSP_PREMATURE)
2275 /* Create the page but don't show it */
2276 PROPSHEET_CreatePage(hwndDlg, psInfo->nPages, psInfo, ppsp);
2280 * Add a new tab to the tab control.
2282 item.mask = TCIF_TEXT;
2283 item.pszText = (LPWSTR) psInfo->proppage[psInfo->nPages].pszText;
2284 item.cchTextMax = MAX_TABTEXT_LENGTH;
2286 if (psInfo->hImageList)
2288 SendMessageW(hwndTabControl, TCM_SETIMAGELIST, 0, (LPARAM)psInfo->hImageList);
2291 if ( psInfo->proppage[psInfo->nPages].hasIcon )
2293 item.mask |= TCIF_IMAGE;
2294 item.iImage = psInfo->nPages;
2297 SendMessageW(hwndTabControl, TCM_INSERTITEMW, psInfo->nPages + 1,
2298 (LPARAM)&item);
2300 psInfo->nPages++;
2302 /* If it is the only page - show it */
2303 if(psInfo->nPages == 1)
2304 PROPSHEET_SetCurSel(hwndDlg, 0, 1, 0);
2305 return TRUE;
2308 /******************************************************************************
2309 * PROPSHEET_RemovePage
2311 static BOOL PROPSHEET_RemovePage(HWND hwndDlg,
2312 int index,
2313 HPROPSHEETPAGE hpage)
2315 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2316 HWND hwndTabControl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
2317 PropPageInfo* oldPages;
2319 TRACE("index %d, hpage %p\n", index, hpage);
2320 if (!psInfo) {
2321 return FALSE;
2324 * hpage takes precedence over index.
2326 if (hpage != 0)
2328 index = PROPSHEET_GetPageIndex(hpage, psInfo);
2331 /* Make sure that index is within range */
2332 if (index < 0 || index >= psInfo->nPages)
2334 TRACE("Could not find page to remove!\n");
2335 return FALSE;
2338 TRACE("total pages %d removing page %d active page %d\n",
2339 psInfo->nPages, index, psInfo->active_page);
2341 * Check if we're removing the active page.
2343 if (index == psInfo->active_page)
2345 if (psInfo->nPages > 1)
2347 if (index > 0)
2349 /* activate previous page */
2350 PROPSHEET_SetCurSel(hwndDlg, index - 1, -1, 0);
2352 else
2354 /* activate the next page */
2355 PROPSHEET_SetCurSel(hwndDlg, index + 1, 1, 0);
2356 psInfo->active_page = index;
2359 else
2361 psInfo->active_page = -1;
2362 if (!psInfo->isModeless)
2364 psInfo->ended = TRUE;
2365 return TRUE;
2369 else if (index < psInfo->active_page)
2370 psInfo->active_page--;
2372 /* Unsubclass the page dialog window */
2373 if((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD) &&
2374 (psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
2375 ((PROPSHEETPAGEW*)psInfo->proppage[index].hpage)->dwFlags & PSP_HIDEHEADER))
2377 RemoveWindowSubclass(psInfo->proppage[index].hwndPage,
2378 PROPSHEET_WizardSubclassProc, 1);
2381 /* Destroy page dialog window */
2382 DestroyWindow(psInfo->proppage[index].hwndPage);
2384 /* Free page resources */
2385 if(psInfo->proppage[index].hpage)
2387 PROPSHEETPAGEW* psp = (PROPSHEETPAGEW*)psInfo->proppage[index].hpage;
2389 if (psp->dwFlags & PSP_USETITLE)
2390 Free ((LPVOID)psInfo->proppage[index].pszText);
2392 DestroyPropertySheetPage(psInfo->proppage[index].hpage);
2395 /* Remove the tab */
2396 SendMessageW(hwndTabControl, TCM_DELETEITEM, index, 0);
2398 oldPages = psInfo->proppage;
2399 psInfo->nPages--;
2400 psInfo->proppage = Alloc(sizeof(PropPageInfo) * psInfo->nPages);
2402 if (index > 0)
2403 memcpy(&psInfo->proppage[0], &oldPages[0], index * sizeof(PropPageInfo));
2405 if (index < psInfo->nPages)
2406 memcpy(&psInfo->proppage[index], &oldPages[index + 1],
2407 (psInfo->nPages - index) * sizeof(PropPageInfo));
2409 Free(oldPages);
2411 return FALSE;
2414 /******************************************************************************
2415 * PROPSHEET_SetWizButtons
2417 * This code will work if (and assumes that) the Next button is on top of the
2418 * Finish button. ie. Finish comes after Next in the Z order.
2419 * This means make sure the dialog template reflects this.
2422 static void PROPSHEET_SetWizButtons(HWND hwndDlg, DWORD dwFlags)
2424 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2425 HWND hwndBack = GetDlgItem(hwndDlg, IDC_BACK_BUTTON);
2426 HWND hwndNext = GetDlgItem(hwndDlg, IDC_NEXT_BUTTON);
2427 HWND hwndFinish = GetDlgItem(hwndDlg, IDC_FINISH_BUTTON);
2429 TRACE("%d\n", dwFlags);
2431 EnableWindow(hwndBack, FALSE);
2432 EnableWindow(hwndNext, FALSE);
2433 EnableWindow(hwndFinish, FALSE);
2435 /* set the default pushbutton to an enabled button */
2436 if (((dwFlags & PSWIZB_FINISH) || psInfo->hasFinish) && !(dwFlags & PSWIZB_DISABLEDFINISH))
2437 SendMessageW(hwndDlg, DM_SETDEFID, IDC_FINISH_BUTTON, 0);
2438 else if (dwFlags & PSWIZB_NEXT)
2439 SendMessageW(hwndDlg, DM_SETDEFID, IDC_NEXT_BUTTON, 0);
2440 else if (dwFlags & PSWIZB_BACK)
2441 SendMessageW(hwndDlg, DM_SETDEFID, IDC_BACK_BUTTON, 0);
2442 else
2443 SendMessageW(hwndDlg, DM_SETDEFID, IDCANCEL, 0);
2446 if (dwFlags & PSWIZB_BACK)
2447 EnableWindow(hwndBack, TRUE);
2449 if (dwFlags & PSWIZB_NEXT)
2450 EnableWindow(hwndNext, TRUE);
2452 if (!psInfo->hasFinish)
2454 if ((dwFlags & PSWIZB_FINISH) || (dwFlags & PSWIZB_DISABLEDFINISH))
2456 /* Hide the Next button */
2457 ShowWindow(hwndNext, SW_HIDE);
2459 /* Show the Finish button */
2460 ShowWindow(hwndFinish, SW_SHOW);
2462 if (!(dwFlags & PSWIZB_DISABLEDFINISH))
2463 EnableWindow(hwndFinish, TRUE);
2465 else
2467 /* Hide the Finish button */
2468 ShowWindow(hwndFinish, SW_HIDE);
2469 /* Show the Next button */
2470 ShowWindow(hwndNext, SW_SHOW);
2473 else if (!(dwFlags & PSWIZB_DISABLEDFINISH))
2474 EnableWindow(hwndFinish, TRUE);
2477 /******************************************************************************
2478 * PROPSHEET_InsertPage
2480 static BOOL PROPSHEET_InsertPage(HWND hwndDlg, HPROPSHEETPAGE hpageInsertAfter, HPROPSHEETPAGE hpage)
2482 if (IS_INTRESOURCE(hpageInsertAfter))
2483 FIXME("(%p, %d, %p): stub\n", hwndDlg, LOWORD(hpageInsertAfter), hpage);
2484 else
2485 FIXME("(%p, %p, %p): stub\n", hwndDlg, hpageInsertAfter, hpage);
2486 return FALSE;
2489 /******************************************************************************
2490 * PROPSHEET_SetHeaderTitleW
2492 static void PROPSHEET_SetHeaderTitleW(HWND hwndDlg, int iPageIndex, LPCWSTR pszHeaderTitle)
2494 FIXME("(%p, %d, %s): stub\n", hwndDlg, iPageIndex, debugstr_w(pszHeaderTitle));
2497 /******************************************************************************
2498 * PROPSHEET_SetHeaderTitleA
2500 static void PROPSHEET_SetHeaderTitleA(HWND hwndDlg, int iPageIndex, LPCSTR pszHeaderTitle)
2502 FIXME("(%p, %d, %s): stub\n", hwndDlg, iPageIndex, debugstr_a(pszHeaderTitle));
2505 /******************************************************************************
2506 * PROPSHEET_SetHeaderSubTitleW
2508 static void PROPSHEET_SetHeaderSubTitleW(HWND hwndDlg, int iPageIndex, LPCWSTR pszHeaderSubTitle)
2510 FIXME("(%p, %d, %s): stub\n", hwndDlg, iPageIndex, debugstr_w(pszHeaderSubTitle));
2513 /******************************************************************************
2514 * PROPSHEET_SetHeaderSubTitleA
2516 static void PROPSHEET_SetHeaderSubTitleA(HWND hwndDlg, int iPageIndex, LPCSTR pszHeaderSubTitle)
2518 FIXME("(%p, %d, %s): stub\n", hwndDlg, iPageIndex, debugstr_a(pszHeaderSubTitle));
2521 /******************************************************************************
2522 * PROPSHEET_HwndToIndex
2524 static LRESULT PROPSHEET_HwndToIndex(HWND hwndDlg, HWND hPageDlg)
2526 int index;
2527 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2529 TRACE("(%p, %p)\n", hwndDlg, hPageDlg);
2531 for (index = 0; index < psInfo->nPages; index++)
2532 if (psInfo->proppage[index].hwndPage == hPageDlg)
2533 return index;
2534 WARN("%p not found\n", hPageDlg);
2535 return -1;
2538 /******************************************************************************
2539 * PROPSHEET_IndexToHwnd
2541 static LRESULT PROPSHEET_IndexToHwnd(HWND hwndDlg, int iPageIndex)
2543 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2544 TRACE("(%p, %d)\n", hwndDlg, iPageIndex);
2545 if (!psInfo)
2546 return 0;
2547 if (iPageIndex<0 || iPageIndex>=psInfo->nPages) {
2548 WARN("%d out of range.\n", iPageIndex);
2549 return 0;
2551 return (LRESULT)psInfo->proppage[iPageIndex].hwndPage;
2554 /******************************************************************************
2555 * PROPSHEET_PageToIndex
2557 static LRESULT PROPSHEET_PageToIndex(HWND hwndDlg, HPROPSHEETPAGE hPage)
2559 int index;
2560 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2562 TRACE("(%p, %p)\n", hwndDlg, hPage);
2564 for (index = 0; index < psInfo->nPages; index++)
2565 if (psInfo->proppage[index].hpage == hPage)
2566 return index;
2567 WARN("%p not found\n", hPage);
2568 return -1;
2571 /******************************************************************************
2572 * PROPSHEET_IndexToPage
2574 static LRESULT PROPSHEET_IndexToPage(HWND hwndDlg, int iPageIndex)
2576 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2577 TRACE("(%p, %d)\n", hwndDlg, iPageIndex);
2578 if (iPageIndex<0 || iPageIndex>=psInfo->nPages) {
2579 WARN("%d out of range.\n", iPageIndex);
2580 return 0;
2582 return (LRESULT)psInfo->proppage[iPageIndex].hpage;
2585 /******************************************************************************
2586 * PROPSHEET_IdToIndex
2588 static LRESULT PROPSHEET_IdToIndex(HWND hwndDlg, int iPageId)
2590 int index;
2591 LPCPROPSHEETPAGEW psp;
2592 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2593 TRACE("(%p, %d)\n", hwndDlg, iPageId);
2594 for (index = 0; index < psInfo->nPages; index++) {
2595 psp = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
2596 if (psp->u.pszTemplate == MAKEINTRESOURCEW(iPageId))
2597 return index;
2600 return -1;
2603 /******************************************************************************
2604 * PROPSHEET_IndexToId
2606 static LRESULT PROPSHEET_IndexToId(HWND hwndDlg, int iPageIndex)
2608 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2609 LPCPROPSHEETPAGEW psp;
2610 TRACE("(%p, %d)\n", hwndDlg, iPageIndex);
2611 if (iPageIndex<0 || iPageIndex>=psInfo->nPages) {
2612 WARN("%d out of range.\n", iPageIndex);
2613 return 0;
2615 psp = (LPCPROPSHEETPAGEW)psInfo->proppage[iPageIndex].hpage;
2616 if (psp->dwFlags & PSP_DLGINDIRECT || !IS_INTRESOURCE(psp->u.pszTemplate)) {
2617 return 0;
2619 return (LRESULT)psp->u.pszTemplate;
2622 /******************************************************************************
2623 * PROPSHEET_GetResult
2625 static LRESULT PROPSHEET_GetResult(HWND hwndDlg)
2627 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2628 return psInfo->result;
2631 /******************************************************************************
2632 * PROPSHEET_RecalcPageSizes
2634 static BOOL PROPSHEET_RecalcPageSizes(HWND hwndDlg)
2636 FIXME("(%p): stub\n", hwndDlg);
2637 return FALSE;
2640 /******************************************************************************
2641 * PROPSHEET_GetPageIndex
2643 * Given a HPROPSHEETPAGE, returns the index of the corresponding page from
2644 * the array of PropPageInfo.
2646 static int PROPSHEET_GetPageIndex(HPROPSHEETPAGE hpage, const PropSheetInfo* psInfo)
2648 BOOL found = FALSE;
2649 int index = 0;
2651 TRACE("hpage %p\n", hpage);
2652 while ((index < psInfo->nPages) && (found == FALSE))
2654 if (psInfo->proppage[index].hpage == hpage)
2655 found = TRUE;
2656 else
2657 index++;
2660 if (found == FALSE)
2661 index = -1;
2663 return index;
2666 /******************************************************************************
2667 * PROPSHEET_CleanUp
2669 static void PROPSHEET_CleanUp(HWND hwndDlg)
2671 int i;
2672 PropSheetInfo* psInfo = RemovePropW(hwndDlg, PropSheetInfoStr);
2674 TRACE("\n");
2675 if (!psInfo) return;
2676 if (!IS_INTRESOURCE(psInfo->ppshheader.pszCaption))
2677 Free ((LPVOID)psInfo->ppshheader.pszCaption);
2679 for (i = 0; i < psInfo->nPages; i++)
2681 PROPSHEETPAGEA* psp = (PROPSHEETPAGEA*)psInfo->proppage[i].hpage;
2683 /* Unsubclass the page dialog window */
2684 if((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
2685 (psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
2686 (psp->dwFlags & PSP_HIDEHEADER))
2688 RemoveWindowSubclass(psInfo->proppage[i].hwndPage,
2689 PROPSHEET_WizardSubclassProc, 1);
2692 if(psInfo->proppage[i].hwndPage)
2693 DestroyWindow(psInfo->proppage[i].hwndPage);
2695 if(psp)
2697 if (psp->dwFlags & PSP_USETITLE)
2698 Free ((LPVOID)psInfo->proppage[i].pszText);
2700 DestroyPropertySheetPage(psInfo->proppage[i].hpage);
2704 DeleteObject(psInfo->hFont);
2705 DeleteObject(psInfo->hFontBold);
2706 /* If we created the bitmaps, destroy them */
2707 if ((psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
2708 (!(psInfo->ppshheader.dwFlags & PSH_USEHBMWATERMARK)) )
2709 DeleteObject(psInfo->ppshheader.u4.hbmWatermark);
2710 if ((psInfo->ppshheader.dwFlags & PSH_HEADER) &&
2711 (!(psInfo->ppshheader.dwFlags & PSH_USEHBMHEADER)) )
2712 DeleteObject(psInfo->ppshheader.u5.hbmHeader);
2714 Free(psInfo->proppage);
2715 Free(psInfo->strPropertiesFor);
2716 ImageList_Destroy(psInfo->hImageList);
2718 GlobalFree(psInfo);
2721 static INT do_loop(const PropSheetInfo *psInfo)
2723 MSG msg;
2724 INT ret = -1;
2725 HWND hwnd = psInfo->hwnd;
2727 while(IsWindow(hwnd) && !psInfo->ended && (ret = GetMessageW(&msg, NULL, 0, 0)))
2729 if(ret == -1)
2730 break;
2732 if(!IsDialogMessageW(hwnd, &msg))
2734 TranslateMessage(&msg);
2735 DispatchMessageW(&msg);
2739 if(ret == 0)
2741 PostQuitMessage(msg.wParam);
2742 ret = -1;
2745 if(ret != -1)
2746 ret = psInfo->result;
2748 DestroyWindow(hwnd);
2749 return ret;
2752 /******************************************************************************
2753 * PROPSHEET_PropertySheet
2755 * Common code between PropertySheetA/W
2757 static INT_PTR PROPSHEET_PropertySheet(PropSheetInfo* psInfo, BOOL unicode)
2759 INT_PTR bRet = 0;
2760 HWND parent = NULL;
2761 if (psInfo->active_page >= psInfo->nPages) psInfo->active_page = 0;
2762 TRACE("startpage: %d of %d pages\n", psInfo->active_page, psInfo->nPages);
2764 psInfo->unicode = unicode;
2765 psInfo->ended = FALSE;
2767 if(!psInfo->isModeless)
2769 parent = psInfo->ppshheader.hwndParent;
2770 if (parent) EnableWindow(parent, FALSE);
2772 bRet = PROPSHEET_CreateDialog(psInfo);
2773 if(!psInfo->isModeless)
2775 bRet = do_loop(psInfo);
2776 if (parent) EnableWindow(parent, TRUE);
2778 return bRet;
2781 /******************************************************************************
2782 * PropertySheet (COMCTL32.@)
2783 * PropertySheetA (COMCTL32.@)
2785 * Creates a property sheet in the specified property sheet header.
2787 * RETURNS
2788 * Modal property sheets: Positive if successful or -1 otherwise.
2789 * Modeless property sheets: Property sheet handle.
2790 * Or:
2791 *| ID_PSREBOOTSYSTEM - The user must reboot the computer for the changes to take effect.
2792 *| ID_PSRESTARTWINDOWS - The user must restart Windows for the changes to take effect.
2794 INT_PTR WINAPI PropertySheetA(LPCPROPSHEETHEADERA lppsh)
2796 PropSheetInfo* psInfo = GlobalAlloc(GPTR, sizeof(PropSheetInfo));
2797 UINT i, n;
2798 const BYTE* pByte;
2800 TRACE("(%p)\n", lppsh);
2802 PROPSHEET_CollectSheetInfoA(lppsh, psInfo);
2804 psInfo->proppage = Alloc(sizeof(PropPageInfo) * lppsh->nPages);
2805 pByte = (const BYTE*) psInfo->ppshheader.u3.ppsp;
2807 for (n = i = 0; i < lppsh->nPages; i++, n++)
2809 if (!psInfo->usePropPage)
2810 psInfo->proppage[n].hpage = psInfo->ppshheader.u3.phpage[i];
2811 else
2813 psInfo->proppage[n].hpage = CreatePropertySheetPageA((LPCPROPSHEETPAGEA)pByte);
2814 pByte += ((LPCPROPSHEETPAGEA)pByte)->dwSize;
2817 if (!PROPSHEET_CollectPageInfo((LPCPROPSHEETPAGEW)psInfo->proppage[n].hpage,
2818 psInfo, n, TRUE))
2820 if (psInfo->usePropPage)
2821 DestroyPropertySheetPage(psInfo->proppage[n].hpage);
2822 n--;
2823 psInfo->nPages--;
2827 return PROPSHEET_PropertySheet(psInfo, FALSE);
2830 /******************************************************************************
2831 * PropertySheetW (COMCTL32.@)
2833 * See PropertySheetA.
2835 INT_PTR WINAPI PropertySheetW(LPCPROPSHEETHEADERW lppsh)
2837 PropSheetInfo* psInfo = GlobalAlloc(GPTR, sizeof(PropSheetInfo));
2838 UINT i, n;
2839 const BYTE* pByte;
2841 TRACE("(%p)\n", lppsh);
2843 PROPSHEET_CollectSheetInfoW(lppsh, psInfo);
2845 psInfo->proppage = Alloc(sizeof(PropPageInfo) * lppsh->nPages);
2846 pByte = (const BYTE*) psInfo->ppshheader.u3.ppsp;
2848 for (n = i = 0; i < lppsh->nPages; i++, n++)
2850 if (!psInfo->usePropPage)
2851 psInfo->proppage[n].hpage = psInfo->ppshheader.u3.phpage[i];
2852 else
2854 psInfo->proppage[n].hpage = CreatePropertySheetPageW((LPCPROPSHEETPAGEW)pByte);
2855 pByte += ((LPCPROPSHEETPAGEW)pByte)->dwSize;
2858 if (!PROPSHEET_CollectPageInfo((LPCPROPSHEETPAGEW)psInfo->proppage[n].hpage,
2859 psInfo, n, TRUE))
2861 if (psInfo->usePropPage)
2862 DestroyPropertySheetPage(psInfo->proppage[n].hpage);
2863 n--;
2864 psInfo->nPages--;
2868 return PROPSHEET_PropertySheet(psInfo, TRUE);
2871 static LPWSTR load_string( HINSTANCE instance, LPCWSTR str )
2873 LPWSTR ret;
2875 if (IS_INTRESOURCE(str))
2877 HRSRC hrsrc;
2878 HGLOBAL hmem;
2879 WCHAR *ptr;
2880 WORD i, id = LOWORD(str);
2881 UINT len;
2883 if (!(hrsrc = FindResourceW( instance, MAKEINTRESOURCEW((id >> 4) + 1), (LPWSTR)RT_STRING )))
2884 return NULL;
2885 if (!(hmem = LoadResource( instance, hrsrc ))) return NULL;
2886 if (!(ptr = LockResource( hmem ))) return NULL;
2887 for (i = id & 0x0f; i > 0; i--) ptr += *ptr + 1;
2888 len = *ptr;
2889 if (!len) return NULL;
2890 ret = Alloc( (len + 1) * sizeof(WCHAR) );
2891 if (ret)
2893 memcpy( ret, ptr + 1, len * sizeof(WCHAR) );
2894 ret[len] = 0;
2897 else
2899 int len = (strlenW(str) + 1) * sizeof(WCHAR);
2900 ret = Alloc( len );
2901 if (ret) memcpy( ret, str, len );
2903 return ret;
2907 /******************************************************************************
2908 * CreatePropertySheetPage (COMCTL32.@)
2909 * CreatePropertySheetPageA (COMCTL32.@)
2911 * Creates a new property sheet page.
2913 * RETURNS
2914 * Success: Handle to new property sheet page.
2915 * Failure: NULL.
2917 * NOTES
2918 * An application must use the PSM_ADDPAGE message to add the new page to
2919 * an existing property sheet.
2921 HPROPSHEETPAGE WINAPI CreatePropertySheetPageA(
2922 LPCPROPSHEETPAGEA lpPropSheetPage)
2924 PROPSHEETPAGEW* ppsp = Alloc(sizeof(PROPSHEETPAGEW));
2926 memcpy(ppsp,lpPropSheetPage,min(lpPropSheetPage->dwSize,sizeof(PROPSHEETPAGEA)));
2928 ppsp->dwFlags &= ~ PSP_INTERNAL_UNICODE;
2930 if ( !(ppsp->dwFlags & PSP_DLGINDIRECT) )
2932 if (!IS_INTRESOURCE( ppsp->u.pszTemplate ))
2934 int len = strlen(lpPropSheetPage->u.pszTemplate) + 1;
2935 char *template = Alloc( len );
2937 ppsp->u.pszTemplate = (LPWSTR)strcpy( template, lpPropSheetPage->u.pszTemplate );
2941 if (ppsp->dwFlags & PSP_USEICONID)
2943 if (!IS_INTRESOURCE( ppsp->u2.pszIcon ))
2944 PROPSHEET_AtoW(&ppsp->u2.pszIcon, lpPropSheetPage->u2.pszIcon);
2947 if (ppsp->dwFlags & PSP_USETITLE)
2949 if (!IS_INTRESOURCE( ppsp->pszTitle ))
2950 PROPSHEET_AtoW( &ppsp->pszTitle, lpPropSheetPage->pszTitle );
2951 else
2952 ppsp->pszTitle = load_string( ppsp->hInstance, ppsp->pszTitle );
2954 else
2955 ppsp->pszTitle = NULL;
2957 if (ppsp->dwFlags & PSP_HIDEHEADER)
2958 ppsp->dwFlags &= ~(PSP_USEHEADERTITLE | PSP_USEHEADERSUBTITLE);
2960 if (ppsp->dwFlags & PSP_USEHEADERTITLE)
2962 if (!IS_INTRESOURCE( ppsp->pszHeaderTitle ))
2963 PROPSHEET_AtoW(&ppsp->pszHeaderTitle, lpPropSheetPage->pszHeaderTitle);
2964 else
2965 ppsp->pszHeaderTitle = load_string( ppsp->hInstance, ppsp->pszHeaderTitle );
2967 else
2968 ppsp->pszHeaderTitle = NULL;
2970 if (ppsp->dwFlags & PSP_USEHEADERSUBTITLE)
2972 if (!IS_INTRESOURCE( ppsp->pszHeaderSubTitle ))
2973 PROPSHEET_AtoW(&ppsp->pszHeaderSubTitle, lpPropSheetPage->pszHeaderSubTitle);
2974 else
2975 ppsp->pszHeaderSubTitle = load_string( ppsp->hInstance, ppsp->pszHeaderSubTitle );
2977 else
2978 ppsp->pszHeaderSubTitle = NULL;
2980 return (HPROPSHEETPAGE)ppsp;
2983 /******************************************************************************
2984 * CreatePropertySheetPageW (COMCTL32.@)
2986 * See CreatePropertySheetA.
2988 HPROPSHEETPAGE WINAPI CreatePropertySheetPageW(LPCPROPSHEETPAGEW lpPropSheetPage)
2990 PROPSHEETPAGEW* ppsp = Alloc(sizeof(PROPSHEETPAGEW));
2992 memcpy(ppsp,lpPropSheetPage,min(lpPropSheetPage->dwSize,sizeof(PROPSHEETPAGEW)));
2994 ppsp->dwFlags |= PSP_INTERNAL_UNICODE;
2996 if ( !(ppsp->dwFlags & PSP_DLGINDIRECT) )
2998 if (!IS_INTRESOURCE( ppsp->u.pszTemplate ))
3000 int len = strlenW(lpPropSheetPage->u.pszTemplate) + 1;
3001 WCHAR *template = Alloc( len * sizeof (WCHAR) );
3003 ppsp->u.pszTemplate = strcpyW( template, lpPropSheetPage->u.pszTemplate );
3007 if ( ppsp->dwFlags & PSP_USEICONID )
3009 if (!IS_INTRESOURCE( ppsp->u2.pszIcon ))
3011 int len = strlenW(lpPropSheetPage->u2.pszIcon) + 1;
3012 WCHAR *icon = Alloc( len * sizeof (WCHAR) );
3014 ppsp->u2.pszIcon = strcpyW( icon, lpPropSheetPage->u2.pszIcon );
3018 if (ppsp->dwFlags & PSP_USETITLE)
3019 ppsp->pszTitle = load_string( ppsp->hInstance, ppsp->pszTitle );
3020 else
3021 ppsp->pszTitle = NULL;
3023 if (ppsp->dwFlags & PSP_HIDEHEADER)
3024 ppsp->dwFlags &= ~(PSP_USEHEADERTITLE | PSP_USEHEADERSUBTITLE);
3026 if (ppsp->dwFlags & PSP_USEHEADERTITLE)
3027 ppsp->pszHeaderTitle = load_string( ppsp->hInstance, ppsp->pszHeaderTitle );
3028 else
3029 ppsp->pszHeaderTitle = NULL;
3031 if (ppsp->dwFlags & PSP_USEHEADERSUBTITLE)
3032 ppsp->pszHeaderSubTitle = load_string( ppsp->hInstance, ppsp->pszHeaderSubTitle );
3033 else
3034 ppsp->pszHeaderSubTitle = NULL;
3036 return (HPROPSHEETPAGE)ppsp;
3039 /******************************************************************************
3040 * DestroyPropertySheetPage (COMCTL32.@)
3042 * Destroys a property sheet page previously created with
3043 * CreatePropertySheetA() or CreatePropertySheetW() and frees the associated
3044 * memory.
3046 * RETURNS
3047 * Success: TRUE
3048 * Failure: FALSE
3050 BOOL WINAPI DestroyPropertySheetPage(HPROPSHEETPAGE hPropPage)
3052 PROPSHEETPAGEW *psp = (PROPSHEETPAGEW *)hPropPage;
3054 if (!psp)
3055 return FALSE;
3057 if (!(psp->dwFlags & PSP_DLGINDIRECT) && !IS_INTRESOURCE( psp->u.pszTemplate ))
3058 Free ((LPVOID)psp->u.pszTemplate);
3060 if ((psp->dwFlags & PSP_USEICONID) && !IS_INTRESOURCE( psp->u2.pszIcon ))
3061 Free ((LPVOID)psp->u2.pszIcon);
3063 if ((psp->dwFlags & PSP_USETITLE) && !IS_INTRESOURCE( psp->pszTitle ))
3064 Free ((LPVOID)psp->pszTitle);
3066 Free(hPropPage);
3068 return TRUE;
3071 /******************************************************************************
3072 * PROPSHEET_IsDialogMessage
3074 static BOOL PROPSHEET_IsDialogMessage(HWND hwnd, LPMSG lpMsg)
3076 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3078 TRACE("\n");
3079 if (!psInfo || (hwnd != lpMsg->hwnd && !IsChild(hwnd, lpMsg->hwnd)))
3080 return FALSE;
3082 if (lpMsg->message == WM_KEYDOWN && (GetKeyState(VK_CONTROL) & 0x8000))
3084 int new_page = 0;
3085 INT dlgCode = SendMessageW(lpMsg->hwnd, WM_GETDLGCODE, 0, (LPARAM)lpMsg);
3087 if (!(dlgCode & DLGC_WANTMESSAGE))
3089 switch (lpMsg->wParam)
3091 case VK_TAB:
3092 if (GetKeyState(VK_SHIFT) & 0x8000)
3093 new_page = -1;
3094 else
3095 new_page = 1;
3096 break;
3098 case VK_NEXT: new_page = 1; break;
3099 case VK_PRIOR: new_page = -1; break;
3103 if (new_page)
3105 if (PROPSHEET_CanSetCurSel(hwnd) != FALSE)
3107 new_page += psInfo->active_page;
3109 if (new_page < 0)
3110 new_page = psInfo->nPages - 1;
3111 else if (new_page >= psInfo->nPages)
3112 new_page = 0;
3114 PROPSHEET_SetCurSel(hwnd, new_page, 1, 0);
3117 return TRUE;
3121 return IsDialogMessageW(hwnd, lpMsg);
3124 /******************************************************************************
3125 * PROPSHEET_DoCommand
3127 static BOOL PROPSHEET_DoCommand(HWND hwnd, WORD wID)
3130 switch (wID) {
3132 case IDOK:
3133 case IDC_APPLY_BUTTON:
3135 HWND hwndApplyBtn = GetDlgItem(hwnd, IDC_APPLY_BUTTON);
3137 if (PROPSHEET_Apply(hwnd, wID == IDOK ? 1: 0) == FALSE)
3138 break;
3140 if (wID == IDOK)
3142 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3144 /* don't overwrite ID_PSRESTARTWINDOWS or ID_PSREBOOTSYSTEM */
3145 if (psInfo->result == 0)
3146 psInfo->result = IDOK;
3148 if (psInfo->isModeless)
3149 psInfo->activeValid = FALSE;
3150 else
3151 psInfo->ended = TRUE;
3153 else
3154 EnableWindow(hwndApplyBtn, FALSE);
3156 break;
3159 case IDC_BACK_BUTTON:
3160 PROPSHEET_Back(hwnd);
3161 break;
3163 case IDC_NEXT_BUTTON:
3164 PROPSHEET_Next(hwnd);
3165 break;
3167 case IDC_FINISH_BUTTON:
3168 PROPSHEET_Finish(hwnd);
3169 break;
3171 case IDCANCEL:
3172 PROPSHEET_Cancel(hwnd, 0);
3173 break;
3175 case IDHELP:
3176 PROPSHEET_Help(hwnd);
3177 break;
3179 default:
3180 return FALSE;
3183 return TRUE;
3186 /******************************************************************************
3187 * PROPSHEET_Paint
3189 static LRESULT PROPSHEET_Paint(HWND hwnd, HDC hdcParam)
3191 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3192 PAINTSTRUCT ps;
3193 HDC hdc, hdcSrc;
3194 BITMAP bm;
3195 HBITMAP hbmp;
3196 HPALETTE hOldPal = 0;
3197 int offsety = 0;
3198 HBRUSH hbr;
3199 RECT r, rzone;
3200 LPCPROPSHEETPAGEW ppshpage;
3201 WCHAR szBuffer[256];
3202 int nLength;
3204 hdc = hdcParam ? hdcParam : BeginPaint(hwnd, &ps);
3205 if (!hdc) return 1;
3207 hdcSrc = CreateCompatibleDC(0);
3209 if (psInfo->ppshheader.dwFlags & PSH_USEHPLWATERMARK)
3210 hOldPal = SelectPalette(hdc, psInfo->ppshheader.hplWatermark, FALSE);
3212 if (psInfo->active_page < 0)
3213 ppshpage = NULL;
3214 else
3215 ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[psInfo->active_page].hpage;
3217 if ( (ppshpage && !(ppshpage->dwFlags & PSP_HIDEHEADER)) &&
3218 (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
3219 (psInfo->ppshheader.dwFlags & PSH_HEADER) )
3221 HWND hwndLineHeader = GetDlgItem(hwnd, IDC_SUNKEN_LINEHEADER);
3222 HFONT hOldFont;
3223 COLORREF clrOld = 0;
3224 int oldBkMode = 0;
3226 hbmp = SelectObject(hdcSrc, psInfo->ppshheader.u5.hbmHeader);
3227 hOldFont = SelectObject(hdc, psInfo->hFontBold);
3229 GetClientRect(hwndLineHeader, &r);
3230 MapWindowPoints(hwndLineHeader, hwnd, (LPPOINT) &r, 2);
3231 SetRect(&rzone, 0, 0, r.right + 1, r.top - 1);
3233 GetObjectW(psInfo->ppshheader.u5.hbmHeader, sizeof(BITMAP), &bm);
3235 if (psInfo->ppshheader.dwFlags & PSH_WIZARD97_OLD)
3237 /* Fill the unoccupied part of the header with color of the
3238 * left-top pixel, but do it only when needed.
3240 if (bm.bmWidth < r.right || bm.bmHeight < r.bottom)
3242 hbr = CreateSolidBrush(GetPixel(hdcSrc, 0, 0));
3243 CopyRect(&r, &rzone);
3244 if (bm.bmWidth < r.right)
3246 r.left = bm.bmWidth;
3247 FillRect(hdc, &r, hbr);
3249 if (bm.bmHeight < r.bottom)
3251 r.left = 0;
3252 r.top = bm.bmHeight;
3253 FillRect(hdc, &r, hbr);
3255 DeleteObject(hbr);
3258 /* Draw the header itself. */
3259 BitBlt(hdc, 0, 0,
3260 bm.bmWidth, min(bm.bmHeight, rzone.bottom),
3261 hdcSrc, 0, 0, SRCCOPY);
3263 else
3265 int margin;
3266 hbr = GetSysColorBrush(COLOR_WINDOW);
3267 FillRect(hdc, &rzone, hbr);
3269 /* Draw the header bitmap. It's always centered like a
3270 * common 49 x 49 bitmap. */
3271 margin = (rzone.bottom - 49) / 2;
3272 BitBlt(hdc, rzone.right - 49 - margin, margin,
3273 min(bm.bmWidth, 49), min(bm.bmHeight, 49),
3274 hdcSrc, 0, 0, SRCCOPY);
3276 /* NOTE: Native COMCTL32 draws a white stripe over the bitmap
3277 * if its height is smaller than 49 pixels. Because the reason
3278 * for this bug is unknown the current code doesn't try to
3279 * replicate it. */
3282 clrOld = SetTextColor (hdc, 0x00000000);
3283 oldBkMode = SetBkMode (hdc, TRANSPARENT);
3285 if (ppshpage->dwFlags & PSP_USEHEADERTITLE) {
3286 SetRect(&r, 20, 10, 0, 0);
3287 if (!IS_INTRESOURCE(ppshpage->pszHeaderTitle))
3288 DrawTextW(hdc, ppshpage->pszHeaderTitle, -1, &r, DT_LEFT | DT_SINGLELINE | DT_NOCLIP);
3289 else
3291 nLength = LoadStringW(ppshpage->hInstance, (UINT_PTR)ppshpage->pszHeaderTitle,
3292 szBuffer, 256);
3293 if (nLength != 0)
3295 DrawTextW(hdc, szBuffer, nLength, &r, DT_LEFT | DT_SINGLELINE | DT_NOCLIP);
3300 if (ppshpage->dwFlags & PSP_USEHEADERSUBTITLE) {
3301 SelectObject(hdc, psInfo->hFont);
3302 SetRect(&r, 40, 25, rzone.right - 69, rzone.bottom);
3303 if (!IS_INTRESOURCE(ppshpage->pszHeaderTitle))
3304 DrawTextW(hdc, ppshpage->pszHeaderSubTitle, -1, &r, DT_LEFT | DT_WORDBREAK);
3305 else
3307 nLength = LoadStringW(ppshpage->hInstance, (UINT_PTR)ppshpage->pszHeaderSubTitle,
3308 szBuffer, 256);
3309 if (nLength != 0)
3311 DrawTextW(hdc, szBuffer, nLength, &r, DT_LEFT | DT_WORDBREAK);
3316 offsety = rzone.bottom + 2;
3318 SetTextColor(hdc, clrOld);
3319 SetBkMode(hdc, oldBkMode);
3320 SelectObject(hdc, hOldFont);
3321 SelectObject(hdcSrc, hbmp);
3324 if ( (ppshpage && (ppshpage->dwFlags & PSP_HIDEHEADER)) &&
3325 (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
3326 (psInfo->ppshheader.dwFlags & PSH_WATERMARK) )
3328 HWND hwndLine = GetDlgItem(hwnd, IDC_SUNKEN_LINE);
3330 GetClientRect(hwndLine, &r);
3331 MapWindowPoints(hwndLine, hwnd, (LPPOINT) &r, 2);
3333 rzone.left = 0;
3334 rzone.top = 0;
3335 rzone.right = r.right;
3336 rzone.bottom = r.top - 1;
3338 hbr = GetSysColorBrush(COLOR_WINDOW);
3339 FillRect(hdc, &rzone, hbr);
3341 GetObjectW(psInfo->ppshheader.u4.hbmWatermark, sizeof(BITMAP), &bm);
3342 hbmp = SelectObject(hdcSrc, psInfo->ppshheader.u4.hbmWatermark);
3344 /* The watermark is truncated to a width of 164 pixels */
3345 r.right = min(r.right, 164);
3346 BitBlt(hdc, 0, offsety, min(bm.bmWidth, r.right),
3347 min(bm.bmHeight, r.bottom), hdcSrc, 0, 0, SRCCOPY);
3349 /* If the bitmap is not big enough, fill the remaining area
3350 with the color of pixel (0,0) of bitmap - see MSDN */
3351 if (r.top > bm.bmHeight) {
3352 r.bottom = r.top - 1;
3353 r.top = bm.bmHeight;
3354 r.left = 0;
3355 r.right = bm.bmWidth;
3356 hbr = CreateSolidBrush(GetPixel(hdcSrc, 0, 0));
3357 FillRect(hdc, &r, hbr);
3358 DeleteObject(hbr);
3361 SelectObject(hdcSrc, hbmp);
3364 if (psInfo->ppshheader.dwFlags & PSH_USEHPLWATERMARK)
3365 SelectPalette(hdc, hOldPal, FALSE);
3367 DeleteDC(hdcSrc);
3369 if (!hdcParam) EndPaint(hwnd, &ps);
3371 return 0;
3374 /******************************************************************************
3375 * PROPSHEET_DialogProc
3377 static INT_PTR CALLBACK
3378 PROPSHEET_DialogProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
3380 TRACE("hwnd=%p msg=0x%04x wparam=%lx lparam=%lx\n",
3381 hwnd, uMsg, wParam, lParam);
3383 switch (uMsg)
3385 case WM_INITDIALOG:
3387 PropSheetInfo* psInfo = (PropSheetInfo*) lParam;
3388 WCHAR* strCaption = Alloc(MAX_CAPTION_LENGTH*sizeof(WCHAR));
3389 HWND hwndTabCtrl = GetDlgItem(hwnd, IDC_TABCONTROL);
3390 int idx;
3391 LOGFONTW logFont;
3393 /* Using PropSheetInfoStr to store extra data doesn't match the native
3394 * common control: native uses TCM_[GS]ETITEM
3396 SetPropW(hwnd, PropSheetInfoStr, psInfo);
3399 * psInfo->hwnd is not being used by WINE code - it exists
3400 * for compatibility with "real" Windoze. The same about
3401 * SetWindowLongPtr - WINE is only using the PropSheetInfoStr
3402 * property.
3404 psInfo->hwnd = hwnd;
3405 SetWindowLongPtrW(hwnd, DWLP_USER, (DWORD_PTR)psInfo);
3407 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
3409 /* set up the Next and Back buttons by default */
3410 PROPSHEET_SetWizButtons(hwnd, PSWIZB_BACK|PSWIZB_NEXT);
3413 /* Set up fonts */
3414 SystemParametersInfoW (SPI_GETICONTITLELOGFONT, 0, &logFont, 0);
3415 psInfo->hFont = CreateFontIndirectW (&logFont);
3416 logFont.lfWeight = FW_BOLD;
3417 psInfo->hFontBold = CreateFontIndirectW (&logFont);
3420 * Small icon in the title bar.
3422 if ((psInfo->ppshheader.dwFlags & PSH_USEICONID) ||
3423 (psInfo->ppshheader.dwFlags & PSH_USEHICON))
3425 HICON hIcon;
3426 int icon_cx = GetSystemMetrics(SM_CXSMICON);
3427 int icon_cy = GetSystemMetrics(SM_CYSMICON);
3429 if (psInfo->ppshheader.dwFlags & PSH_USEICONID)
3430 hIcon = LoadImageW(psInfo->ppshheader.hInstance,
3431 psInfo->ppshheader.u.pszIcon,
3432 IMAGE_ICON,
3433 icon_cx, icon_cy,
3434 LR_DEFAULTCOLOR);
3435 else
3436 hIcon = psInfo->ppshheader.u.hIcon;
3438 SendMessageW(hwnd, WM_SETICON, 0, (LPARAM)hIcon);
3441 if (psInfo->ppshheader.dwFlags & PSH_USEHICON)
3442 SendMessageW(hwnd, WM_SETICON, 0, (LPARAM)psInfo->ppshheader.u.hIcon);
3444 psInfo->strPropertiesFor = strCaption;
3446 GetWindowTextW(hwnd, psInfo->strPropertiesFor, MAX_CAPTION_LENGTH);
3448 PROPSHEET_CreateTabControl(hwnd, psInfo);
3450 PROPSHEET_LoadWizardBitmaps(psInfo);
3452 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
3454 ShowWindow(hwndTabCtrl, SW_HIDE);
3455 PROPSHEET_AdjustSizeWizard(hwnd, psInfo);
3456 PROPSHEET_AdjustButtonsWizard(hwnd, psInfo);
3457 SetFocus(GetDlgItem(hwnd, IDC_NEXT_BUTTON));
3459 else
3461 if (PROPSHEET_SizeMismatch(hwnd, psInfo))
3463 PROPSHEET_AdjustSize(hwnd, psInfo);
3464 PROPSHEET_AdjustButtons(hwnd, psInfo);
3466 SetFocus(GetDlgItem(hwnd, IDOK));
3469 if (IS_INTRESOURCE(psInfo->ppshheader.pszCaption) &&
3470 psInfo->ppshheader.hInstance)
3472 WCHAR szText[256];
3474 if (LoadStringW(psInfo->ppshheader.hInstance,
3475 (UINT_PTR)psInfo->ppshheader.pszCaption, szText, 255))
3476 PROPSHEET_SetTitleW(hwnd, psInfo->ppshheader.dwFlags, szText);
3478 else
3480 PROPSHEET_SetTitleW(hwnd, psInfo->ppshheader.dwFlags,
3481 psInfo->ppshheader.pszCaption);
3485 if (psInfo->useCallback)
3486 (*(psInfo->ppshheader.pfnCallback))(hwnd, PSCB_INITIALIZED, 0);
3488 idx = psInfo->active_page;
3489 psInfo->active_page = -1;
3491 PROPSHEET_SetCurSel(hwnd, idx, 1, psInfo->proppage[idx].hpage);
3493 /* doing TCM_SETCURSEL seems to be needed even in case of PSH_WIZARD,
3494 * as some programs call TCM_GETCURSEL to get the current selection
3495 * from which to switch to the next page */
3496 SendMessageW(hwndTabCtrl, TCM_SETCURSEL, psInfo->active_page, 0);
3498 PROPSHEET_UnChanged(hwnd, NULL);
3500 /* wizards set their focus during init */
3501 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
3502 return FALSE;
3504 return TRUE;
3507 case WM_PRINTCLIENT:
3508 case WM_PAINT:
3509 PROPSHEET_Paint(hwnd, (HDC)wParam);
3510 return TRUE;
3512 case WM_DESTROY:
3513 PROPSHEET_CleanUp(hwnd);
3514 return TRUE;
3516 case WM_CLOSE:
3517 PROPSHEET_Cancel(hwnd, 1);
3518 return FALSE; /* let DefDlgProc post us WM_COMMAND/IDCANCEL */
3520 case WM_COMMAND:
3521 if (!PROPSHEET_DoCommand(hwnd, LOWORD(wParam)))
3523 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3525 if (!psInfo)
3526 return FALSE;
3528 /* No default handler, forward notification to active page */
3529 if (psInfo->activeValid && psInfo->active_page != -1)
3531 HWND hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
3532 SendMessageW(hwndPage, WM_COMMAND, wParam, lParam);
3535 return TRUE;
3537 case WM_NOTIFY:
3539 NMHDR* pnmh = (LPNMHDR) lParam;
3541 if (pnmh->code == TCN_SELCHANGE)
3543 int index = SendMessageW(pnmh->hwndFrom, TCM_GETCURSEL, 0, 0);
3544 PROPSHEET_SetCurSel(hwnd, index, 1, 0);
3547 if(pnmh->code == TCN_SELCHANGING)
3549 BOOL bRet = PROPSHEET_CanSetCurSel(hwnd);
3550 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, !bRet);
3551 return TRUE;
3554 return FALSE;
3557 case WM_SYSCOLORCHANGE:
3558 COMCTL32_RefreshSysColors();
3559 return FALSE;
3561 case PSM_GETCURRENTPAGEHWND:
3563 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3564 HWND hwndPage = 0;
3566 if (!psInfo)
3567 return FALSE;
3569 if (psInfo->activeValid && psInfo->active_page != -1)
3570 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
3572 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, (DWORD_PTR)hwndPage);
3574 return TRUE;
3577 case PSM_CHANGED:
3578 PROPSHEET_Changed(hwnd, (HWND)wParam);
3579 return TRUE;
3581 case PSM_UNCHANGED:
3582 PROPSHEET_UnChanged(hwnd, (HWND)wParam);
3583 return TRUE;
3585 case PSM_GETTABCONTROL:
3587 HWND hwndTabCtrl = GetDlgItem(hwnd, IDC_TABCONTROL);
3589 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, (DWORD_PTR)hwndTabCtrl);
3591 return TRUE;
3594 case PSM_SETCURSEL:
3596 BOOL msgResult;
3598 msgResult = PROPSHEET_CanSetCurSel(hwnd);
3599 if(msgResult != FALSE)
3601 msgResult = PROPSHEET_SetCurSel(hwnd,
3602 (int)wParam,
3604 (HPROPSHEETPAGE)lParam);
3607 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3609 return TRUE;
3612 case PSM_CANCELTOCLOSE:
3614 WCHAR buf[MAX_BUTTONTEXT_LENGTH];
3615 HWND hwndOK = GetDlgItem(hwnd, IDOK);
3616 HWND hwndCancel = GetDlgItem(hwnd, IDCANCEL);
3618 EnableWindow(hwndCancel, FALSE);
3619 if (LoadStringW(COMCTL32_hModule, IDS_CLOSE, buf, sizeof(buf)/sizeof(buf[0])))
3620 SetWindowTextW(hwndOK, buf);
3622 return FALSE;
3625 case PSM_RESTARTWINDOWS:
3627 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3629 if (!psInfo)
3630 return FALSE;
3632 /* reboot system takes precedence over restart windows */
3633 if (psInfo->result != ID_PSREBOOTSYSTEM)
3634 psInfo->result = ID_PSRESTARTWINDOWS;
3636 return TRUE;
3639 case PSM_REBOOTSYSTEM:
3641 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3643 if (!psInfo)
3644 return FALSE;
3646 psInfo->result = ID_PSREBOOTSYSTEM;
3648 return TRUE;
3651 case PSM_SETTITLEA:
3652 PROPSHEET_SetTitleA(hwnd, (DWORD) wParam, (LPCSTR) lParam);
3653 return TRUE;
3655 case PSM_SETTITLEW:
3656 PROPSHEET_SetTitleW(hwnd, (DWORD) wParam, (LPCWSTR) lParam);
3657 return TRUE;
3659 case PSM_APPLY:
3661 BOOL msgResult = PROPSHEET_Apply(hwnd, 0);
3663 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3665 return TRUE;
3668 case PSM_QUERYSIBLINGS:
3670 LRESULT msgResult = PROPSHEET_QuerySiblings(hwnd, wParam, lParam);
3672 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3674 return TRUE;
3677 case PSM_ADDPAGE:
3680 * Note: MSVC++ 6.0 documentation says that PSM_ADDPAGE does not have
3681 * a return value. This is not true. PSM_ADDPAGE returns TRUE
3682 * on success or FALSE otherwise, as specified on MSDN Online.
3683 * Also see the MFC code for
3684 * CPropertySheet::AddPage(CPropertyPage* pPage).
3687 BOOL msgResult = PROPSHEET_AddPage(hwnd, (HPROPSHEETPAGE)lParam);
3689 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3691 return TRUE;
3694 case PSM_REMOVEPAGE:
3695 PROPSHEET_RemovePage(hwnd, (int)wParam, (HPROPSHEETPAGE)lParam);
3696 return TRUE;
3698 case PSM_ISDIALOGMESSAGE:
3700 BOOL msgResult = PROPSHEET_IsDialogMessage(hwnd, (LPMSG)lParam);
3701 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3702 return TRUE;
3705 case PSM_PRESSBUTTON:
3706 PROPSHEET_PressButton(hwnd, (int)wParam);
3707 return TRUE;
3709 case PSM_SETFINISHTEXTA:
3710 PROPSHEET_SetFinishTextA(hwnd, (LPCSTR) lParam);
3711 return TRUE;
3713 case PSM_SETWIZBUTTONS:
3714 PROPSHEET_SetWizButtons(hwnd, (DWORD)lParam);
3715 return TRUE;
3717 case PSM_SETCURSELID:
3718 PROPSHEET_SetCurSelId(hwnd, (int)lParam);
3719 return TRUE;
3721 case PSM_SETFINISHTEXTW:
3722 PROPSHEET_SetFinishTextW(hwnd, (LPCWSTR) lParam);
3723 return FALSE;
3725 case PSM_INSERTPAGE:
3727 BOOL msgResult = PROPSHEET_InsertPage(hwnd, (HPROPSHEETPAGE)wParam, (HPROPSHEETPAGE)lParam);
3728 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3729 return TRUE;
3732 case PSM_SETHEADERTITLEW:
3733 PROPSHEET_SetHeaderTitleW(hwnd, (int)wParam, (LPCWSTR)lParam);
3734 return TRUE;
3736 case PSM_SETHEADERTITLEA:
3737 PROPSHEET_SetHeaderTitleA(hwnd, (int)wParam, (LPCSTR)lParam);
3738 return TRUE;
3740 case PSM_SETHEADERSUBTITLEW:
3741 PROPSHEET_SetHeaderSubTitleW(hwnd, (int)wParam, (LPCWSTR)lParam);
3742 return TRUE;
3744 case PSM_SETHEADERSUBTITLEA:
3745 PROPSHEET_SetHeaderSubTitleA(hwnd, (int)wParam, (LPCSTR)lParam);
3746 return TRUE;
3748 case PSM_HWNDTOINDEX:
3750 LRESULT msgResult = PROPSHEET_HwndToIndex(hwnd, (HWND)wParam);
3751 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3752 return TRUE;
3755 case PSM_INDEXTOHWND:
3757 LRESULT msgResult = PROPSHEET_IndexToHwnd(hwnd, (int)wParam);
3758 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3759 return TRUE;
3762 case PSM_PAGETOINDEX:
3764 LRESULT msgResult = PROPSHEET_PageToIndex(hwnd, (HPROPSHEETPAGE)wParam);
3765 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3766 return TRUE;
3769 case PSM_INDEXTOPAGE:
3771 LRESULT msgResult = PROPSHEET_IndexToPage(hwnd, (int)wParam);
3772 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3773 return TRUE;
3776 case PSM_IDTOINDEX:
3778 LRESULT msgResult = PROPSHEET_IdToIndex(hwnd, (int)lParam);
3779 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3780 return TRUE;
3783 case PSM_INDEXTOID:
3785 LRESULT msgResult = PROPSHEET_IndexToId(hwnd, (int)wParam);
3786 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3787 return TRUE;
3790 case PSM_GETRESULT:
3792 LRESULT msgResult = PROPSHEET_GetResult(hwnd);
3793 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3794 return TRUE;
3797 case PSM_RECALCPAGESIZES:
3799 LRESULT msgResult = PROPSHEET_RecalcPageSizes(hwnd);
3800 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3801 return TRUE;
3804 default:
3805 return FALSE;