comctl32/edit: Force update on focus change.
[wine.git] / dlls / comctl32 / propsheet.c
blob0cfc799734cd285e83ebd0328907a827a8631a9b
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_RECALCPAGESIZES
36 * o WM_HELP
37 * o WM_CONTEXTMENU
38 * - Notifications:
39 * o PSN_GETOBJECT
40 * o PSN_QUERYINITIALFOCUS
41 * o PSN_TRANSLATEACCELERATOR
42 * - Styles:
43 * o PSH_RTLREADING
44 * o PSH_STRETCHWATERMARK
45 * o PSH_USEPAGELANG
46 * o PSH_USEPSTARTPAGE
47 * - Page styles:
48 * o PSP_USEFUSIONCONTEXT
49 * o PSP_USEREFPARENT
52 #include <stdarg.h>
53 #include <string.h>
55 #define NONAMELESSUNION
57 #include "windef.h"
58 #include "winbase.h"
59 #include "wingdi.h"
60 #include "winuser.h"
61 #include "winnls.h"
62 #include "commctrl.h"
63 #include "prsht.h"
64 #include "comctl32.h"
65 #include "uxtheme.h"
67 #include "wine/debug.h"
68 #include "wine/unicode.h"
70 /******************************************************************************
71 * Data structures
73 #include "pshpack2.h"
75 typedef struct
77 WORD dlgVer;
78 WORD signature;
79 DWORD helpID;
80 DWORD exStyle;
81 DWORD style;
82 } MyDLGTEMPLATEEX;
84 typedef struct
86 DWORD helpid;
87 DWORD exStyle;
88 DWORD style;
89 short x;
90 short y;
91 short cx;
92 short cy;
93 DWORD id;
94 } MyDLGITEMTEMPLATEEX;
95 #include "poppack.h"
97 typedef struct tagPropPageInfo
99 HPROPSHEETPAGE hpage; /* to keep track of pages not passed to PropertySheet */
100 HWND hwndPage;
101 BOOL isDirty;
102 LPCWSTR pszText;
103 BOOL hasHelp;
104 BOOL useCallback;
105 BOOL hasIcon;
106 } PropPageInfo;
108 typedef struct tagPropSheetInfo
110 HWND hwnd;
111 PROPSHEETHEADERW ppshheader;
112 BOOL unicode;
113 LPWSTR strPropertiesFor;
114 int nPages;
115 int active_page;
116 BOOL isModeless;
117 BOOL hasHelp;
118 BOOL hasApply;
119 BOOL hasFinish;
120 BOOL usePropPage;
121 BOOL useCallback;
122 BOOL activeValid;
123 PropPageInfo* proppage;
124 HFONT hFont;
125 HFONT hFontBold;
126 int width;
127 int height;
128 HIMAGELIST hImageList;
129 BOOL ended;
130 INT result;
131 } PropSheetInfo;
133 typedef struct
135 int x;
136 int y;
137 } PADDING_INFO;
139 /******************************************************************************
140 * Defines and global variables
143 static const WCHAR PropSheetInfoStr[] =
144 {'P','r','o','p','e','r','t','y','S','h','e','e','t','I','n','f','o',0 };
146 #define PSP_INTERNAL_UNICODE 0x80000000
148 #define MAX_CAPTION_LENGTH 255
149 #define MAX_TABTEXT_LENGTH 255
150 #define MAX_BUTTONTEXT_LENGTH 64
152 #define INTRNL_ANY_WIZARD (PSH_WIZARD | PSH_WIZARD97_OLD | PSH_WIZARD97_NEW | PSH_WIZARD_LITE)
154 /* Wizard metrics specified in DLUs */
155 #define WIZARD_PADDING 7
156 #define WIZARD_HEADER_HEIGHT 36
158 /******************************************************************************
159 * Prototypes
161 static PADDING_INFO PROPSHEET_GetPaddingInfo(HWND hwndDlg);
162 static void PROPSHEET_SetTitleW(HWND hwndDlg, DWORD dwStyle, LPCWSTR lpszText);
163 static BOOL PROPSHEET_CanSetCurSel(HWND hwndDlg);
164 static BOOL PROPSHEET_SetCurSel(HWND hwndDlg,
165 int index,
166 int skipdir,
167 HPROPSHEETPAGE hpage);
168 static int PROPSHEET_GetPageIndex(HPROPSHEETPAGE hpage, const PropSheetInfo* psInfo, int original_index);
169 static PADDING_INFO PROPSHEET_GetPaddingInfoWizard(HWND hwndDlg, const PropSheetInfo* psInfo);
170 static BOOL PROPSHEET_DoCommand(HWND hwnd, WORD wID);
171 static BOOL PROPSHEET_RemovePage(HWND hwndDlg, int index, HPROPSHEETPAGE hpage);
173 static INT_PTR CALLBACK
174 PROPSHEET_DialogProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
176 WINE_DEFAULT_DEBUG_CHANNEL(propsheet);
178 static WCHAR *heap_strdupW(const WCHAR *str)
180 int len = strlenW(str) + 1;
181 WCHAR *ret = Alloc(len * sizeof(WCHAR));
182 strcpyW(ret, str);
183 return ret;
186 static WCHAR *heap_strdupAtoW(const char *str)
188 WCHAR *ret;
189 INT len;
191 len = MultiByteToWideChar(CP_ACP, 0, str, -1, 0, 0);
192 ret = Alloc(len * sizeof(WCHAR));
193 MultiByteToWideChar(CP_ACP, 0, str, -1, ret, len);
195 return ret;
198 #define add_flag(a) if (dwFlags & a) {strcat(string, #a );strcat(string," ");}
199 /******************************************************************************
200 * PROPSHEET_UnImplementedFlags
202 * Document use of flags we don't implement yet.
204 static VOID PROPSHEET_UnImplementedFlags(DWORD dwFlags)
206 CHAR string[256];
208 string[0] = '\0';
211 * unhandled header flags:
212 * PSH_RTLREADING 0x00000800
213 * PSH_STRETCHWATERMARK 0x00040000
214 * PSH_USEPAGELANG 0x00200000
217 add_flag(PSH_RTLREADING);
218 add_flag(PSH_STRETCHWATERMARK);
219 add_flag(PSH_USEPAGELANG);
220 if (string[0] != '\0')
221 FIXME("%s\n", string);
223 #undef add_flag
225 /******************************************************************************
226 * PROPSHEET_GetPageRect
228 * Retrieve rect from tab control and map into the dialog for SetWindowPos
230 static void PROPSHEET_GetPageRect(const PropSheetInfo * psInfo, HWND hwndDlg,
231 RECT *rc, LPCPROPSHEETPAGEW ppshpage)
233 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD) {
234 HWND hwndChild;
235 RECT r;
237 if (((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
238 (psInfo->ppshheader.dwFlags & PSH_HEADER) &&
239 !(ppshpage->dwFlags & PSP_HIDEHEADER)) ||
240 (psInfo->ppshheader.dwFlags & PSH_WIZARD))
242 rc->left = rc->top = WIZARD_PADDING;
244 else
246 rc->left = rc->top = 0;
248 rc->right = psInfo->width - rc->left;
249 rc->bottom = psInfo->height - rc->top;
250 MapDialogRect(hwndDlg, rc);
252 if ((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
253 (psInfo->ppshheader.dwFlags & PSH_HEADER) &&
254 !(ppshpage->dwFlags & PSP_HIDEHEADER))
256 hwndChild = GetDlgItem(hwndDlg, IDC_SUNKEN_LINEHEADER);
257 GetClientRect(hwndChild, &r);
258 MapWindowPoints(hwndChild, hwndDlg, (LPPOINT) &r, 2);
259 rc->top += r.bottom + 1;
261 } else {
262 HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
263 GetClientRect(hwndTabCtrl, rc);
264 SendMessageW(hwndTabCtrl, TCM_ADJUSTRECT, FALSE, (LPARAM)rc);
265 MapWindowPoints(hwndTabCtrl, hwndDlg, (LPPOINT)rc, 2);
269 /******************************************************************************
270 * PROPSHEET_FindPageByResId
272 * Find page index corresponding to page resource id.
274 static INT PROPSHEET_FindPageByResId(const PropSheetInfo * psInfo, LRESULT resId)
276 INT i;
278 for (i = 0; i < psInfo->nPages; i++)
280 LPCPROPSHEETPAGEA lppsp = (LPCPROPSHEETPAGEA)psInfo->proppage[i].hpage;
282 /* Fixme: if resource ID is a string shall we use strcmp ??? */
283 if (lppsp->u.pszTemplate == (LPVOID)resId)
284 break;
287 return i;
290 /******************************************************************************
291 * PROPSHEET_CollectSheetInfoCommon
293 * Common code for PROPSHEET_CollectSheetInfoA/W
295 static void PROPSHEET_CollectSheetInfoCommon(PropSheetInfo * psInfo, DWORD dwFlags)
297 PROPSHEET_UnImplementedFlags(dwFlags);
299 psInfo->hasHelp = dwFlags & PSH_HASHELP;
300 psInfo->hasApply = !(dwFlags & PSH_NOAPPLYNOW);
301 psInfo->hasFinish = dwFlags & PSH_WIZARDHASFINISH;
302 psInfo->isModeless = dwFlags & PSH_MODELESS;
303 psInfo->usePropPage = dwFlags & PSH_PROPSHEETPAGE;
304 if (psInfo->active_page < 0 || psInfo->active_page >= psInfo->nPages)
305 psInfo->active_page = 0;
307 psInfo->result = 0;
308 psInfo->hImageList = 0;
309 psInfo->activeValid = FALSE;
312 /******************************************************************************
313 * PROPSHEET_CollectSheetInfoA
315 * Collect relevant data.
317 static void PROPSHEET_CollectSheetInfoA(LPCPROPSHEETHEADERA lppsh,
318 PropSheetInfo * psInfo)
320 DWORD dwSize = min(lppsh->dwSize,sizeof(PROPSHEETHEADERA));
321 DWORD dwFlags = lppsh->dwFlags;
323 psInfo->useCallback = (dwFlags & PSH_USECALLBACK )&& (lppsh->pfnCallback);
325 memcpy(&psInfo->ppshheader,lppsh,dwSize);
326 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",
327 lppsh->dwSize, lppsh->dwFlags, lppsh->hwndParent, lppsh->hInstance,
328 debugstr_a(lppsh->pszCaption), lppsh->nPages, lppsh->pfnCallback);
330 if (lppsh->dwFlags & INTRNL_ANY_WIZARD)
331 psInfo->ppshheader.pszCaption = NULL;
332 else
334 if (!IS_INTRESOURCE(lppsh->pszCaption))
336 int len = MultiByteToWideChar(CP_ACP, 0, lppsh->pszCaption, -1, NULL, 0);
337 WCHAR *caption = Alloc( len*sizeof (WCHAR) );
339 MultiByteToWideChar(CP_ACP, 0, lppsh->pszCaption, -1, caption, len);
340 psInfo->ppshheader.pszCaption = caption;
343 psInfo->nPages = lppsh->nPages;
345 if (dwFlags & PSH_USEPSTARTPAGE)
347 TRACE("PSH_USEPSTARTPAGE is on\n");
348 psInfo->active_page = 0;
350 else
351 psInfo->active_page = lppsh->u2.nStartPage;
353 PROPSHEET_CollectSheetInfoCommon(psInfo, dwFlags);
356 /******************************************************************************
357 * PROPSHEET_CollectSheetInfoW
359 * Collect relevant data.
361 static void PROPSHEET_CollectSheetInfoW(LPCPROPSHEETHEADERW lppsh,
362 PropSheetInfo * psInfo)
364 DWORD dwSize = min(lppsh->dwSize,sizeof(PROPSHEETHEADERW));
365 DWORD dwFlags = lppsh->dwFlags;
367 psInfo->useCallback = (dwFlags & PSH_USECALLBACK) && (lppsh->pfnCallback);
369 memcpy(&psInfo->ppshheader,lppsh,dwSize);
370 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",
371 lppsh->dwSize, lppsh->dwFlags, lppsh->hwndParent, lppsh->hInstance, debugstr_w(lppsh->pszCaption), lppsh->nPages, lppsh->pfnCallback);
373 if (lppsh->dwFlags & INTRNL_ANY_WIZARD)
374 psInfo->ppshheader.pszCaption = NULL;
375 else
377 if (!IS_INTRESOURCE(lppsh->pszCaption))
378 psInfo->ppshheader.pszCaption = heap_strdupW( lppsh->pszCaption );
380 psInfo->nPages = lppsh->nPages;
382 if (dwFlags & PSH_USEPSTARTPAGE)
384 TRACE("PSH_USEPSTARTPAGE is on\n");
385 psInfo->active_page = 0;
387 else
388 psInfo->active_page = lppsh->u2.nStartPage;
390 PROPSHEET_CollectSheetInfoCommon(psInfo, dwFlags);
393 /******************************************************************************
394 * PROPSHEET_CollectPageInfo
396 * Collect property sheet data.
397 * With code taken from DIALOG_ParseTemplate32.
399 static BOOL PROPSHEET_CollectPageInfo(LPCPROPSHEETPAGEW lppsp,
400 PropSheetInfo * psInfo,
401 int index, BOOL resize)
403 const DLGTEMPLATE* pTemplate;
404 const WORD* p;
405 DWORD dwFlags;
406 int width, height;
408 if (!lppsp)
409 return FALSE;
411 TRACE("\n");
412 psInfo->proppage[index].hpage = (HPROPSHEETPAGE)lppsp;
413 psInfo->proppage[index].hwndPage = 0;
414 psInfo->proppage[index].isDirty = FALSE;
417 * Process property page flags.
419 dwFlags = lppsp->dwFlags;
420 psInfo->proppage[index].useCallback = (dwFlags & PSP_USECALLBACK) && (lppsp->pfnCallback);
421 psInfo->proppage[index].hasHelp = dwFlags & PSP_HASHELP;
422 psInfo->proppage[index].hasIcon = dwFlags & (PSP_USEHICON | PSP_USEICONID);
424 /* as soon as we have a page with the help flag, set the sheet flag on */
425 if (psInfo->proppage[index].hasHelp)
426 psInfo->hasHelp = TRUE;
429 * Process page template.
431 if (dwFlags & PSP_DLGINDIRECT)
432 pTemplate = lppsp->u.pResource;
433 else if(dwFlags & PSP_INTERNAL_UNICODE )
435 HRSRC hResource = FindResourceW(lppsp->hInstance,
436 lppsp->u.pszTemplate,
437 (LPWSTR)RT_DIALOG);
438 HGLOBAL hTemplate = LoadResource(lppsp->hInstance,
439 hResource);
440 pTemplate = LockResource(hTemplate);
442 else
444 HRSRC hResource = FindResourceA(lppsp->hInstance,
445 (LPCSTR)lppsp->u.pszTemplate,
446 (LPSTR)RT_DIALOG);
447 HGLOBAL hTemplate = LoadResource(lppsp->hInstance,
448 hResource);
449 pTemplate = LockResource(hTemplate);
453 * Extract the size of the page and the caption.
455 if (!pTemplate)
456 return FALSE;
458 p = (const WORD *)pTemplate;
460 if (((const MyDLGTEMPLATEEX*)pTemplate)->signature == 0xFFFF)
462 /* DLGTEMPLATEEX (not defined in any std. header file) */
464 p++; /* dlgVer */
465 p++; /* signature */
466 p += 2; /* help ID */
467 p += 2; /* ext style */
468 p += 2; /* style */
470 else
472 /* DLGTEMPLATE */
474 p += 2; /* style */
475 p += 2; /* ext style */
478 p++; /* nb items */
479 p++; /* x */
480 p++; /* y */
481 width = (WORD)*p; p++;
482 height = (WORD)*p; p++;
484 if (lppsp->dwFlags & (PSP_USEHEADERTITLE | PSP_USEHEADERSUBTITLE))
485 psInfo->ppshheader.dwFlags |= PSH_HEADER;
487 /* Special calculation for interior wizard pages so the largest page is
488 * calculated correctly. We need to add all the padding and space occupied
489 * by the header so the width and height sums up to the whole wizard client
490 * area. */
491 if ((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
492 (psInfo->ppshheader.dwFlags & PSH_HEADER) &&
493 !(dwFlags & PSP_HIDEHEADER))
495 height += 2 * WIZARD_PADDING + WIZARD_HEADER_HEIGHT;
496 width += 2 * WIZARD_PADDING;
498 if (psInfo->ppshheader.dwFlags & PSH_WIZARD)
500 height += 2 * WIZARD_PADDING;
501 width += 2 * WIZARD_PADDING;
504 /* remember the largest width and height */
505 if (resize)
507 if (width > psInfo->width)
508 psInfo->width = width;
510 if (height > psInfo->height)
511 psInfo->height = height;
514 /* menu */
515 switch ((WORD)*p)
517 case 0x0000:
518 p++;
519 break;
520 case 0xffff:
521 p += 2;
522 break;
523 default:
524 p += lstrlenW( p ) + 1;
525 break;
528 /* class */
529 switch ((WORD)*p)
531 case 0x0000:
532 p++;
533 break;
534 case 0xffff:
535 p += 2;
536 break;
537 default:
538 p += lstrlenW( p ) + 1;
539 break;
542 /* Extract the caption */
543 psInfo->proppage[index].pszText = p;
544 TRACE("Tab %d %s\n",index,debugstr_w( p ));
546 if (dwFlags & PSP_USETITLE)
548 WCHAR szTitle[256];
549 const WCHAR *pTitle;
550 static const WCHAR pszNull[] = { '(','n','u','l','l',')',0 };
552 if (IS_INTRESOURCE( lppsp->pszTitle ))
554 if (LoadStringW( lppsp->hInstance, (DWORD_PTR)lppsp->pszTitle, szTitle, sizeof(szTitle)/sizeof(szTitle[0]) ))
555 pTitle = szTitle;
556 else if (*p)
557 pTitle = p;
558 else
559 pTitle = pszNull;
561 else
562 pTitle = lppsp->pszTitle;
564 psInfo->proppage[index].pszText = heap_strdupW( pTitle );
568 * Build the image list for icons
570 if ((dwFlags & PSP_USEHICON) || (dwFlags & PSP_USEICONID))
572 HICON hIcon;
573 int icon_cx = GetSystemMetrics(SM_CXSMICON);
574 int icon_cy = GetSystemMetrics(SM_CYSMICON);
576 if (dwFlags & PSP_USEICONID)
577 hIcon = LoadImageW(lppsp->hInstance, lppsp->u2.pszIcon, IMAGE_ICON,
578 icon_cx, icon_cy, LR_DEFAULTCOLOR);
579 else
580 hIcon = lppsp->u2.hIcon;
582 if ( hIcon )
584 if (psInfo->hImageList == 0 )
585 psInfo->hImageList = ImageList_Create(icon_cx, icon_cy, ILC_COLOR, 1, 1);
587 ImageList_AddIcon(psInfo->hImageList, hIcon);
592 return TRUE;
595 /******************************************************************************
596 * PROPSHEET_CreateDialog
598 * Creates the actual property sheet.
600 static INT_PTR PROPSHEET_CreateDialog(PropSheetInfo* psInfo)
602 LRESULT ret;
603 LPCVOID template;
604 LPVOID temp = 0;
605 HRSRC hRes;
606 DWORD resSize;
607 WORD resID = IDD_PROPSHEET;
609 TRACE("(%p)\n", psInfo);
610 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
611 resID = IDD_WIZARD;
613 if( psInfo->unicode )
615 if(!(hRes = FindResourceW(COMCTL32_hModule,
616 MAKEINTRESOURCEW(resID),
617 (LPWSTR)RT_DIALOG)))
618 return -1;
620 else
622 if(!(hRes = FindResourceA(COMCTL32_hModule,
623 MAKEINTRESOURCEA(resID),
624 (LPSTR)RT_DIALOG)))
625 return -1;
628 if(!(template = LoadResource(COMCTL32_hModule, hRes)))
629 return -1;
632 * Make a copy of the dialog template.
634 resSize = SizeofResource(COMCTL32_hModule, hRes);
636 temp = Alloc(2 * resSize);
638 if (!temp)
639 return -1;
641 memcpy(temp, template, resSize);
643 if (psInfo->ppshheader.dwFlags & PSH_NOCONTEXTHELP)
645 if (((MyDLGTEMPLATEEX*)temp)->signature == 0xFFFF)
646 ((MyDLGTEMPLATEEX*)temp)->style &= ~DS_CONTEXTHELP;
647 else
648 ((DLGTEMPLATE*)temp)->style &= ~DS_CONTEXTHELP;
650 if ((psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD) &&
651 (psInfo->ppshheader.dwFlags & PSH_WIZARDCONTEXTHELP))
653 if (((MyDLGTEMPLATEEX*)temp)->signature == 0xFFFF)
654 ((MyDLGTEMPLATEEX*)temp)->style |= DS_CONTEXTHELP;
655 else
656 ((DLGTEMPLATE*)temp)->style |= DS_CONTEXTHELP;
659 if (psInfo->useCallback)
660 (*(psInfo->ppshheader.pfnCallback))(0, PSCB_PRECREATE, (LPARAM)temp);
662 /* NOTE: MSDN states "Returns a positive value if successful, or -1
663 * otherwise for modal property sheets.", but this is wrong. The
664 * actual return value is either TRUE (success), FALSE (cancel) or
665 * -1 (error). */
666 if( psInfo->unicode )
668 ret = (INT_PTR)CreateDialogIndirectParamW(psInfo->ppshheader.hInstance,
669 temp, psInfo->ppshheader.hwndParent,
670 PROPSHEET_DialogProc, (LPARAM)psInfo);
671 if ( !ret ) ret = -1;
673 else
675 ret = (INT_PTR)CreateDialogIndirectParamA(psInfo->ppshheader.hInstance,
676 temp, psInfo->ppshheader.hwndParent,
677 PROPSHEET_DialogProc, (LPARAM)psInfo);
678 if ( !ret ) ret = -1;
681 Free(temp);
683 return ret;
686 /******************************************************************************
687 * PROPSHEET_SizeMismatch
689 * Verify that the tab control and the "largest" property sheet page dlg. template
690 * match in size.
692 static BOOL PROPSHEET_SizeMismatch(HWND hwndDlg, const PropSheetInfo* psInfo)
694 HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
695 RECT rcOrigTab, rcPage;
698 * Original tab size.
700 GetClientRect(hwndTabCtrl, &rcOrigTab);
701 TRACE("orig tab %s\n", wine_dbgstr_rect(&rcOrigTab));
704 * Biggest page size.
706 SetRect(&rcPage, 0, 0, psInfo->width, psInfo->height);
707 MapDialogRect(hwndDlg, &rcPage);
708 TRACE("biggest page %s\n", wine_dbgstr_rect(&rcPage));
710 if ( (rcPage.right - rcPage.left) != (rcOrigTab.right - rcOrigTab.left) )
711 return TRUE;
712 if ( (rcPage.bottom - rcPage.top) != (rcOrigTab.bottom - rcOrigTab.top) )
713 return TRUE;
715 return FALSE;
718 /******************************************************************************
719 * PROPSHEET_AdjustSize
721 * Resizes the property sheet and the tab control to fit the largest page.
723 static BOOL PROPSHEET_AdjustSize(HWND hwndDlg, PropSheetInfo* psInfo)
725 HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
726 HWND hwndButton = GetDlgItem(hwndDlg, IDOK);
727 RECT rc,tabRect;
728 int buttonHeight;
729 PADDING_INFO padding = PROPSHEET_GetPaddingInfo(hwndDlg);
730 RECT units;
731 LONG style;
733 /* Get the height of buttons */
734 GetClientRect(hwndButton, &rc);
735 buttonHeight = rc.bottom;
738 * Biggest page size.
740 SetRect(&rc, 0, 0, psInfo->width, psInfo->height);
741 MapDialogRect(hwndDlg, &rc);
743 /* retrieve the dialog units */
744 units.left = units.right = 4;
745 units.top = units.bottom = 8;
746 MapDialogRect(hwndDlg, &units);
749 * Resize the tab control.
751 GetClientRect(hwndTabCtrl,&tabRect);
753 SendMessageW(hwndTabCtrl, TCM_ADJUSTRECT, FALSE, (LPARAM)&tabRect);
755 if ((rc.bottom - rc.top) < (tabRect.bottom - tabRect.top))
757 rc.bottom = rc.top + tabRect.bottom - tabRect.top;
758 psInfo->height = MulDiv((rc.bottom - rc.top),8,units.top);
761 if ((rc.right - rc.left) < (tabRect.right - tabRect.left))
763 rc.right = rc.left + tabRect.right - tabRect.left;
764 psInfo->width = MulDiv((rc.right - rc.left),4,units.left);
767 SendMessageW(hwndTabCtrl, TCM_ADJUSTRECT, TRUE, (LPARAM)&rc);
769 rc.right -= rc.left;
770 rc.bottom -= rc.top;
771 TRACE("setting tab %p, rc (0,0)-(%d,%d)\n",
772 hwndTabCtrl, rc.right, rc.bottom);
773 SetWindowPos(hwndTabCtrl, 0, 0, 0, rc.right, rc.bottom,
774 SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE);
776 GetClientRect(hwndTabCtrl, &rc);
778 TRACE("tab client rc %s\n", wine_dbgstr_rect(&rc));
780 rc.right += (padding.x * 2);
781 rc.bottom += buttonHeight + (3 * padding.y);
783 style = GetWindowLongW(hwndDlg, GWL_STYLE);
784 if (!(style & WS_CHILD))
785 AdjustWindowRect(&rc, style, FALSE);
787 rc.right -= rc.left;
788 rc.bottom -= rc.top;
791 * Resize the property sheet.
793 TRACE("setting dialog %p, rc (0,0)-(%d,%d)\n",
794 hwndDlg, rc.right, rc.bottom);
795 SetWindowPos(hwndDlg, 0, 0, 0, rc.right, rc.bottom,
796 SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE);
797 return TRUE;
800 /******************************************************************************
801 * PROPSHEET_AdjustSizeWizard
803 * Resizes the property sheet to fit the largest page.
805 static BOOL PROPSHEET_AdjustSizeWizard(HWND hwndDlg, const PropSheetInfo* psInfo)
807 HWND hwndLine = GetDlgItem(hwndDlg, IDC_SUNKEN_LINE);
808 RECT rc, lineRect, dialogRect;
810 /* Biggest page size */
811 SetRect(&rc, 0, 0, psInfo->width, psInfo->height);
812 MapDialogRect(hwndDlg, &rc);
814 TRACE("Biggest page %s\n", wine_dbgstr_rect(&rc));
816 /* Add space for the buttons row */
817 GetWindowRect(hwndLine, &lineRect);
818 MapWindowPoints(NULL, hwndDlg, (LPPOINT)&lineRect, 2);
819 GetClientRect(hwndDlg, &dialogRect);
820 rc.bottom += dialogRect.bottom - lineRect.top - 1;
822 /* Convert the client coordinates to window coordinates */
823 AdjustWindowRect(&rc, GetWindowLongW(hwndDlg, GWL_STYLE), FALSE);
825 /* Resize the property sheet */
826 TRACE("setting dialog %p, rc (0,0)-(%d,%d)\n",
827 hwndDlg, rc.right, rc.bottom);
828 SetWindowPos(hwndDlg, 0, 0, 0, rc.right - rc.left, rc.bottom - rc.top,
829 SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE);
831 return TRUE;
834 /******************************************************************************
835 * PROPSHEET_AdjustButtons
837 * Adjusts the buttons' positions.
839 static BOOL PROPSHEET_AdjustButtons(HWND hwndParent, const PropSheetInfo* psInfo)
841 HWND hwndButton = GetDlgItem(hwndParent, IDOK);
842 RECT rcSheet;
843 int x, y;
844 int num_buttons = 2;
845 int buttonWidth, buttonHeight;
846 PADDING_INFO padding = PROPSHEET_GetPaddingInfo(hwndParent);
848 if (psInfo->hasApply)
849 num_buttons++;
851 if (psInfo->hasHelp)
852 num_buttons++;
855 * Obtain the size of the buttons.
857 GetClientRect(hwndButton, &rcSheet);
858 buttonWidth = rcSheet.right;
859 buttonHeight = rcSheet.bottom;
862 * Get the size of the property sheet.
864 GetClientRect(hwndParent, &rcSheet);
867 * All buttons will be at this y coordinate.
869 y = rcSheet.bottom - (padding.y + buttonHeight);
872 * Position OK button and make it default.
874 hwndButton = GetDlgItem(hwndParent, IDOK);
876 x = rcSheet.right - ((padding.x + buttonWidth) * num_buttons);
878 SetWindowPos(hwndButton, 0, x, y, 0, 0,
879 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
881 SendMessageW(hwndParent, DM_SETDEFID, IDOK, 0);
885 * Position Cancel button.
887 hwndButton = GetDlgItem(hwndParent, IDCANCEL);
889 x += padding.x + buttonWidth;
891 SetWindowPos(hwndButton, 0, x, y, 0, 0,
892 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
895 * Position Apply button.
897 hwndButton = GetDlgItem(hwndParent, IDC_APPLY_BUTTON);
899 if(psInfo->hasApply)
900 x += padding.x + buttonWidth;
901 else
902 ShowWindow(hwndButton, SW_HIDE);
904 SetWindowPos(hwndButton, 0, x, y, 0, 0,
905 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
906 EnableWindow(hwndButton, FALSE);
909 * Position Help button.
911 hwndButton = GetDlgItem(hwndParent, IDHELP);
913 x += padding.x + buttonWidth;
914 SetWindowPos(hwndButton, 0, x, y, 0, 0,
915 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
917 if(!psInfo->hasHelp)
918 ShowWindow(hwndButton, SW_HIDE);
920 return TRUE;
923 /******************************************************************************
924 * PROPSHEET_AdjustButtonsWizard
926 * Adjusts the buttons' positions.
928 static BOOL PROPSHEET_AdjustButtonsWizard(HWND hwndParent,
929 const PropSheetInfo* psInfo)
931 HWND hwndButton = GetDlgItem(hwndParent, IDCANCEL);
932 HWND hwndLine = GetDlgItem(hwndParent, IDC_SUNKEN_LINE);
933 HWND hwndLineHeader = GetDlgItem(hwndParent, IDC_SUNKEN_LINEHEADER);
934 RECT rcSheet;
935 int x, y;
936 int num_buttons = 3;
937 int buttonWidth, buttonHeight, lineHeight, lineWidth;
938 PADDING_INFO padding = PROPSHEET_GetPaddingInfoWizard(hwndParent, psInfo);
940 if (psInfo->hasHelp)
941 num_buttons++;
942 if (psInfo->hasFinish)
943 num_buttons++;
946 * Obtain the size of the buttons.
948 GetClientRect(hwndButton, &rcSheet);
949 buttonWidth = rcSheet.right;
950 buttonHeight = rcSheet.bottom;
952 GetClientRect(hwndLine, &rcSheet);
953 lineHeight = rcSheet.bottom;
956 * Get the size of the property sheet.
958 GetClientRect(hwndParent, &rcSheet);
961 * All buttons will be at this y coordinate.
963 y = rcSheet.bottom - (padding.y + buttonHeight);
966 * Position the Back button.
968 hwndButton = GetDlgItem(hwndParent, IDC_BACK_BUTTON);
970 x = rcSheet.right - ((padding.x + buttonWidth) * (num_buttons - 1)) - buttonWidth;
972 SetWindowPos(hwndButton, 0, x, y, 0, 0,
973 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
976 * Position the Next button.
978 hwndButton = GetDlgItem(hwndParent, IDC_NEXT_BUTTON);
980 x += buttonWidth;
982 SetWindowPos(hwndButton, 0, x, y, 0, 0,
983 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
986 * Position the Finish button.
988 hwndButton = GetDlgItem(hwndParent, IDC_FINISH_BUTTON);
990 if (psInfo->hasFinish)
991 x += padding.x + buttonWidth;
993 SetWindowPos(hwndButton, 0, x, y, 0, 0,
994 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
996 if (!psInfo->hasFinish)
997 ShowWindow(hwndButton, SW_HIDE);
1000 * Position the Cancel button.
1002 hwndButton = GetDlgItem(hwndParent, IDCANCEL);
1004 x += padding.x + buttonWidth;
1006 SetWindowPos(hwndButton, 0, x, y, 0, 0,
1007 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
1010 * Position Help button.
1012 hwndButton = GetDlgItem(hwndParent, IDHELP);
1014 if (psInfo->hasHelp)
1016 x += padding.x + buttonWidth;
1018 SetWindowPos(hwndButton, 0, x, y, 0, 0,
1019 SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
1021 else
1022 ShowWindow(hwndButton, SW_HIDE);
1024 if (psInfo->ppshheader.dwFlags &
1025 (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW | PSH_WIZARD_LITE))
1026 padding.x = 0;
1029 * Position and resize the sunken line.
1031 x = padding.x;
1032 y = rcSheet.bottom - ((padding.y * 2) + buttonHeight + lineHeight);
1034 lineWidth = rcSheet.right - (padding.x * 2);
1035 SetWindowPos(hwndLine, 0, x, y, lineWidth, 2,
1036 SWP_NOZORDER | SWP_NOACTIVATE);
1039 * Position and resize the header sunken line.
1042 SetWindowPos(hwndLineHeader, 0, 0, 0, rcSheet.right, 2,
1043 SWP_NOZORDER | SWP_NOMOVE | SWP_NOACTIVATE);
1044 if (!(psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)))
1045 ShowWindow(hwndLineHeader, SW_HIDE);
1047 return TRUE;
1050 /******************************************************************************
1051 * PROPSHEET_GetPaddingInfo
1053 * Returns the layout information.
1055 static PADDING_INFO PROPSHEET_GetPaddingInfo(HWND hwndDlg)
1057 HWND hwndTab = GetDlgItem(hwndDlg, IDC_TABCONTROL);
1058 RECT rcTab;
1059 PADDING_INFO padding;
1061 GetWindowRect(hwndTab, &rcTab);
1062 MapWindowPoints( 0, hwndDlg, (POINT *)&rcTab, 2 );
1064 padding.x = rcTab.left;
1065 padding.y = rcTab.top;
1067 return padding;
1070 /******************************************************************************
1071 * PROPSHEET_GetPaddingInfoWizard
1073 * Returns the layout information.
1074 * Vertical spacing is the distance between the line and the buttons.
1075 * Do NOT use the Help button to gather padding information when it isn't mapped
1076 * (PSH_HASHELP), as app writers aren't forced to supply correct coordinates
1077 * for it in this case !
1078 * FIXME: I'm not sure about any other coordinate problems with these evil
1079 * buttons. Fix it in case additional problems appear or maybe calculate
1080 * a padding in a completely different way, as this is somewhat messy.
1082 static PADDING_INFO PROPSHEET_GetPaddingInfoWizard(HWND hwndDlg, const PropSheetInfo*
1083 psInfo)
1085 PADDING_INFO padding;
1086 RECT rc;
1087 HWND hwndControl;
1088 INT idButton;
1089 POINT ptButton, ptLine;
1091 TRACE("\n");
1092 if (psInfo->hasHelp)
1094 idButton = IDHELP;
1096 else
1098 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
1100 idButton = IDC_NEXT_BUTTON;
1102 else
1104 /* hopefully this is ok */
1105 idButton = IDCANCEL;
1109 hwndControl = GetDlgItem(hwndDlg, idButton);
1110 GetWindowRect(hwndControl, &rc);
1111 MapWindowPoints( 0, hwndDlg, (POINT *)&rc, 2 );
1112 ptButton.x = rc.left;
1113 ptButton.y = rc.top;
1115 /* Line */
1116 hwndControl = GetDlgItem(hwndDlg, IDC_SUNKEN_LINE);
1117 GetWindowRect(hwndControl, &rc);
1118 MapWindowPoints( 0, hwndDlg, (POINT *)&rc, 2 );
1119 ptLine.x = rc.left;
1120 ptLine.y = rc.bottom;
1122 padding.y = ptButton.y - ptLine.y;
1124 if (padding.y < 0)
1125 ERR("padding negative ! Please report this !\n");
1127 /* this is most probably not correct, but the best we have now */
1128 padding.x = padding.y;
1129 return padding;
1132 /******************************************************************************
1133 * PROPSHEET_CreateTabControl
1135 * Insert the tabs in the tab control.
1137 static BOOL PROPSHEET_CreateTabControl(HWND hwndParent,
1138 const PropSheetInfo * psInfo)
1140 HWND hwndTabCtrl = GetDlgItem(hwndParent, IDC_TABCONTROL);
1141 TCITEMW item;
1142 int i, nTabs;
1143 int iImage = 0;
1145 TRACE("\n");
1146 item.mask = TCIF_TEXT;
1147 item.cchTextMax = MAX_TABTEXT_LENGTH;
1149 nTabs = psInfo->nPages;
1152 * Set the image list for icons.
1154 if (psInfo->hImageList)
1156 SendMessageW(hwndTabCtrl, TCM_SETIMAGELIST, 0, (LPARAM)psInfo->hImageList);
1159 SendMessageW(hwndTabCtrl, WM_SETREDRAW, 0, 0);
1160 for (i = 0; i < nTabs; i++)
1162 if ( psInfo->proppage[i].hasIcon )
1164 item.mask |= TCIF_IMAGE;
1165 item.iImage = iImage++;
1167 else
1169 item.mask &= ~TCIF_IMAGE;
1172 item.pszText = (LPWSTR) psInfo->proppage[i].pszText;
1173 SendMessageW(hwndTabCtrl, TCM_INSERTITEMW, i, (LPARAM)&item);
1175 SendMessageW(hwndTabCtrl, WM_SETREDRAW, 1, 0);
1177 return TRUE;
1180 /******************************************************************************
1181 * PROPSHEET_WizardSubclassProc
1183 * Subclassing window procedure for wizard exterior pages to prevent drawing
1184 * background and so drawing above the watermark.
1186 static LRESULT CALLBACK
1187 PROPSHEET_WizardSubclassProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam, UINT_PTR uID, DWORD_PTR dwRef)
1189 switch (uMsg)
1191 case WM_ERASEBKGND:
1192 return TRUE;
1194 case WM_CTLCOLORSTATIC:
1195 SetBkColor((HDC)wParam, GetSysColor(COLOR_WINDOW));
1196 return (INT_PTR)GetSysColorBrush(COLOR_WINDOW);
1199 return DefSubclassProc(hwnd, uMsg, wParam, lParam);
1203 * Get the size of an in-memory Template
1205 *( Based on the code of PROPSHEET_CollectPageInfo)
1206 * See also dialog.c/DIALOG_ParseTemplate32().
1209 static UINT GetTemplateSize(const DLGTEMPLATE* pTemplate)
1212 const WORD* p = (const WORD *)pTemplate;
1213 BOOL istemplateex = (((const MyDLGTEMPLATEEX*)pTemplate)->signature == 0xFFFF);
1214 WORD nrofitems;
1215 UINT ret;
1217 if (istemplateex)
1219 /* DLGTEMPLATEEX (not defined in any std. header file) */
1221 TRACE("is DLGTEMPLATEEX\n");
1222 p++; /* dlgVer */
1223 p++; /* signature */
1224 p += 2; /* help ID */
1225 p += 2; /* ext style */
1226 p += 2; /* style */
1228 else
1230 /* DLGTEMPLATE */
1232 TRACE("is DLGTEMPLATE\n");
1233 p += 2; /* style */
1234 p += 2; /* ext style */
1237 nrofitems = (WORD)*p; p++; /* nb items */
1238 p++; /* x */
1239 p++; /* y */
1240 p++; /* width */
1241 p++; /* height */
1243 /* menu */
1244 switch ((WORD)*p)
1246 case 0x0000:
1247 p++;
1248 break;
1249 case 0xffff:
1250 p += 2;
1251 break;
1252 default:
1253 TRACE("menu %s\n",debugstr_w( p ));
1254 p += lstrlenW( p ) + 1;
1255 break;
1258 /* class */
1259 switch ((WORD)*p)
1261 case 0x0000:
1262 p++;
1263 break;
1264 case 0xffff:
1265 p += 2; /* 0xffff plus predefined window class ordinal value */
1266 break;
1267 default:
1268 TRACE("class %s\n",debugstr_w( p ));
1269 p += lstrlenW( p ) + 1;
1270 break;
1273 /* title */
1274 TRACE("title %s\n",debugstr_w( p ));
1275 p += lstrlenW( p ) + 1;
1277 /* font, if DS_SETFONT set */
1278 if ((DS_SETFONT & ((istemplateex)? ((const MyDLGTEMPLATEEX*)pTemplate)->style :
1279 pTemplate->style)))
1281 p+=(istemplateex)?3:1;
1282 TRACE("font %s\n",debugstr_w( p ));
1283 p += lstrlenW( p ) + 1; /* the font name */
1286 /* now process the DLGITEMTEMPLATE(EX) structs (plus custom data)
1287 * that are following the DLGTEMPLATE(EX) data */
1288 TRACE("%d items\n",nrofitems);
1289 while (nrofitems > 0)
1291 p = (WORD*)(((DWORD_PTR)p + 3) & ~3); /* DWORD align */
1293 /* skip header */
1294 p += (istemplateex ? sizeof(MyDLGITEMTEMPLATEEX) : sizeof(DLGITEMTEMPLATE))/sizeof(WORD);
1296 /* check class */
1297 switch ((WORD)*p)
1299 case 0x0000:
1300 p++;
1301 break;
1302 case 0xffff:
1303 TRACE("class ordinal 0x%08x\n",*(const DWORD*)p);
1304 p += 2;
1305 break;
1306 default:
1307 TRACE("class %s\n",debugstr_w( p ));
1308 p += lstrlenW( p ) + 1;
1309 break;
1312 /* check title text */
1313 switch ((WORD)*p)
1315 case 0x0000:
1316 p++;
1317 break;
1318 case 0xffff:
1319 TRACE("text ordinal 0x%08x\n",*(const DWORD*)p);
1320 p += 2;
1321 break;
1322 default:
1323 TRACE("text %s\n",debugstr_w( p ));
1324 p += lstrlenW( p ) + 1;
1325 break;
1327 p += *p / sizeof(WORD) + 1; /* Skip extra data */
1328 --nrofitems;
1331 ret = (p - (const WORD*)pTemplate) * sizeof(WORD);
1332 TRACE("%p %p size 0x%08x\n", p, pTemplate, ret);
1333 return ret;
1336 /******************************************************************************
1337 * PROPSHEET_CreatePage
1339 * Creates a page.
1341 static BOOL PROPSHEET_CreatePage(HWND hwndParent,
1342 int index,
1343 const PropSheetInfo * psInfo,
1344 LPCPROPSHEETPAGEW ppshpage)
1346 const DLGTEMPLATE* pTemplate;
1347 HWND hwndPage;
1348 DWORD resSize;
1349 DLGTEMPLATE* pTemplateCopy = NULL;
1351 TRACE("index %d\n", index);
1353 if (ppshpage == NULL)
1355 return FALSE;
1358 if (ppshpage->dwFlags & PSP_DLGINDIRECT)
1360 pTemplate = ppshpage->u.pResource;
1361 resSize = GetTemplateSize(pTemplate);
1363 else if(ppshpage->dwFlags & PSP_INTERNAL_UNICODE)
1365 HRSRC hResource;
1366 HANDLE hTemplate;
1368 hResource = FindResourceW(ppshpage->hInstance,
1369 ppshpage->u.pszTemplate,
1370 (LPWSTR)RT_DIALOG);
1371 if(!hResource)
1372 return FALSE;
1374 resSize = SizeofResource(ppshpage->hInstance, hResource);
1376 hTemplate = LoadResource(ppshpage->hInstance, hResource);
1377 if(!hTemplate)
1378 return FALSE;
1380 pTemplate = LockResource(hTemplate);
1382 * Make a copy of the dialog template to make it writable
1385 else
1387 HRSRC hResource;
1388 HANDLE hTemplate;
1390 hResource = FindResourceA(ppshpage->hInstance,
1391 (LPCSTR)ppshpage->u.pszTemplate,
1392 (LPSTR)RT_DIALOG);
1393 if(!hResource)
1394 return FALSE;
1396 resSize = SizeofResource(ppshpage->hInstance, hResource);
1398 hTemplate = LoadResource(ppshpage->hInstance, hResource);
1399 if(!hTemplate)
1400 return FALSE;
1402 pTemplate = LockResource(hTemplate);
1404 * Make a copy of the dialog template to make it writable
1407 pTemplateCopy = Alloc(resSize);
1408 if (!pTemplateCopy)
1409 return FALSE;
1411 TRACE("copying pTemplate %p into pTemplateCopy %p (%d)\n", pTemplate, pTemplateCopy, resSize);
1412 memcpy(pTemplateCopy, pTemplate, resSize);
1414 if (((MyDLGTEMPLATEEX*)pTemplateCopy)->signature == 0xFFFF)
1416 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style |= WS_CHILD | WS_TABSTOP | DS_CONTROL;
1417 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~DS_MODALFRAME;
1418 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_CAPTION;
1419 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_SYSMENU;
1420 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_POPUP;
1421 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_DISABLED;
1422 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_VISIBLE;
1423 ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_THICKFRAME;
1425 ((MyDLGTEMPLATEEX*)pTemplateCopy)->exStyle |= WS_EX_CONTROLPARENT;
1427 else
1429 pTemplateCopy->style |= WS_CHILD | WS_TABSTOP | DS_CONTROL;
1430 pTemplateCopy->style &= ~DS_MODALFRAME;
1431 pTemplateCopy->style &= ~WS_CAPTION;
1432 pTemplateCopy->style &= ~WS_SYSMENU;
1433 pTemplateCopy->style &= ~WS_POPUP;
1434 pTemplateCopy->style &= ~WS_DISABLED;
1435 pTemplateCopy->style &= ~WS_VISIBLE;
1436 pTemplateCopy->style &= ~WS_THICKFRAME;
1438 pTemplateCopy->dwExtendedStyle |= WS_EX_CONTROLPARENT;
1441 if (psInfo->proppage[index].useCallback)
1442 (*(ppshpage->pfnCallback))(0, PSPCB_CREATE,
1443 (LPPROPSHEETPAGEW)ppshpage);
1445 if(ppshpage->dwFlags & PSP_INTERNAL_UNICODE)
1446 hwndPage = CreateDialogIndirectParamW(ppshpage->hInstance,
1447 pTemplateCopy,
1448 hwndParent,
1449 ppshpage->pfnDlgProc,
1450 (LPARAM)ppshpage);
1451 else
1452 hwndPage = CreateDialogIndirectParamA(ppshpage->hInstance,
1453 pTemplateCopy,
1454 hwndParent,
1455 ppshpage->pfnDlgProc,
1456 (LPARAM)ppshpage);
1457 /* Free a no more needed copy */
1458 Free(pTemplateCopy);
1460 if(!hwndPage)
1461 return FALSE;
1463 psInfo->proppage[index].hwndPage = hwndPage;
1465 /* Subclass exterior wizard pages */
1466 if((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
1467 (psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
1468 (ppshpage->dwFlags & PSP_HIDEHEADER))
1470 SetWindowSubclass(hwndPage, PROPSHEET_WizardSubclassProc, 1,
1471 (DWORD_PTR)ppshpage);
1473 if (!(psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD))
1474 EnableThemeDialogTexture (hwndPage, ETDT_ENABLETAB);
1476 return TRUE;
1479 /******************************************************************************
1480 * PROPSHEET_LoadWizardBitmaps
1482 * Loads the watermark and header bitmaps for a wizard.
1484 static VOID PROPSHEET_LoadWizardBitmaps(PropSheetInfo *psInfo)
1486 if (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD))
1488 /* if PSH_USEHBMWATERMARK is not set, load the resource from pszbmWatermark
1489 and put the HBITMAP in hbmWatermark. Thus all the rest of the code always
1490 considers hbmWatermark as valid. */
1491 if ((psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
1492 !(psInfo->ppshheader.dwFlags & PSH_USEHBMWATERMARK))
1494 psInfo->ppshheader.u4.hbmWatermark =
1495 CreateMappedBitmap(psInfo->ppshheader.hInstance, (INT_PTR)psInfo->ppshheader.u4.pszbmWatermark, 0, NULL, 0);
1498 /* Same behavior as for watermarks */
1499 if ((psInfo->ppshheader.dwFlags & PSH_HEADER) &&
1500 !(psInfo->ppshheader.dwFlags & PSH_USEHBMHEADER))
1502 psInfo->ppshheader.u5.hbmHeader =
1503 CreateMappedBitmap(psInfo->ppshheader.hInstance, (INT_PTR)psInfo->ppshheader.u5.pszbmHeader, 0, NULL, 0);
1509 /******************************************************************************
1510 * PROPSHEET_ShowPage
1512 * Displays or creates the specified page.
1514 static BOOL PROPSHEET_ShowPage(HWND hwndDlg, int index, PropSheetInfo * psInfo)
1516 HWND hwndTabCtrl;
1517 HWND hwndLineHeader;
1518 HWND control;
1519 LPCPROPSHEETPAGEW ppshpage;
1521 TRACE("active_page %d, index %d\n", psInfo->active_page, index);
1522 if (index == psInfo->active_page)
1524 if (GetTopWindow(hwndDlg) != psInfo->proppage[index].hwndPage)
1525 SetWindowPos(psInfo->proppage[index].hwndPage, HWND_TOP, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE);
1526 return TRUE;
1529 ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
1530 if (psInfo->proppage[index].hwndPage == 0)
1532 PROPSHEET_CreatePage(hwndDlg, index, psInfo, ppshpage);
1535 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
1537 PROPSHEET_SetTitleW(hwndDlg, psInfo->ppshheader.dwFlags,
1538 psInfo->proppage[index].pszText);
1540 control = GetNextDlgTabItem(psInfo->proppage[index].hwndPage, NULL, FALSE);
1541 if(control != NULL)
1542 SetFocus(control);
1545 if (psInfo->active_page != -1)
1546 ShowWindow(psInfo->proppage[psInfo->active_page].hwndPage, SW_HIDE);
1548 ShowWindow(psInfo->proppage[index].hwndPage, SW_SHOW);
1550 /* Synchronize current selection with tab control
1551 * It seems to be needed even in case of PSH_WIZARD (no tab controls there) */
1552 hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
1553 SendMessageW(hwndTabCtrl, TCM_SETCURSEL, index, 0);
1555 psInfo->active_page = index;
1556 psInfo->activeValid = TRUE;
1558 if (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW) )
1560 hwndLineHeader = GetDlgItem(hwndDlg, IDC_SUNKEN_LINEHEADER);
1561 ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
1563 if ((ppshpage->dwFlags & PSP_HIDEHEADER) || (!(psInfo->ppshheader.dwFlags & PSH_HEADER)) )
1564 ShowWindow(hwndLineHeader, SW_HIDE);
1565 else
1566 ShowWindow(hwndLineHeader, SW_SHOW);
1569 return TRUE;
1572 /******************************************************************************
1573 * PROPSHEET_Back
1575 static BOOL PROPSHEET_Back(HWND hwndDlg)
1577 PSHNOTIFY psn;
1578 HWND hwndPage;
1579 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1580 LRESULT result;
1581 int idx;
1583 TRACE("active_page %d\n", psInfo->active_page);
1584 if (psInfo->active_page < 0)
1585 return FALSE;
1587 psn.hdr.code = PSN_WIZBACK;
1588 psn.hdr.hwndFrom = hwndDlg;
1589 psn.hdr.idFrom = 0;
1590 psn.lParam = 0;
1592 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1594 result = SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1595 if (result == -1)
1596 return FALSE;
1597 else if (result == 0)
1598 idx = psInfo->active_page - 1;
1599 else
1600 idx = PROPSHEET_FindPageByResId(psInfo, result);
1602 if (idx >= 0 && idx < psInfo->nPages)
1604 if (PROPSHEET_CanSetCurSel(hwndDlg))
1606 SetFocus(GetDlgItem(hwndDlg, IDC_BACK_BUTTON));
1607 SendMessageW(hwndDlg, DM_SETDEFID, IDC_BACK_BUTTON, 0);
1608 PROPSHEET_SetCurSel(hwndDlg, idx, -1, 0);
1611 return TRUE;
1614 /******************************************************************************
1615 * PROPSHEET_Next
1617 static BOOL PROPSHEET_Next(HWND hwndDlg)
1619 PSHNOTIFY psn;
1620 HWND hwndPage;
1621 LRESULT msgResult = 0;
1622 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1623 int idx;
1625 TRACE("active_page %d\n", psInfo->active_page);
1626 if (psInfo->active_page < 0)
1627 return FALSE;
1629 psn.hdr.code = PSN_WIZNEXT;
1630 psn.hdr.hwndFrom = hwndDlg;
1631 psn.hdr.idFrom = 0;
1632 psn.lParam = 0;
1634 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1636 msgResult = SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1637 if (msgResult == -1)
1638 return FALSE;
1639 else if (msgResult == 0)
1640 idx = psInfo->active_page + 1;
1641 else
1642 idx = PROPSHEET_FindPageByResId(psInfo, msgResult);
1644 if (idx < psInfo->nPages )
1646 if (PROPSHEET_CanSetCurSel(hwndDlg) != FALSE)
1648 SetFocus(GetDlgItem(hwndDlg, IDC_NEXT_BUTTON));
1649 SendMessageW(hwndDlg, DM_SETDEFID, IDC_NEXT_BUTTON, 0);
1650 PROPSHEET_SetCurSel(hwndDlg, idx, 1, 0);
1654 return TRUE;
1657 /******************************************************************************
1658 * PROPSHEET_Finish
1660 static BOOL PROPSHEET_Finish(HWND hwndDlg)
1662 PSHNOTIFY psn;
1663 HWND hwndPage;
1664 LRESULT msgResult = 0;
1665 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1667 TRACE("active_page %d\n", psInfo->active_page);
1668 if (psInfo->active_page < 0)
1669 return FALSE;
1671 psn.hdr.code = PSN_WIZFINISH;
1672 psn.hdr.hwndFrom = hwndDlg;
1673 psn.hdr.idFrom = 0;
1674 psn.lParam = 0;
1676 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1678 msgResult = SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1680 TRACE("msg result %ld\n", msgResult);
1682 if (msgResult != 0)
1683 return FALSE;
1685 if (psInfo->result == 0)
1686 psInfo->result = IDOK;
1687 if (psInfo->isModeless)
1688 psInfo->activeValid = FALSE;
1689 else
1690 psInfo->ended = TRUE;
1692 return TRUE;
1695 /******************************************************************************
1696 * PROPSHEET_Apply
1698 static BOOL PROPSHEET_Apply(HWND hwndDlg, LPARAM lParam)
1700 int i;
1701 HWND hwndPage;
1702 PSHNOTIFY psn;
1703 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1705 TRACE("active_page %d\n", psInfo->active_page);
1706 if (psInfo->active_page < 0)
1707 return FALSE;
1709 psn.hdr.hwndFrom = hwndDlg;
1710 psn.hdr.idFrom = 0;
1711 psn.lParam = 0;
1715 * Send PSN_KILLACTIVE to the current page.
1717 psn.hdr.code = PSN_KILLACTIVE;
1719 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1721 if (SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn) != FALSE)
1722 return FALSE;
1725 * Send PSN_APPLY to all pages.
1727 psn.hdr.code = PSN_APPLY;
1728 psn.lParam = lParam;
1730 for (i = 0; i < psInfo->nPages; i++)
1732 hwndPage = psInfo->proppage[i].hwndPage;
1733 if (hwndPage)
1735 switch (SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn))
1737 case PSNRET_INVALID:
1738 PROPSHEET_ShowPage(hwndDlg, i, psInfo);
1739 /* fall through */
1740 case PSNRET_INVALID_NOCHANGEPAGE:
1741 return FALSE;
1746 if(lParam)
1748 psInfo->activeValid = FALSE;
1750 else if(psInfo->active_page >= 0)
1752 psn.hdr.code = PSN_SETACTIVE;
1753 psn.lParam = 0;
1754 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1755 SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1758 return TRUE;
1761 /******************************************************************************
1762 * PROPSHEET_Cancel
1764 static void PROPSHEET_Cancel(HWND hwndDlg, LPARAM lParam)
1766 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1767 HWND hwndPage;
1768 PSHNOTIFY psn;
1769 int i;
1771 TRACE("active_page %d\n", psInfo->active_page);
1772 if (psInfo->active_page < 0)
1773 return;
1775 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1776 psn.hdr.code = PSN_QUERYCANCEL;
1777 psn.hdr.hwndFrom = hwndDlg;
1778 psn.hdr.idFrom = 0;
1779 psn.lParam = 0;
1781 if (SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn))
1782 return;
1784 psn.hdr.code = PSN_RESET;
1785 psn.lParam = lParam;
1787 for (i = 0; i < psInfo->nPages; i++)
1789 hwndPage = psInfo->proppage[i].hwndPage;
1791 if (hwndPage)
1792 SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1795 if (psInfo->isModeless)
1797 /* makes PSM_GETCURRENTPAGEHWND return NULL */
1798 psInfo->activeValid = FALSE;
1800 else
1801 psInfo->ended = TRUE;
1804 /******************************************************************************
1805 * PROPSHEET_Help
1807 static void PROPSHEET_Help(HWND hwndDlg)
1809 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1810 HWND hwndPage;
1811 PSHNOTIFY psn;
1813 TRACE("active_page %d\n", psInfo->active_page);
1814 if (psInfo->active_page < 0)
1815 return;
1817 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1818 psn.hdr.code = PSN_HELP;
1819 psn.hdr.hwndFrom = hwndDlg;
1820 psn.hdr.idFrom = 0;
1821 psn.lParam = 0;
1823 SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1826 /******************************************************************************
1827 * PROPSHEET_Changed
1829 static void PROPSHEET_Changed(HWND hwndDlg, HWND hwndDirtyPage)
1831 int i;
1832 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1834 TRACE("\n");
1835 if (!psInfo) return;
1837 * Set the dirty flag of this page.
1839 for (i = 0; i < psInfo->nPages; i++)
1841 if (psInfo->proppage[i].hwndPage == hwndDirtyPage)
1842 psInfo->proppage[i].isDirty = TRUE;
1846 * Enable the Apply button.
1848 if (psInfo->hasApply)
1850 HWND hwndApplyBtn = GetDlgItem(hwndDlg, IDC_APPLY_BUTTON);
1852 EnableWindow(hwndApplyBtn, TRUE);
1856 /******************************************************************************
1857 * PROPSHEET_UnChanged
1859 static void PROPSHEET_UnChanged(HWND hwndDlg, HWND hwndCleanPage)
1861 int i;
1862 BOOL noPageDirty = TRUE;
1863 HWND hwndApplyBtn = GetDlgItem(hwndDlg, IDC_APPLY_BUTTON);
1864 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1866 TRACE("\n");
1867 if ( !psInfo ) return;
1868 for (i = 0; i < psInfo->nPages; i++)
1870 /* set the specified page as clean */
1871 if (psInfo->proppage[i].hwndPage == hwndCleanPage)
1872 psInfo->proppage[i].isDirty = FALSE;
1874 /* look to see if there are any dirty pages */
1875 if (psInfo->proppage[i].isDirty)
1876 noPageDirty = FALSE;
1880 * Disable Apply button.
1882 if (noPageDirty)
1883 EnableWindow(hwndApplyBtn, FALSE);
1886 /******************************************************************************
1887 * PROPSHEET_PressButton
1889 static void PROPSHEET_PressButton(HWND hwndDlg, int buttonID)
1891 TRACE("buttonID %d\n", buttonID);
1892 switch (buttonID)
1894 case PSBTN_APPLYNOW:
1895 PROPSHEET_DoCommand(hwndDlg, IDC_APPLY_BUTTON);
1896 break;
1897 case PSBTN_BACK:
1898 PROPSHEET_Back(hwndDlg);
1899 break;
1900 case PSBTN_CANCEL:
1901 PROPSHEET_DoCommand(hwndDlg, IDCANCEL);
1902 break;
1903 case PSBTN_FINISH:
1904 PROPSHEET_Finish(hwndDlg);
1905 break;
1906 case PSBTN_HELP:
1907 PROPSHEET_DoCommand(hwndDlg, IDHELP);
1908 break;
1909 case PSBTN_NEXT:
1910 PROPSHEET_Next(hwndDlg);
1911 break;
1912 case PSBTN_OK:
1913 PROPSHEET_DoCommand(hwndDlg, IDOK);
1914 break;
1915 default:
1916 FIXME("Invalid button index %d\n", buttonID);
1921 /*************************************************************************
1922 * BOOL PROPSHEET_CanSetCurSel [Internal]
1924 * Test whether the current page can be changed by sending a PSN_KILLACTIVE
1926 * PARAMS
1927 * hwndDlg [I] handle to a Dialog hWnd
1929 * RETURNS
1930 * TRUE if Current Selection can change
1932 * NOTES
1934 static BOOL PROPSHEET_CanSetCurSel(HWND hwndDlg)
1936 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1937 HWND hwndPage;
1938 PSHNOTIFY psn;
1939 BOOL res = FALSE;
1941 if (!psInfo)
1943 res = FALSE;
1944 goto end;
1947 TRACE("active_page %d\n", psInfo->active_page);
1948 if (psInfo->active_page < 0)
1950 res = TRUE;
1951 goto end;
1955 * Notify the current page.
1957 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1958 psn.hdr.code = PSN_KILLACTIVE;
1959 psn.hdr.hwndFrom = hwndDlg;
1960 psn.hdr.idFrom = 0;
1961 psn.lParam = 0;
1963 res = !SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1965 end:
1966 TRACE("<-- %d\n", res);
1967 return res;
1970 /******************************************************************************
1971 * PROPSHEET_SetCurSel
1973 static BOOL PROPSHEET_SetCurSel(HWND hwndDlg,
1974 int index,
1975 int skipdir,
1976 HPROPSHEETPAGE hpage
1979 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1980 HWND hwndHelp = GetDlgItem(hwndDlg, IDHELP);
1981 HWND hwndTabControl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
1983 TRACE("index %d, skipdir %d, hpage %p\n", index, skipdir, hpage);
1985 index = PROPSHEET_GetPageIndex(hpage, psInfo, index);
1987 if (index < 0 || index >= psInfo->nPages)
1989 TRACE("Could not find page to select!\n");
1990 return FALSE;
1993 /* unset active page while doing this transition. */
1994 if (psInfo->active_page != -1)
1995 ShowWindow(psInfo->proppage[psInfo->active_page].hwndPage, SW_HIDE);
1996 psInfo->active_page = -1;
1998 while (1) {
1999 int result;
2000 PSHNOTIFY psn;
2001 RECT rc;
2002 LPCPROPSHEETPAGEW ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
2004 if (hwndTabControl)
2005 SendMessageW(hwndTabControl, TCM_SETCURSEL, index, 0);
2007 psn.hdr.code = PSN_SETACTIVE;
2008 psn.hdr.hwndFrom = hwndDlg;
2009 psn.hdr.idFrom = 0;
2010 psn.lParam = 0;
2012 if (!psInfo->proppage[index].hwndPage) {
2013 if(!PROPSHEET_CreatePage(hwndDlg, index, psInfo, ppshpage)) {
2014 PROPSHEET_RemovePage(hwndDlg, index, NULL);
2015 if(index >= psInfo->nPages)
2016 index--;
2017 if(index < 0)
2018 return FALSE;
2019 continue;
2023 /* Resize the property sheet page to the fit in the Tab control
2024 * (for regular property sheets) or to fit in the client area (for
2025 * wizards).
2026 * NOTE: The resizing happens every time the page is selected and
2027 * not only when it's created (some applications depend on it). */
2028 PROPSHEET_GetPageRect(psInfo, hwndDlg, &rc, ppshpage);
2029 TRACE("setting page %p, rc (%s) w=%d, h=%d\n",
2030 psInfo->proppage[index].hwndPage, wine_dbgstr_rect(&rc),
2031 rc.right - rc.left, rc.bottom - rc.top);
2032 SetWindowPos(psInfo->proppage[index].hwndPage, HWND_TOP,
2033 rc.left, rc.top,
2034 rc.right - rc.left, rc.bottom - rc.top, 0);
2036 result = SendMessageW(psInfo->proppage[index].hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
2037 if (!result)
2038 break;
2039 if (result == -1) {
2040 index+=skipdir;
2041 if (index < 0) {
2042 index = 0;
2043 WARN("Tried to skip before first property sheet page!\n");
2044 break;
2046 if (index >= psInfo->nPages) {
2047 WARN("Tried to skip after last property sheet page!\n");
2048 index = psInfo->nPages-1;
2049 break;
2052 else if (result != 0)
2054 int old_index = index;
2055 index = PROPSHEET_FindPageByResId(psInfo, result);
2056 if(index >= psInfo->nPages) {
2057 index = old_index;
2058 WARN("Tried to skip to nonexistent page by res id\n");
2059 break;
2061 continue;
2065 /* Invalidate the header area */
2066 if ( (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
2067 (psInfo->ppshheader.dwFlags & PSH_HEADER) )
2069 HWND hwndLineHeader = GetDlgItem(hwndDlg, IDC_SUNKEN_LINEHEADER);
2070 RECT r;
2072 GetClientRect(hwndLineHeader, &r);
2073 MapWindowPoints(hwndLineHeader, hwndDlg, (LPPOINT) &r, 2);
2074 SetRect(&r, 0, 0, r.right + 1, r.top - 1);
2076 InvalidateRect(hwndDlg, &r, TRUE);
2080 * Display the new page.
2082 PROPSHEET_ShowPage(hwndDlg, index, psInfo);
2084 if (psInfo->proppage[index].hasHelp)
2085 EnableWindow(hwndHelp, TRUE);
2086 else
2087 EnableWindow(hwndHelp, FALSE);
2089 return TRUE;
2092 /******************************************************************************
2093 * PROPSHEET_SetCurSelId
2095 * Selects the page, specified by resource id.
2097 static void PROPSHEET_SetCurSelId(HWND hwndDlg, int id)
2099 int idx;
2100 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2102 idx = PROPSHEET_FindPageByResId(psInfo, id);
2103 if (idx < psInfo->nPages )
2105 if (PROPSHEET_CanSetCurSel(hwndDlg) != FALSE)
2106 PROPSHEET_SetCurSel(hwndDlg, idx, 1, 0);
2110 /******************************************************************************
2111 * PROPSHEET_SetTitleA
2113 static void PROPSHEET_SetTitleA(HWND hwndDlg, DWORD dwStyle, LPCSTR lpszText)
2115 if(!IS_INTRESOURCE(lpszText))
2117 WCHAR szTitle[256];
2118 MultiByteToWideChar(CP_ACP, 0, lpszText, -1,
2119 szTitle, sizeof(szTitle)/sizeof(WCHAR));
2120 PROPSHEET_SetTitleW(hwndDlg, dwStyle, szTitle);
2122 else
2124 PROPSHEET_SetTitleW(hwndDlg, dwStyle, (LPCWSTR)lpszText);
2128 /******************************************************************************
2129 * PROPSHEET_SetTitleW
2131 static void PROPSHEET_SetTitleW(HWND hwndDlg, DWORD dwStyle, LPCWSTR lpszText)
2133 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2134 WCHAR szTitle[256];
2136 TRACE("%s (style %08x)\n", debugstr_w(lpszText), dwStyle);
2137 if (IS_INTRESOURCE(lpszText)) {
2138 if (!LoadStringW(psInfo->ppshheader.hInstance,
2139 LOWORD(lpszText), szTitle, sizeof(szTitle)/sizeof(szTitle[0])))
2140 return;
2141 lpszText = szTitle;
2143 if (dwStyle & PSH_PROPTITLE)
2145 WCHAR* dest;
2146 int lentitle = strlenW(lpszText);
2147 int lenprop = strlenW(psInfo->strPropertiesFor);
2149 dest = Alloc( (lentitle + lenprop + 1)*sizeof (WCHAR));
2150 wsprintfW(dest, psInfo->strPropertiesFor, lpszText);
2152 SetWindowTextW(hwndDlg, dest);
2153 Free(dest);
2155 else
2156 SetWindowTextW(hwndDlg, lpszText);
2159 /******************************************************************************
2160 * PROPSHEET_SetFinishTextA
2162 static void PROPSHEET_SetFinishTextA(HWND hwndDlg, LPCSTR lpszText)
2164 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2165 HWND hwndButton = GetDlgItem(hwndDlg, IDC_FINISH_BUTTON);
2167 TRACE("'%s'\n", lpszText);
2168 /* Set text, show and enable the Finish button */
2169 SetWindowTextA(hwndButton, lpszText);
2170 ShowWindow(hwndButton, SW_SHOW);
2171 EnableWindow(hwndButton, TRUE);
2173 /* Make it default pushbutton */
2174 SendMessageW(hwndDlg, DM_SETDEFID, IDC_FINISH_BUTTON, 0);
2176 /* Hide Back button */
2177 hwndButton = GetDlgItem(hwndDlg, IDC_BACK_BUTTON);
2178 ShowWindow(hwndButton, SW_HIDE);
2180 if (!psInfo->hasFinish)
2182 /* Hide Next button */
2183 hwndButton = GetDlgItem(hwndDlg, IDC_NEXT_BUTTON);
2184 ShowWindow(hwndButton, SW_HIDE);
2188 /******************************************************************************
2189 * PROPSHEET_SetFinishTextW
2191 static void PROPSHEET_SetFinishTextW(HWND hwndDlg, LPCWSTR lpszText)
2193 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2194 HWND hwndButton = GetDlgItem(hwndDlg, IDC_FINISH_BUTTON);
2196 TRACE("%s\n", debugstr_w(lpszText));
2197 /* Set text, show and enable the Finish button */
2198 SetWindowTextW(hwndButton, lpszText);
2199 ShowWindow(hwndButton, SW_SHOW);
2200 EnableWindow(hwndButton, TRUE);
2202 /* Make it default pushbutton */
2203 SendMessageW(hwndDlg, DM_SETDEFID, IDC_FINISH_BUTTON, 0);
2205 /* Hide Back button */
2206 hwndButton = GetDlgItem(hwndDlg, IDC_BACK_BUTTON);
2207 ShowWindow(hwndButton, SW_HIDE);
2209 if (!psInfo->hasFinish)
2211 /* Hide Next button */
2212 hwndButton = GetDlgItem(hwndDlg, IDC_NEXT_BUTTON);
2213 ShowWindow(hwndButton, SW_HIDE);
2217 /******************************************************************************
2218 * PROPSHEET_QuerySiblings
2220 static LRESULT PROPSHEET_QuerySiblings(HWND hwndDlg,
2221 WPARAM wParam, LPARAM lParam)
2223 int i = 0;
2224 HWND hwndPage;
2225 LRESULT msgResult = 0;
2226 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2228 while ((i < psInfo->nPages) && (msgResult == 0))
2230 hwndPage = psInfo->proppage[i].hwndPage;
2231 msgResult = SendMessageW(hwndPage, PSM_QUERYSIBLINGS, wParam, lParam);
2232 i++;
2235 return msgResult;
2238 /******************************************************************************
2239 * PROPSHEET_InsertPage
2241 static BOOL PROPSHEET_InsertPage(HWND hwndDlg, HPROPSHEETPAGE hpageInsertAfter, HPROPSHEETPAGE hpage)
2243 PropSheetInfo *psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2244 PropPageInfo *ppi, *prev_ppi = psInfo->proppage;
2245 HWND hwndTabControl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
2246 LPCPROPSHEETPAGEW ppsp = (LPCPROPSHEETPAGEW)hpage;
2247 TCITEMW item;
2248 int index;
2250 TRACE("hwndDlg %p, hpageInsertAfter %p, hpage %p\n", hwndDlg, hpageInsertAfter, hpage);
2252 if (IS_INTRESOURCE(hpageInsertAfter))
2253 index = LOWORD(hpageInsertAfter);
2254 else
2256 index = PROPSHEET_GetPageIndex(hpageInsertAfter, psInfo, -1);
2257 if (index < 0)
2259 TRACE("Could not find page to insert after!\n");
2260 return FALSE;
2262 index++;
2265 if (index > psInfo->nPages)
2266 index = psInfo->nPages;
2268 ppi = Alloc(sizeof(PropPageInfo) * (psInfo->nPages + 1));
2269 if (!ppi)
2270 return FALSE;
2273 * Fill in a new PropPageInfo entry.
2275 if (index > 0)
2276 memcpy(ppi, prev_ppi, index * sizeof(PropPageInfo));
2277 memset(&ppi[index], 0, sizeof(PropPageInfo));
2278 if (index < psInfo->nPages)
2279 memcpy(&ppi[index + 1], &prev_ppi[index], (psInfo->nPages - index) * sizeof(PropPageInfo));
2280 psInfo->proppage = ppi;
2282 if (!PROPSHEET_CollectPageInfo(ppsp, psInfo, index, FALSE))
2284 psInfo->proppage = prev_ppi;
2285 Free(ppi);
2286 return FALSE;
2289 psInfo->proppage[index].hpage = hpage;
2291 if (ppsp->dwFlags & PSP_PREMATURE)
2293 /* Create the page but don't show it */
2294 if (!PROPSHEET_CreatePage(hwndDlg, index, psInfo, ppsp))
2296 psInfo->proppage = prev_ppi;
2297 Free(ppi);
2298 return FALSE;
2302 Free(prev_ppi);
2303 psInfo->nPages++;
2304 if (index <= psInfo->active_page)
2305 psInfo->active_page++;
2308 * Add a new tab to the tab control.
2310 item.mask = TCIF_TEXT;
2311 item.pszText = (LPWSTR) psInfo->proppage[index].pszText;
2312 item.cchTextMax = MAX_TABTEXT_LENGTH;
2314 if (psInfo->hImageList)
2315 SendMessageW(hwndTabControl, TCM_SETIMAGELIST, 0, (LPARAM)psInfo->hImageList);
2317 if (psInfo->proppage[index].hasIcon)
2319 item.mask |= TCIF_IMAGE;
2320 item.iImage = index;
2323 SendMessageW(hwndTabControl, TCM_INSERTITEMW, index, (LPARAM)&item);
2325 /* If it is the only page - show it */
2326 if (psInfo->nPages == 1)
2327 PROPSHEET_SetCurSel(hwndDlg, 0, 1, 0);
2329 return TRUE;
2332 /******************************************************************************
2333 * PROPSHEET_AddPage
2335 static BOOL PROPSHEET_AddPage(HWND hwndDlg, HPROPSHEETPAGE hpage)
2337 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2338 TRACE("hwndDlg %p, hpage %p\n", hwndDlg, hpage);
2339 return PROPSHEET_InsertPage(hwndDlg, UlongToPtr(psInfo->nPages), hpage);
2342 /******************************************************************************
2343 * PROPSHEET_RemovePage
2345 static BOOL PROPSHEET_RemovePage(HWND hwndDlg,
2346 int index,
2347 HPROPSHEETPAGE hpage)
2349 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2350 HWND hwndTabControl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
2351 PropPageInfo* oldPages;
2353 TRACE("index %d, hpage %p\n", index, hpage);
2354 if (!psInfo) {
2355 return FALSE;
2358 index = PROPSHEET_GetPageIndex(hpage, psInfo, index);
2360 /* Make sure that index is within range */
2361 if (index < 0 || index >= psInfo->nPages)
2363 TRACE("Could not find page to remove!\n");
2364 return FALSE;
2367 TRACE("total pages %d removing page %d active page %d\n",
2368 psInfo->nPages, index, psInfo->active_page);
2370 * Check if we're removing the active page.
2372 if (index == psInfo->active_page)
2374 if (psInfo->nPages > 1)
2376 if (index > 0)
2378 /* activate previous page */
2379 PROPSHEET_SetCurSel(hwndDlg, index - 1, -1, 0);
2381 else
2383 /* activate the next page */
2384 PROPSHEET_SetCurSel(hwndDlg, index + 1, 1, 0);
2385 psInfo->active_page = index;
2388 else
2390 psInfo->active_page = -1;
2391 if (!psInfo->isModeless)
2393 psInfo->ended = TRUE;
2394 return TRUE;
2398 else if (index < psInfo->active_page)
2399 psInfo->active_page--;
2401 /* Unsubclass the page dialog window */
2402 if((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD) &&
2403 (psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
2404 ((PROPSHEETPAGEW*)psInfo->proppage[index].hpage)->dwFlags & PSP_HIDEHEADER))
2406 RemoveWindowSubclass(psInfo->proppage[index].hwndPage,
2407 PROPSHEET_WizardSubclassProc, 1);
2410 /* Destroy page dialog window */
2411 DestroyWindow(psInfo->proppage[index].hwndPage);
2413 /* Free page resources */
2414 if(psInfo->proppage[index].hpage)
2416 PROPSHEETPAGEW* psp = (PROPSHEETPAGEW*)psInfo->proppage[index].hpage;
2418 if (psp->dwFlags & PSP_USETITLE)
2419 Free ((LPVOID)psInfo->proppage[index].pszText);
2421 DestroyPropertySheetPage(psInfo->proppage[index].hpage);
2424 /* Remove the tab */
2425 SendMessageW(hwndTabControl, TCM_DELETEITEM, index, 0);
2427 oldPages = psInfo->proppage;
2428 psInfo->nPages--;
2429 psInfo->proppage = Alloc(sizeof(PropPageInfo) * psInfo->nPages);
2431 if (index > 0)
2432 memcpy(&psInfo->proppage[0], &oldPages[0], index * sizeof(PropPageInfo));
2434 if (index < psInfo->nPages)
2435 memcpy(&psInfo->proppage[index], &oldPages[index + 1],
2436 (psInfo->nPages - index) * sizeof(PropPageInfo));
2438 Free(oldPages);
2440 return FALSE;
2443 /******************************************************************************
2444 * PROPSHEET_SetWizButtons
2446 * This code will work if (and assumes that) the Next button is on top of the
2447 * Finish button. ie. Finish comes after Next in the Z order.
2448 * This means make sure the dialog template reflects this.
2451 static void PROPSHEET_SetWizButtons(HWND hwndDlg, DWORD dwFlags)
2453 PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2454 HWND hwndBack = GetDlgItem(hwndDlg, IDC_BACK_BUTTON);
2455 HWND hwndNext = GetDlgItem(hwndDlg, IDC_NEXT_BUTTON);
2456 HWND hwndFinish = GetDlgItem(hwndDlg, IDC_FINISH_BUTTON);
2457 BOOL enable_finish = ((dwFlags & PSWIZB_FINISH) || psInfo->hasFinish) && !(dwFlags & PSWIZB_DISABLEDFINISH);
2459 TRACE("%d\n", dwFlags);
2461 EnableWindow(hwndBack, dwFlags & PSWIZB_BACK);
2462 EnableWindow(hwndNext, dwFlags & PSWIZB_NEXT);
2463 EnableWindow(hwndFinish, enable_finish);
2465 /* set the default pushbutton to an enabled button */
2466 if (enable_finish)
2467 SendMessageW(hwndDlg, DM_SETDEFID, IDC_FINISH_BUTTON, 0);
2468 else if (dwFlags & PSWIZB_NEXT)
2469 SendMessageW(hwndDlg, DM_SETDEFID, IDC_NEXT_BUTTON, 0);
2470 else if (dwFlags & PSWIZB_BACK)
2471 SendMessageW(hwndDlg, DM_SETDEFID, IDC_BACK_BUTTON, 0);
2472 else
2473 SendMessageW(hwndDlg, DM_SETDEFID, IDCANCEL, 0);
2475 if (!psInfo->hasFinish)
2477 if ((dwFlags & PSWIZB_FINISH) || (dwFlags & PSWIZB_DISABLEDFINISH))
2479 /* Hide the Next button */
2480 ShowWindow(hwndNext, SW_HIDE);
2482 /* Show the Finish button */
2483 ShowWindow(hwndFinish, SW_SHOW);
2485 else
2487 /* Hide the Finish button */
2488 ShowWindow(hwndFinish, SW_HIDE);
2489 /* Show the Next button */
2490 ShowWindow(hwndNext, SW_SHOW);
2495 /******************************************************************************
2496 * PROPSHEET_SetHeaderTitleW
2498 static void PROPSHEET_SetHeaderTitleW(HWND hwndDlg, UINT page_index, const WCHAR *title)
2500 PropSheetInfo *psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2501 PROPSHEETPAGEW *page;
2503 TRACE("(%p, %u, %s)\n", hwndDlg, page_index, debugstr_w(title));
2505 if (page_index >= psInfo->nPages)
2506 return;
2508 page = (PROPSHEETPAGEW *)psInfo->proppage[page_index].hpage;
2510 if (!IS_INTRESOURCE(page->pszHeaderTitle))
2511 Free((void *)page->pszHeaderTitle);
2513 page->pszHeaderTitle = heap_strdupW(title);
2514 page->dwFlags |= PSP_USEHEADERTITLE;
2517 /******************************************************************************
2518 * PROPSHEET_SetHeaderTitleA
2520 static void PROPSHEET_SetHeaderTitleA(HWND hwndDlg, UINT page_index, const char *title)
2522 WCHAR *titleW;
2524 TRACE("(%p, %u, %s)\n", hwndDlg, page_index, debugstr_a(title));
2526 titleW = heap_strdupAtoW(title);
2527 PROPSHEET_SetHeaderTitleW(hwndDlg, page_index, titleW);
2528 Free(titleW);
2531 /******************************************************************************
2532 * PROPSHEET_SetHeaderSubTitleW
2534 static void PROPSHEET_SetHeaderSubTitleW(HWND hwndDlg, UINT page_index, const WCHAR *subtitle)
2536 PropSheetInfo *psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2537 PROPSHEETPAGEW *page;
2539 TRACE("(%p, %u, %s)\n", hwndDlg, page_index, debugstr_w(subtitle));
2541 if (page_index >= psInfo->nPages)
2542 return;
2544 page = (PROPSHEETPAGEW *)psInfo->proppage[page_index].hpage;
2546 if (!IS_INTRESOURCE(page->pszHeaderSubTitle))
2547 Free((void *)page->pszHeaderSubTitle);
2549 page->pszHeaderSubTitle = heap_strdupW(subtitle);
2550 page->dwFlags |= PSP_USEHEADERSUBTITLE;
2553 /******************************************************************************
2554 * PROPSHEET_SetHeaderSubTitleA
2556 static void PROPSHEET_SetHeaderSubTitleA(HWND hwndDlg, UINT page_index, const char *subtitle)
2558 WCHAR *subtitleW;
2560 TRACE("(%p, %u, %s)\n", hwndDlg, page_index, debugstr_a(subtitle));
2562 subtitleW = heap_strdupAtoW(subtitle);
2563 PROPSHEET_SetHeaderSubTitleW(hwndDlg, page_index, subtitleW);
2564 Free(subtitleW);
2567 /******************************************************************************
2568 * PROPSHEET_HwndToIndex
2570 static LRESULT PROPSHEET_HwndToIndex(HWND hwndDlg, HWND hPageDlg)
2572 int index;
2573 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2575 TRACE("(%p, %p)\n", hwndDlg, hPageDlg);
2577 for (index = 0; index < psInfo->nPages; index++)
2578 if (psInfo->proppage[index].hwndPage == hPageDlg)
2579 return index;
2580 WARN("%p not found\n", hPageDlg);
2581 return -1;
2584 /******************************************************************************
2585 * PROPSHEET_IndexToHwnd
2587 static LRESULT PROPSHEET_IndexToHwnd(HWND hwndDlg, int iPageIndex)
2589 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2590 TRACE("(%p, %d)\n", hwndDlg, iPageIndex);
2591 if (!psInfo)
2592 return 0;
2593 if (iPageIndex<0 || iPageIndex>=psInfo->nPages) {
2594 WARN("%d out of range.\n", iPageIndex);
2595 return 0;
2597 return (LRESULT)psInfo->proppage[iPageIndex].hwndPage;
2600 /******************************************************************************
2601 * PROPSHEET_PageToIndex
2603 static LRESULT PROPSHEET_PageToIndex(HWND hwndDlg, HPROPSHEETPAGE hPage)
2605 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2607 TRACE("(%p, %p)\n", hwndDlg, hPage);
2609 return PROPSHEET_GetPageIndex(hPage, psInfo, -1);
2612 /******************************************************************************
2613 * PROPSHEET_IndexToPage
2615 static LRESULT PROPSHEET_IndexToPage(HWND hwndDlg, int iPageIndex)
2617 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2618 TRACE("(%p, %d)\n", hwndDlg, iPageIndex);
2619 if (iPageIndex<0 || iPageIndex>=psInfo->nPages) {
2620 WARN("%d out of range.\n", iPageIndex);
2621 return 0;
2623 return (LRESULT)psInfo->proppage[iPageIndex].hpage;
2626 /******************************************************************************
2627 * PROPSHEET_IdToIndex
2629 static LRESULT PROPSHEET_IdToIndex(HWND hwndDlg, int iPageId)
2631 int index;
2632 LPCPROPSHEETPAGEW psp;
2633 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2634 TRACE("(%p, %d)\n", hwndDlg, iPageId);
2635 for (index = 0; index < psInfo->nPages; index++) {
2636 psp = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
2637 if (psp->u.pszTemplate == MAKEINTRESOURCEW(iPageId))
2638 return index;
2641 return -1;
2644 /******************************************************************************
2645 * PROPSHEET_IndexToId
2647 static LRESULT PROPSHEET_IndexToId(HWND hwndDlg, int iPageIndex)
2649 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2650 LPCPROPSHEETPAGEW psp;
2651 TRACE("(%p, %d)\n", hwndDlg, iPageIndex);
2652 if (iPageIndex<0 || iPageIndex>=psInfo->nPages) {
2653 WARN("%d out of range.\n", iPageIndex);
2654 return 0;
2656 psp = (LPCPROPSHEETPAGEW)psInfo->proppage[iPageIndex].hpage;
2657 if (psp->dwFlags & PSP_DLGINDIRECT || !IS_INTRESOURCE(psp->u.pszTemplate)) {
2658 return 0;
2660 return (LRESULT)psp->u.pszTemplate;
2663 /******************************************************************************
2664 * PROPSHEET_GetResult
2666 static LRESULT PROPSHEET_GetResult(HWND hwndDlg)
2668 PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2669 return psInfo->result;
2672 /******************************************************************************
2673 * PROPSHEET_RecalcPageSizes
2675 static BOOL PROPSHEET_RecalcPageSizes(HWND hwndDlg)
2677 FIXME("(%p): stub\n", hwndDlg);
2678 return FALSE;
2681 /******************************************************************************
2682 * PROPSHEET_GetPageIndex
2684 * Given a HPROPSHEETPAGE, returns the index of the corresponding page from
2685 * the array of PropPageInfo. If page is not found original index is used
2686 * (page takes precedence over index).
2688 static int PROPSHEET_GetPageIndex(HPROPSHEETPAGE page, const PropSheetInfo* psInfo, int original_index)
2690 int index;
2692 TRACE("page %p index %d\n", page, original_index);
2694 for (index = 0; index < psInfo->nPages; index++)
2695 if (psInfo->proppage[index].hpage == page)
2696 return index;
2698 return original_index;
2701 /******************************************************************************
2702 * PROPSHEET_CleanUp
2704 static void PROPSHEET_CleanUp(HWND hwndDlg)
2706 int i;
2707 PropSheetInfo* psInfo = RemovePropW(hwndDlg, PropSheetInfoStr);
2709 TRACE("\n");
2710 if (!psInfo) return;
2711 if (!IS_INTRESOURCE(psInfo->ppshheader.pszCaption))
2712 Free ((LPVOID)psInfo->ppshheader.pszCaption);
2714 for (i = 0; i < psInfo->nPages; i++)
2716 PROPSHEETPAGEA* psp = (PROPSHEETPAGEA*)psInfo->proppage[i].hpage;
2718 /* Unsubclass the page dialog window */
2719 if((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
2720 (psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
2721 (psp->dwFlags & PSP_HIDEHEADER))
2723 RemoveWindowSubclass(psInfo->proppage[i].hwndPage,
2724 PROPSHEET_WizardSubclassProc, 1);
2727 if(psInfo->proppage[i].hwndPage)
2728 DestroyWindow(psInfo->proppage[i].hwndPage);
2730 if(psp)
2732 if (psp->dwFlags & PSP_USETITLE)
2733 Free ((LPVOID)psInfo->proppage[i].pszText);
2735 DestroyPropertySheetPage(psInfo->proppage[i].hpage);
2739 DeleteObject(psInfo->hFont);
2740 DeleteObject(psInfo->hFontBold);
2741 /* If we created the bitmaps, destroy them */
2742 if ((psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
2743 (!(psInfo->ppshheader.dwFlags & PSH_USEHBMWATERMARK)) )
2744 DeleteObject(psInfo->ppshheader.u4.hbmWatermark);
2745 if ((psInfo->ppshheader.dwFlags & PSH_HEADER) &&
2746 (!(psInfo->ppshheader.dwFlags & PSH_USEHBMHEADER)) )
2747 DeleteObject(psInfo->ppshheader.u5.hbmHeader);
2749 Free(psInfo->proppage);
2750 Free(psInfo->strPropertiesFor);
2751 ImageList_Destroy(psInfo->hImageList);
2753 GlobalFree(psInfo);
2756 static INT do_loop(const PropSheetInfo *psInfo)
2758 MSG msg;
2759 INT ret = -1;
2760 HWND hwnd = psInfo->hwnd;
2761 HWND parent = psInfo->ppshheader.hwndParent;
2763 while(IsWindow(hwnd) && !psInfo->ended && (ret = GetMessageW(&msg, NULL, 0, 0)))
2765 if(ret == -1)
2766 break;
2768 if(!IsDialogMessageW(hwnd, &msg))
2770 TranslateMessage(&msg);
2771 DispatchMessageW(&msg);
2775 if(ret == 0)
2777 PostQuitMessage(msg.wParam);
2778 ret = -1;
2781 if(ret != -1)
2782 ret = psInfo->result;
2784 if(parent)
2785 EnableWindow(parent, TRUE);
2787 DestroyWindow(hwnd);
2788 return ret;
2791 /******************************************************************************
2792 * PROPSHEET_PropertySheet
2794 * Common code between PropertySheetA/W
2796 static INT_PTR PROPSHEET_PropertySheet(PropSheetInfo* psInfo, BOOL unicode)
2798 INT_PTR bRet = 0;
2799 HWND parent = NULL;
2800 if (psInfo->active_page >= psInfo->nPages) psInfo->active_page = 0;
2801 TRACE("startpage: %d of %d pages\n", psInfo->active_page, psInfo->nPages);
2803 psInfo->unicode = unicode;
2804 psInfo->ended = FALSE;
2806 if(!psInfo->isModeless)
2808 parent = psInfo->ppshheader.hwndParent;
2809 if (parent) EnableWindow(parent, FALSE);
2811 bRet = PROPSHEET_CreateDialog(psInfo);
2812 if(!psInfo->isModeless)
2813 bRet = do_loop(psInfo);
2814 return bRet;
2817 /******************************************************************************
2818 * PropertySheet (COMCTL32.@)
2819 * PropertySheetA (COMCTL32.@)
2821 * Creates a property sheet in the specified property sheet header.
2823 * RETURNS
2824 * Modal property sheets: Positive if successful or -1 otherwise.
2825 * Modeless property sheets: Property sheet handle.
2826 * Or:
2827 *| ID_PSREBOOTSYSTEM - The user must reboot the computer for the changes to take effect.
2828 *| ID_PSRESTARTWINDOWS - The user must restart Windows for the changes to take effect.
2830 INT_PTR WINAPI PropertySheetA(LPCPROPSHEETHEADERA lppsh)
2832 PropSheetInfo* psInfo = GlobalAlloc(GPTR, sizeof(PropSheetInfo));
2833 UINT i, n;
2834 const BYTE* pByte;
2836 TRACE("(%p)\n", lppsh);
2838 PROPSHEET_CollectSheetInfoA(lppsh, psInfo);
2840 psInfo->proppage = Alloc(sizeof(PropPageInfo) * lppsh->nPages);
2841 pByte = (const BYTE*) psInfo->ppshheader.u3.ppsp;
2843 for (n = i = 0; i < lppsh->nPages; i++, n++)
2845 if (!psInfo->usePropPage)
2846 psInfo->proppage[n].hpage = psInfo->ppshheader.u3.phpage[i];
2847 else
2849 psInfo->proppage[n].hpage = CreatePropertySheetPageA((LPCPROPSHEETPAGEA)pByte);
2850 pByte += ((LPCPROPSHEETPAGEA)pByte)->dwSize;
2853 if (!PROPSHEET_CollectPageInfo((LPCPROPSHEETPAGEW)psInfo->proppage[n].hpage,
2854 psInfo, n, TRUE))
2856 if (psInfo->usePropPage)
2857 DestroyPropertySheetPage(psInfo->proppage[n].hpage);
2858 n--;
2859 psInfo->nPages--;
2863 return PROPSHEET_PropertySheet(psInfo, FALSE);
2866 /******************************************************************************
2867 * PropertySheetW (COMCTL32.@)
2869 * See PropertySheetA.
2871 INT_PTR WINAPI PropertySheetW(LPCPROPSHEETHEADERW lppsh)
2873 PropSheetInfo* psInfo = GlobalAlloc(GPTR, sizeof(PropSheetInfo));
2874 UINT i, n;
2875 const BYTE* pByte;
2877 TRACE("(%p)\n", lppsh);
2879 PROPSHEET_CollectSheetInfoW(lppsh, psInfo);
2881 psInfo->proppage = Alloc(sizeof(PropPageInfo) * lppsh->nPages);
2882 pByte = (const BYTE*) psInfo->ppshheader.u3.ppsp;
2884 for (n = i = 0; i < lppsh->nPages; i++, n++)
2886 if (!psInfo->usePropPage)
2887 psInfo->proppage[n].hpage = psInfo->ppshheader.u3.phpage[i];
2888 else
2890 psInfo->proppage[n].hpage = CreatePropertySheetPageW((LPCPROPSHEETPAGEW)pByte);
2891 pByte += ((LPCPROPSHEETPAGEW)pByte)->dwSize;
2894 if (!PROPSHEET_CollectPageInfo((LPCPROPSHEETPAGEW)psInfo->proppage[n].hpage,
2895 psInfo, n, TRUE))
2897 if (psInfo->usePropPage)
2898 DestroyPropertySheetPage(psInfo->proppage[n].hpage);
2899 n--;
2900 psInfo->nPages--;
2904 return PROPSHEET_PropertySheet(psInfo, TRUE);
2907 static LPWSTR load_string( HINSTANCE instance, LPCWSTR str )
2909 LPWSTR ret;
2911 if (IS_INTRESOURCE(str))
2913 HRSRC hrsrc;
2914 HGLOBAL hmem;
2915 WCHAR *ptr;
2916 WORD i, id = LOWORD(str);
2917 UINT len;
2919 if (!(hrsrc = FindResourceW( instance, MAKEINTRESOURCEW((id >> 4) + 1), (LPWSTR)RT_STRING )))
2920 return NULL;
2921 if (!(hmem = LoadResource( instance, hrsrc ))) return NULL;
2922 if (!(ptr = LockResource( hmem ))) return NULL;
2923 for (i = id & 0x0f; i > 0; i--) ptr += *ptr + 1;
2924 len = *ptr;
2925 if (!len) return NULL;
2926 ret = Alloc( (len + 1) * sizeof(WCHAR) );
2927 if (ret)
2929 memcpy( ret, ptr + 1, len * sizeof(WCHAR) );
2930 ret[len] = 0;
2933 else
2935 int len = (strlenW(str) + 1) * sizeof(WCHAR);
2936 ret = Alloc( len );
2937 if (ret) memcpy( ret, str, len );
2939 return ret;
2943 /******************************************************************************
2944 * CreatePropertySheetPage (COMCTL32.@)
2945 * CreatePropertySheetPageA (COMCTL32.@)
2947 * Creates a new property sheet page.
2949 * RETURNS
2950 * Success: Handle to new property sheet page.
2951 * Failure: NULL.
2953 * NOTES
2954 * An application must use the PSM_ADDPAGE message to add the new page to
2955 * an existing property sheet.
2957 HPROPSHEETPAGE WINAPI CreatePropertySheetPageA(
2958 LPCPROPSHEETPAGEA lpPropSheetPage)
2960 PROPSHEETPAGEW *ppsp;
2962 if (lpPropSheetPage->dwSize < PROPSHEETPAGEA_V1_SIZE)
2963 return NULL;
2965 /* original data is used for callback notifications */
2966 if ((lpPropSheetPage->dwFlags & PSP_USECALLBACK) && lpPropSheetPage->pfnCallback)
2968 ppsp = Alloc(2 * sizeof(*ppsp));
2969 memcpy(ppsp, lpPropSheetPage, min(lpPropSheetPage->dwSize, sizeof(PROPSHEETPAGEA)));
2970 memcpy(ppsp + 1, lpPropSheetPage, min(lpPropSheetPage->dwSize, sizeof(PROPSHEETPAGEA)));
2972 else
2974 ppsp = Alloc(sizeof(*ppsp));
2975 memcpy(ppsp, lpPropSheetPage, min(lpPropSheetPage->dwSize, sizeof(PROPSHEETPAGEA)));
2978 ppsp->dwFlags &= ~PSP_INTERNAL_UNICODE;
2980 if ( !(ppsp->dwFlags & PSP_DLGINDIRECT) )
2982 if (!IS_INTRESOURCE( ppsp->u.pszTemplate ))
2984 int len = strlen(lpPropSheetPage->u.pszTemplate) + 1;
2985 char *template = Alloc( len );
2987 ppsp->u.pszTemplate = (LPWSTR)strcpy( template, lpPropSheetPage->u.pszTemplate );
2991 if (ppsp->dwFlags & PSP_USEICONID)
2993 if (!IS_INTRESOURCE( ppsp->u2.pszIcon ))
2994 ppsp->u2.pszIcon = heap_strdupAtoW( lpPropSheetPage->u2.pszIcon );
2997 if (ppsp->dwFlags & PSP_USETITLE)
2999 if (IS_INTRESOURCE( ppsp->pszTitle ))
3000 ppsp->pszTitle = load_string( ppsp->hInstance, ppsp->pszTitle );
3001 else
3002 ppsp->pszTitle = heap_strdupAtoW( lpPropSheetPage->pszTitle );
3004 else
3005 ppsp->pszTitle = NULL;
3007 if (ppsp->dwFlags & PSP_HIDEHEADER)
3008 ppsp->dwFlags &= ~(PSP_USEHEADERTITLE | PSP_USEHEADERSUBTITLE);
3010 if (ppsp->dwFlags & PSP_USEHEADERTITLE)
3012 if (IS_INTRESOURCE( ppsp->pszHeaderTitle ))
3013 ppsp->pszHeaderTitle = load_string( ppsp->hInstance, ppsp->pszHeaderTitle );
3014 else
3015 ppsp->pszHeaderTitle = heap_strdupAtoW( lpPropSheetPage->pszHeaderTitle );
3017 else
3018 ppsp->pszHeaderTitle = NULL;
3020 if (ppsp->dwFlags & PSP_USEHEADERSUBTITLE)
3022 if (IS_INTRESOURCE( ppsp->pszHeaderSubTitle ))
3023 ppsp->pszHeaderSubTitle = load_string( ppsp->hInstance, ppsp->pszHeaderSubTitle );
3024 else
3025 ppsp->pszHeaderSubTitle = heap_strdupAtoW( lpPropSheetPage->pszHeaderSubTitle );
3027 else
3028 ppsp->pszHeaderSubTitle = NULL;
3030 if ((ppsp->dwFlags & PSP_USECALLBACK) && ppsp->dwSize > PROPSHEETPAGEA_V1_SIZE && ppsp->pfnCallback)
3031 ppsp->pfnCallback(0, PSPCB_ADDREF, ppsp + 1);
3033 return (HPROPSHEETPAGE)ppsp;
3036 /******************************************************************************
3037 * CreatePropertySheetPageW (COMCTL32.@)
3039 * See CreatePropertySheetA.
3041 HPROPSHEETPAGE WINAPI CreatePropertySheetPageW(LPCPROPSHEETPAGEW lpPropSheetPage)
3043 PROPSHEETPAGEW *ppsp;
3045 if (lpPropSheetPage->dwSize < PROPSHEETPAGEW_V1_SIZE)
3046 return NULL;
3048 /* original data is used for callback notifications */
3049 if ((lpPropSheetPage->dwFlags & PSP_USECALLBACK) && lpPropSheetPage->pfnCallback)
3051 ppsp = Alloc(2 * sizeof(*ppsp));
3052 memcpy(ppsp, lpPropSheetPage, min(lpPropSheetPage->dwSize, sizeof(PROPSHEETPAGEW)));
3053 memcpy(ppsp + 1, lpPropSheetPage, min(lpPropSheetPage->dwSize, sizeof(PROPSHEETPAGEW)));
3055 else
3057 ppsp = Alloc(sizeof(*ppsp));
3058 memcpy(ppsp, lpPropSheetPage, min(lpPropSheetPage->dwSize, sizeof(PROPSHEETPAGEW)));
3061 ppsp->dwFlags |= PSP_INTERNAL_UNICODE;
3063 if ( !(ppsp->dwFlags & PSP_DLGINDIRECT) )
3065 if (!IS_INTRESOURCE( ppsp->u.pszTemplate ))
3066 ppsp->u.pszTemplate = heap_strdupW( lpPropSheetPage->u.pszTemplate );
3069 if ( ppsp->dwFlags & PSP_USEICONID )
3071 if (!IS_INTRESOURCE( ppsp->u2.pszIcon ))
3072 ppsp->u2.pszIcon = heap_strdupW( lpPropSheetPage->u2.pszIcon );
3075 if (ppsp->dwFlags & PSP_USETITLE)
3076 ppsp->pszTitle = load_string( ppsp->hInstance, ppsp->pszTitle );
3077 else
3078 ppsp->pszTitle = NULL;
3080 if (ppsp->dwFlags & PSP_HIDEHEADER)
3081 ppsp->dwFlags &= ~(PSP_USEHEADERTITLE | PSP_USEHEADERSUBTITLE);
3083 if (ppsp->dwFlags & PSP_USEHEADERTITLE)
3084 ppsp->pszHeaderTitle = load_string( ppsp->hInstance, ppsp->pszHeaderTitle );
3085 else
3086 ppsp->pszHeaderTitle = NULL;
3088 if (ppsp->dwFlags & PSP_USEHEADERSUBTITLE)
3089 ppsp->pszHeaderSubTitle = load_string( ppsp->hInstance, ppsp->pszHeaderSubTitle );
3090 else
3091 ppsp->pszHeaderSubTitle = NULL;
3093 if ((ppsp->dwFlags & PSP_USECALLBACK) && ppsp->dwSize > PROPSHEETPAGEW_V1_SIZE && ppsp->pfnCallback)
3094 ppsp->pfnCallback(0, PSPCB_ADDREF, ppsp + 1);
3096 return (HPROPSHEETPAGE)ppsp;
3099 /******************************************************************************
3100 * DestroyPropertySheetPage (COMCTL32.@)
3102 * Destroys a property sheet page previously created with
3103 * CreatePropertySheetA() or CreatePropertySheetW() and frees the associated
3104 * memory.
3106 * RETURNS
3107 * Success: TRUE
3108 * Failure: FALSE
3110 BOOL WINAPI DestroyPropertySheetPage(HPROPSHEETPAGE hPropPage)
3112 PROPSHEETPAGEW *psp = (PROPSHEETPAGEW *)hPropPage;
3114 if (!psp)
3115 return FALSE;
3117 if ((psp->dwFlags & PSP_USECALLBACK) && psp->pfnCallback)
3118 psp->pfnCallback(0, PSPCB_RELEASE, psp + 1);
3120 if (!(psp->dwFlags & PSP_DLGINDIRECT) && !IS_INTRESOURCE( psp->u.pszTemplate ))
3121 Free ((LPVOID)psp->u.pszTemplate);
3123 if ((psp->dwFlags & PSP_USEICONID) && !IS_INTRESOURCE( psp->u2.pszIcon ))
3124 Free ((LPVOID)psp->u2.pszIcon);
3126 if ((psp->dwFlags & PSP_USETITLE) && !IS_INTRESOURCE( psp->pszTitle ))
3127 Free ((LPVOID)psp->pszTitle);
3129 if ((psp->dwFlags & PSP_USEHEADERTITLE) && !IS_INTRESOURCE( psp->pszHeaderTitle ))
3130 Free ((LPVOID)psp->pszHeaderTitle);
3132 if ((psp->dwFlags & PSP_USEHEADERSUBTITLE) && !IS_INTRESOURCE( psp->pszHeaderSubTitle ))
3133 Free ((LPVOID)psp->pszHeaderSubTitle);
3135 Free(hPropPage);
3137 return TRUE;
3140 /******************************************************************************
3141 * PROPSHEET_IsDialogMessage
3143 static BOOL PROPSHEET_IsDialogMessage(HWND hwnd, LPMSG lpMsg)
3145 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3147 TRACE("\n");
3148 if (!psInfo || (hwnd != lpMsg->hwnd && !IsChild(hwnd, lpMsg->hwnd)))
3149 return FALSE;
3151 if (lpMsg->message == WM_KEYDOWN && (GetKeyState(VK_CONTROL) & 0x8000))
3153 int new_page = 0;
3154 INT dlgCode = SendMessageW(lpMsg->hwnd, WM_GETDLGCODE, 0, (LPARAM)lpMsg);
3156 if (!(dlgCode & DLGC_WANTMESSAGE))
3158 switch (lpMsg->wParam)
3160 case VK_TAB:
3161 if (GetKeyState(VK_SHIFT) & 0x8000)
3162 new_page = -1;
3163 else
3164 new_page = 1;
3165 break;
3167 case VK_NEXT: new_page = 1; break;
3168 case VK_PRIOR: new_page = -1; break;
3172 if (new_page)
3174 if (PROPSHEET_CanSetCurSel(hwnd) != FALSE)
3176 new_page += psInfo->active_page;
3178 if (new_page < 0)
3179 new_page = psInfo->nPages - 1;
3180 else if (new_page >= psInfo->nPages)
3181 new_page = 0;
3183 PROPSHEET_SetCurSel(hwnd, new_page, 1, 0);
3186 return TRUE;
3190 return IsDialogMessageW(hwnd, lpMsg);
3193 /******************************************************************************
3194 * PROPSHEET_DoCommand
3196 static BOOL PROPSHEET_DoCommand(HWND hwnd, WORD wID)
3199 switch (wID) {
3201 case IDOK:
3202 case IDC_APPLY_BUTTON:
3204 HWND hwndApplyBtn = GetDlgItem(hwnd, IDC_APPLY_BUTTON);
3206 if (PROPSHEET_Apply(hwnd, wID == IDOK ? 1: 0) == FALSE)
3207 break;
3209 if (wID == IDOK)
3211 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3213 /* don't overwrite ID_PSRESTARTWINDOWS or ID_PSREBOOTSYSTEM */
3214 if (psInfo->result == 0)
3215 psInfo->result = IDOK;
3217 if (psInfo->isModeless)
3218 psInfo->activeValid = FALSE;
3219 else
3220 psInfo->ended = TRUE;
3222 else
3223 EnableWindow(hwndApplyBtn, FALSE);
3225 break;
3228 case IDC_BACK_BUTTON:
3229 PROPSHEET_Back(hwnd);
3230 break;
3232 case IDC_NEXT_BUTTON:
3233 PROPSHEET_Next(hwnd);
3234 break;
3236 case IDC_FINISH_BUTTON:
3237 PROPSHEET_Finish(hwnd);
3238 break;
3240 case IDCANCEL:
3241 PROPSHEET_Cancel(hwnd, 0);
3242 break;
3244 case IDHELP:
3245 PROPSHEET_Help(hwnd);
3246 break;
3248 default:
3249 return FALSE;
3252 return TRUE;
3255 /******************************************************************************
3256 * PROPSHEET_Paint
3258 static LRESULT PROPSHEET_Paint(HWND hwnd, HDC hdcParam)
3260 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3261 PAINTSTRUCT ps;
3262 HDC hdc, hdcSrc;
3263 BITMAP bm;
3264 HBITMAP hbmp;
3265 HPALETTE hOldPal = 0;
3266 int offsety = 0;
3267 HBRUSH hbr;
3268 RECT r, rzone;
3269 LPCPROPSHEETPAGEW ppshpage;
3270 WCHAR szBuffer[256];
3271 int nLength;
3273 hdc = hdcParam ? hdcParam : BeginPaint(hwnd, &ps);
3274 if (!hdc) return 1;
3276 hdcSrc = CreateCompatibleDC(0);
3278 if (psInfo->ppshheader.dwFlags & PSH_USEHPLWATERMARK)
3279 hOldPal = SelectPalette(hdc, psInfo->ppshheader.hplWatermark, FALSE);
3281 if (psInfo->active_page < 0)
3282 ppshpage = NULL;
3283 else
3284 ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[psInfo->active_page].hpage;
3286 if ( (ppshpage && !(ppshpage->dwFlags & PSP_HIDEHEADER)) &&
3287 (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
3288 (psInfo->ppshheader.dwFlags & PSH_HEADER) )
3290 HWND hwndLineHeader = GetDlgItem(hwnd, IDC_SUNKEN_LINEHEADER);
3291 HFONT hOldFont;
3292 COLORREF clrOld = 0;
3293 int oldBkMode = 0;
3295 GetClientRect(hwndLineHeader, &r);
3296 MapWindowPoints(hwndLineHeader, hwnd, (LPPOINT) &r, 2);
3297 SetRect(&rzone, 0, 0, r.right + 1, r.top - 1);
3299 hOldFont = SelectObject(hdc, psInfo->hFontBold);
3301 if (psInfo->ppshheader.dwFlags & PSH_USEHBMHEADER)
3303 hbmp = SelectObject(hdcSrc, psInfo->ppshheader.u5.hbmHeader);
3305 GetObjectW(psInfo->ppshheader.u5.hbmHeader, sizeof(BITMAP), &bm);
3306 if (psInfo->ppshheader.dwFlags & PSH_WIZARD97_OLD)
3308 /* Fill the unoccupied part of the header with color of the
3309 * left-top pixel, but do it only when needed.
3311 if (bm.bmWidth < r.right || bm.bmHeight < r.bottom)
3313 hbr = CreateSolidBrush(GetPixel(hdcSrc, 0, 0));
3314 r = rzone;
3315 if (bm.bmWidth < r.right)
3317 r.left = bm.bmWidth;
3318 FillRect(hdc, &r, hbr);
3320 if (bm.bmHeight < r.bottom)
3322 r.left = 0;
3323 r.top = bm.bmHeight;
3324 FillRect(hdc, &r, hbr);
3326 DeleteObject(hbr);
3329 /* Draw the header itself. */
3330 BitBlt(hdc, 0, 0, bm.bmWidth, min(bm.bmHeight, rzone.bottom),
3331 hdcSrc, 0, 0, SRCCOPY);
3333 else
3335 int margin;
3336 hbr = GetSysColorBrush(COLOR_WINDOW);
3337 FillRect(hdc, &rzone, hbr);
3339 /* Draw the header bitmap. It's always centered like a
3340 * common 49 x 49 bitmap. */
3341 margin = (rzone.bottom - 49) / 2;
3342 BitBlt(hdc, rzone.right - 49 - margin, margin,
3343 min(bm.bmWidth, 49), min(bm.bmHeight, 49),
3344 hdcSrc, 0, 0, SRCCOPY);
3346 /* NOTE: Native COMCTL32 draws a white stripe over the bitmap
3347 * if its height is smaller than 49 pixels. Because the reason
3348 * for this bug is unknown the current code doesn't try to
3349 * replicate it. */
3352 SelectObject(hdcSrc, hbmp);
3355 clrOld = SetTextColor (hdc, 0x00000000);
3356 oldBkMode = SetBkMode (hdc, TRANSPARENT);
3358 if (ppshpage->dwFlags & PSP_USEHEADERTITLE) {
3359 SetRect(&r, 20, 10, 0, 0);
3360 if (!IS_INTRESOURCE(ppshpage->pszHeaderTitle))
3361 DrawTextW(hdc, ppshpage->pszHeaderTitle, -1, &r, DT_LEFT | DT_SINGLELINE | DT_NOCLIP);
3362 else
3364 nLength = LoadStringW(ppshpage->hInstance, (UINT_PTR)ppshpage->pszHeaderTitle,
3365 szBuffer, 256);
3366 if (nLength != 0)
3368 DrawTextW(hdc, szBuffer, nLength, &r, DT_LEFT | DT_SINGLELINE | DT_NOCLIP);
3373 if (ppshpage->dwFlags & PSP_USEHEADERSUBTITLE) {
3374 SelectObject(hdc, psInfo->hFont);
3375 SetRect(&r, 40, 25, rzone.right - 69, rzone.bottom);
3376 if (!IS_INTRESOURCE(ppshpage->pszHeaderTitle))
3377 DrawTextW(hdc, ppshpage->pszHeaderSubTitle, -1, &r, DT_LEFT | DT_WORDBREAK);
3378 else
3380 nLength = LoadStringW(ppshpage->hInstance, (UINT_PTR)ppshpage->pszHeaderSubTitle,
3381 szBuffer, 256);
3382 if (nLength != 0)
3384 DrawTextW(hdc, szBuffer, nLength, &r, DT_LEFT | DT_WORDBREAK);
3389 offsety = rzone.bottom + 2;
3391 SetTextColor(hdc, clrOld);
3392 SetBkMode(hdc, oldBkMode);
3393 SelectObject(hdc, hOldFont);
3396 if ( (ppshpage && (ppshpage->dwFlags & PSP_HIDEHEADER)) &&
3397 (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
3398 (psInfo->ppshheader.dwFlags & PSH_WATERMARK) )
3400 HWND hwndLine = GetDlgItem(hwnd, IDC_SUNKEN_LINE);
3402 GetClientRect(hwndLine, &r);
3403 MapWindowPoints(hwndLine, hwnd, (LPPOINT) &r, 2);
3404 SetRect(&rzone, 0, 0, r.right, r.top - 1);
3406 hbr = GetSysColorBrush(COLOR_WINDOW);
3407 FillRect(hdc, &rzone, hbr);
3409 GetObjectW(psInfo->ppshheader.u4.hbmWatermark, sizeof(BITMAP), &bm);
3410 hbmp = SelectObject(hdcSrc, psInfo->ppshheader.u4.hbmWatermark);
3412 /* The watermark is truncated to a width of 164 pixels */
3413 r.right = min(r.right, 164);
3414 BitBlt(hdc, 0, offsety, min(bm.bmWidth, r.right),
3415 min(bm.bmHeight, r.bottom), hdcSrc, 0, 0, SRCCOPY);
3417 /* If the bitmap is not big enough, fill the remaining area
3418 with the color of pixel (0,0) of bitmap - see MSDN */
3419 if (r.top > bm.bmHeight) {
3420 r.bottom = r.top - 1;
3421 r.top = bm.bmHeight;
3422 r.left = 0;
3423 r.right = bm.bmWidth;
3424 hbr = CreateSolidBrush(GetPixel(hdcSrc, 0, 0));
3425 FillRect(hdc, &r, hbr);
3426 DeleteObject(hbr);
3429 SelectObject(hdcSrc, hbmp);
3432 if (psInfo->ppshheader.dwFlags & PSH_USEHPLWATERMARK)
3433 SelectPalette(hdc, hOldPal, FALSE);
3435 DeleteDC(hdcSrc);
3437 if (!hdcParam) EndPaint(hwnd, &ps);
3439 return 0;
3442 /******************************************************************************
3443 * PROPSHEET_DialogProc
3445 static INT_PTR CALLBACK
3446 PROPSHEET_DialogProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
3448 TRACE("hwnd=%p msg=0x%04x wparam=%lx lparam=%lx\n",
3449 hwnd, uMsg, wParam, lParam);
3451 switch (uMsg)
3453 case WM_INITDIALOG:
3455 PropSheetInfo* psInfo = (PropSheetInfo*) lParam;
3456 WCHAR* strCaption = Alloc(MAX_CAPTION_LENGTH*sizeof(WCHAR));
3457 HWND hwndTabCtrl = GetDlgItem(hwnd, IDC_TABCONTROL);
3458 int idx;
3459 LOGFONTW logFont;
3461 /* Using PropSheetInfoStr to store extra data doesn't match the native
3462 * common control: native uses TCM_[GS]ETITEM
3464 SetPropW(hwnd, PropSheetInfoStr, psInfo);
3467 * psInfo->hwnd is not being used by WINE code - it exists
3468 * for compatibility with "real" Windoze. The same about
3469 * SetWindowLongPtr - WINE is only using the PropSheetInfoStr
3470 * property.
3472 psInfo->hwnd = hwnd;
3473 SetWindowLongPtrW(hwnd, DWLP_USER, (DWORD_PTR)psInfo);
3475 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
3477 /* set up the Next and Back buttons by default */
3478 PROPSHEET_SetWizButtons(hwnd, PSWIZB_BACK|PSWIZB_NEXT);
3481 /* Set up fonts */
3482 SystemParametersInfoW (SPI_GETICONTITLELOGFONT, 0, &logFont, 0);
3483 psInfo->hFont = CreateFontIndirectW (&logFont);
3484 logFont.lfWeight = FW_BOLD;
3485 psInfo->hFontBold = CreateFontIndirectW (&logFont);
3488 * Small icon in the title bar.
3490 if ((psInfo->ppshheader.dwFlags & PSH_USEICONID) ||
3491 (psInfo->ppshheader.dwFlags & PSH_USEHICON))
3493 HICON hIcon;
3494 int icon_cx = GetSystemMetrics(SM_CXSMICON);
3495 int icon_cy = GetSystemMetrics(SM_CYSMICON);
3497 if (psInfo->ppshheader.dwFlags & PSH_USEICONID)
3498 hIcon = LoadImageW(psInfo->ppshheader.hInstance,
3499 psInfo->ppshheader.u.pszIcon,
3500 IMAGE_ICON,
3501 icon_cx, icon_cy,
3502 LR_DEFAULTCOLOR);
3503 else
3504 hIcon = psInfo->ppshheader.u.hIcon;
3506 SendMessageW(hwnd, WM_SETICON, 0, (LPARAM)hIcon);
3509 if (psInfo->ppshheader.dwFlags & PSH_USEHICON)
3510 SendMessageW(hwnd, WM_SETICON, 0, (LPARAM)psInfo->ppshheader.u.hIcon);
3512 psInfo->strPropertiesFor = strCaption;
3514 GetWindowTextW(hwnd, psInfo->strPropertiesFor, MAX_CAPTION_LENGTH);
3516 PROPSHEET_CreateTabControl(hwnd, psInfo);
3518 PROPSHEET_LoadWizardBitmaps(psInfo);
3520 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
3522 ShowWindow(hwndTabCtrl, SW_HIDE);
3523 PROPSHEET_AdjustSizeWizard(hwnd, psInfo);
3524 PROPSHEET_AdjustButtonsWizard(hwnd, psInfo);
3525 SetFocus(GetDlgItem(hwnd, IDC_NEXT_BUTTON));
3527 else
3529 if (PROPSHEET_SizeMismatch(hwnd, psInfo))
3531 PROPSHEET_AdjustSize(hwnd, psInfo);
3532 PROPSHEET_AdjustButtons(hwnd, psInfo);
3534 SetFocus(GetDlgItem(hwnd, IDOK));
3537 if (IS_INTRESOURCE(psInfo->ppshheader.pszCaption) &&
3538 psInfo->ppshheader.hInstance)
3540 WCHAR szText[256];
3542 if (LoadStringW(psInfo->ppshheader.hInstance,
3543 (UINT_PTR)psInfo->ppshheader.pszCaption, szText, 255))
3544 PROPSHEET_SetTitleW(hwnd, psInfo->ppshheader.dwFlags, szText);
3546 else
3548 PROPSHEET_SetTitleW(hwnd, psInfo->ppshheader.dwFlags,
3549 psInfo->ppshheader.pszCaption);
3553 if (psInfo->useCallback)
3554 (*(psInfo->ppshheader.pfnCallback))(hwnd, PSCB_INITIALIZED, 0);
3556 idx = psInfo->active_page;
3557 psInfo->active_page = -1;
3559 PROPSHEET_SetCurSel(hwnd, idx, 1, psInfo->proppage[idx].hpage);
3561 /* doing TCM_SETCURSEL seems to be needed even in case of PSH_WIZARD,
3562 * as some programs call TCM_GETCURSEL to get the current selection
3563 * from which to switch to the next page */
3564 SendMessageW(hwndTabCtrl, TCM_SETCURSEL, psInfo->active_page, 0);
3566 PROPSHEET_UnChanged(hwnd, NULL);
3568 /* wizards set their focus during init */
3569 if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
3570 return FALSE;
3572 return TRUE;
3575 case WM_PRINTCLIENT:
3576 case WM_PAINT:
3577 PROPSHEET_Paint(hwnd, (HDC)wParam);
3578 return TRUE;
3580 case WM_DESTROY:
3581 PROPSHEET_CleanUp(hwnd);
3582 return TRUE;
3584 case WM_CLOSE:
3585 PROPSHEET_Cancel(hwnd, 1);
3586 return FALSE; /* let DefDlgProc post us WM_COMMAND/IDCANCEL */
3588 case WM_COMMAND:
3589 if (!PROPSHEET_DoCommand(hwnd, LOWORD(wParam)))
3591 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3593 if (!psInfo)
3594 return FALSE;
3596 /* No default handler, forward notification to active page */
3597 if (psInfo->activeValid && psInfo->active_page != -1)
3599 HWND hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
3600 SendMessageW(hwndPage, WM_COMMAND, wParam, lParam);
3603 return TRUE;
3605 case WM_NOTIFY:
3607 NMHDR* pnmh = (LPNMHDR) lParam;
3609 if (pnmh->code == TCN_SELCHANGE)
3611 int index = SendMessageW(pnmh->hwndFrom, TCM_GETCURSEL, 0, 0);
3612 PROPSHEET_SetCurSel(hwnd, index, 1, 0);
3615 if(pnmh->code == TCN_SELCHANGING)
3617 BOOL bRet = PROPSHEET_CanSetCurSel(hwnd);
3618 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, !bRet);
3619 return TRUE;
3622 return FALSE;
3625 case WM_SYSCOLORCHANGE:
3626 COMCTL32_RefreshSysColors();
3627 return FALSE;
3629 case PSM_GETCURRENTPAGEHWND:
3631 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3632 HWND hwndPage = 0;
3634 if (!psInfo)
3635 return FALSE;
3637 if (psInfo->activeValid && psInfo->active_page != -1)
3638 hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
3640 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, (DWORD_PTR)hwndPage);
3642 return TRUE;
3645 case PSM_CHANGED:
3646 PROPSHEET_Changed(hwnd, (HWND)wParam);
3647 return TRUE;
3649 case PSM_UNCHANGED:
3650 PROPSHEET_UnChanged(hwnd, (HWND)wParam);
3651 return TRUE;
3653 case PSM_GETTABCONTROL:
3655 HWND hwndTabCtrl = GetDlgItem(hwnd, IDC_TABCONTROL);
3657 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, (DWORD_PTR)hwndTabCtrl);
3659 return TRUE;
3662 case PSM_SETCURSEL:
3664 BOOL msgResult;
3666 msgResult = PROPSHEET_CanSetCurSel(hwnd);
3667 if(msgResult != FALSE)
3669 msgResult = PROPSHEET_SetCurSel(hwnd,
3670 (int)wParam,
3672 (HPROPSHEETPAGE)lParam);
3675 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3677 return TRUE;
3680 case PSM_CANCELTOCLOSE:
3682 WCHAR buf[MAX_BUTTONTEXT_LENGTH];
3683 HWND hwndOK = GetDlgItem(hwnd, IDOK);
3684 HWND hwndCancel = GetDlgItem(hwnd, IDCANCEL);
3686 EnableWindow(hwndCancel, FALSE);
3687 if (LoadStringW(COMCTL32_hModule, IDS_CLOSE, buf, sizeof(buf)/sizeof(buf[0])))
3688 SetWindowTextW(hwndOK, buf);
3690 return FALSE;
3693 case PSM_RESTARTWINDOWS:
3695 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3697 if (!psInfo)
3698 return FALSE;
3700 /* reboot system takes precedence over restart windows */
3701 if (psInfo->result != ID_PSREBOOTSYSTEM)
3702 psInfo->result = ID_PSRESTARTWINDOWS;
3704 return TRUE;
3707 case PSM_REBOOTSYSTEM:
3709 PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3711 if (!psInfo)
3712 return FALSE;
3714 psInfo->result = ID_PSREBOOTSYSTEM;
3716 return TRUE;
3719 case PSM_SETTITLEA:
3720 PROPSHEET_SetTitleA(hwnd, (DWORD) wParam, (LPCSTR) lParam);
3721 return TRUE;
3723 case PSM_SETTITLEW:
3724 PROPSHEET_SetTitleW(hwnd, (DWORD) wParam, (LPCWSTR) lParam);
3725 return TRUE;
3727 case PSM_APPLY:
3729 BOOL msgResult = PROPSHEET_Apply(hwnd, 0);
3731 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3733 return TRUE;
3736 case PSM_QUERYSIBLINGS:
3738 LRESULT msgResult = PROPSHEET_QuerySiblings(hwnd, wParam, lParam);
3740 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3742 return TRUE;
3745 case PSM_ADDPAGE:
3748 * Note: MSVC++ 6.0 documentation says that PSM_ADDPAGE does not have
3749 * a return value. This is not true. PSM_ADDPAGE returns TRUE
3750 * on success or FALSE otherwise, as specified on MSDN Online.
3751 * Also see the MFC code for
3752 * CPropertySheet::AddPage(CPropertyPage* pPage).
3755 BOOL msgResult = PROPSHEET_AddPage(hwnd, (HPROPSHEETPAGE)lParam);
3757 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3759 return TRUE;
3762 case PSM_REMOVEPAGE:
3763 PROPSHEET_RemovePage(hwnd, (int)wParam, (HPROPSHEETPAGE)lParam);
3764 return TRUE;
3766 case PSM_ISDIALOGMESSAGE:
3768 BOOL msgResult = PROPSHEET_IsDialogMessage(hwnd, (LPMSG)lParam);
3769 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3770 return TRUE;
3773 case PSM_PRESSBUTTON:
3774 PROPSHEET_PressButton(hwnd, (int)wParam);
3775 return TRUE;
3777 case PSM_SETFINISHTEXTA:
3778 PROPSHEET_SetFinishTextA(hwnd, (LPCSTR) lParam);
3779 return TRUE;
3781 case PSM_SETWIZBUTTONS:
3782 PROPSHEET_SetWizButtons(hwnd, (DWORD)lParam);
3783 return TRUE;
3785 case PSM_SETCURSELID:
3786 PROPSHEET_SetCurSelId(hwnd, (int)lParam);
3787 return TRUE;
3789 case PSM_SETFINISHTEXTW:
3790 PROPSHEET_SetFinishTextW(hwnd, (LPCWSTR) lParam);
3791 return FALSE;
3793 case PSM_INSERTPAGE:
3795 BOOL msgResult = PROPSHEET_InsertPage(hwnd, (HPROPSHEETPAGE)wParam, (HPROPSHEETPAGE)lParam);
3796 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3797 return TRUE;
3800 case PSM_SETHEADERTITLEW:
3801 PROPSHEET_SetHeaderTitleW(hwnd, wParam, (LPCWSTR)lParam);
3802 return TRUE;
3804 case PSM_SETHEADERTITLEA:
3805 PROPSHEET_SetHeaderTitleA(hwnd, wParam, (LPCSTR)lParam);
3806 return TRUE;
3808 case PSM_SETHEADERSUBTITLEW:
3809 PROPSHEET_SetHeaderSubTitleW(hwnd, wParam, (LPCWSTR)lParam);
3810 return TRUE;
3812 case PSM_SETHEADERSUBTITLEA:
3813 PROPSHEET_SetHeaderSubTitleA(hwnd, wParam, (LPCSTR)lParam);
3814 return TRUE;
3816 case PSM_HWNDTOINDEX:
3818 LRESULT msgResult = PROPSHEET_HwndToIndex(hwnd, (HWND)wParam);
3819 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3820 return TRUE;
3823 case PSM_INDEXTOHWND:
3825 LRESULT msgResult = PROPSHEET_IndexToHwnd(hwnd, (int)wParam);
3826 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3827 return TRUE;
3830 case PSM_PAGETOINDEX:
3832 LRESULT msgResult = PROPSHEET_PageToIndex(hwnd, (HPROPSHEETPAGE)wParam);
3833 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3834 return TRUE;
3837 case PSM_INDEXTOPAGE:
3839 LRESULT msgResult = PROPSHEET_IndexToPage(hwnd, (int)wParam);
3840 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3841 return TRUE;
3844 case PSM_IDTOINDEX:
3846 LRESULT msgResult = PROPSHEET_IdToIndex(hwnd, (int)lParam);
3847 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3848 return TRUE;
3851 case PSM_INDEXTOID:
3853 LRESULT msgResult = PROPSHEET_IndexToId(hwnd, (int)wParam);
3854 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3855 return TRUE;
3858 case PSM_GETRESULT:
3860 LRESULT msgResult = PROPSHEET_GetResult(hwnd);
3861 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3862 return TRUE;
3865 case PSM_RECALCPAGESIZES:
3867 LRESULT msgResult = PROPSHEET_RecalcPageSizes(hwnd);
3868 SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3869 return TRUE;
3872 default:
3873 return FALSE;