git.oblomov.eu Git - wine/blob - dlls/comctl32/propsheet.c

   1 /*
   2  * Property Sheets
   3  *
   4  * Copyright 1998 Francis Beaudet
   5  * Copyright 1999 Thuy Nguyen
   6  * Copyright 2004 Maxime Bellenge
   7  * Copyright 2004 Filip Navara
   8  *
   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.
  13  *
  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.
  18  *
  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
  22  *
  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.
  25  *
  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.
  29  *
  30  * TODO:
  31  *   - Tab order
  32  *   - Wizard 97 header resizing
  33  *   - Enforcing of minimal wizard size
  34  *   - Messages:
  35  *     o PSM_INSERTPAGE
  36  *     o PSM_RECALCPAGESIZES
  37  *     o PSM_SETHEADERSUBTITLE
  38  *     o PSM_SETHEADERTITLE
  39  *     o WM_HELP
  40  *     o WM_CONTEXTMENU
  41  *   - Notifications:
  42  *     o PSN_GETOBJECT
  43  *     o PSN_QUERYINITIALFOCUS
  44  *     o PSN_TRANSLATEACCELERATOR
  45  *   - Styles:
  46  *     o PSH_RTLREADING
  47  *     o PSH_STRETCHWATERMARK
  48  *     o PSH_USEPAGELANG
  49  *     o PSH_USEPSTARTPAGE
  50  *   - Page styles:
  51  *     o PSP_USEFUSIONCONTEXT
  52  *     o PSP_USEREFPARENT
  53  */
  54
  55 #include <stdarg.h>
  56 #include <string.h>
  57
  58 #define NONAMELESSUNION
  59 #define NONAMELESSSTRUCT
  60 #include "windef.h"
  61 #include "winbase.h"
  62 #include "wingdi.h"
  63 #include "winuser.h"
  64 #include "winnls.h"
  65 #include "commctrl.h"
  66 #include "prsht.h"
  67 #include "comctl32.h"
  68 #include "uxtheme.h"
  69
  70 #include "wine/debug.h"
  71 #include "wine/unicode.h"
  72
  73 /******************************************************************************
  74  * Data structures
  75  */
  76 #include "pshpack2.h"
  77
  78 typedef struct
  79 {
  80   WORD dlgVer;
  81   WORD signature;
  82   DWORD helpID;
  83   DWORD exStyle;
  84   DWORD style;
  85 } MyDLGTEMPLATEEX;
  86
  87 typedef struct
  88 {
  89   DWORD helpid;
  90   DWORD exStyle;
  91   DWORD style;
  92   short x;
  93   short y;
  94   short cx;
  95   short cy;
  96   DWORD id;
  97 } MyDLGITEMTEMPLATEEX;
  98 #include "poppack.h"
  99
 100 typedef struct tagPropPageInfo
 101 {
 102   HPROPSHEETPAGE hpage; /* to keep track of pages not passed to PropertySheet */
 103   HWND hwndPage;
 104   BOOL isDirty;
 105   LPCWSTR pszText;
 106   BOOL hasHelp;
 107   BOOL useCallback;
 108   BOOL hasIcon;
 109 } PropPageInfo;
 110
 111 typedef struct tagPropSheetInfo
 112 {
 113   HWND hwnd;
 114   PROPSHEETHEADERW ppshheader;
 115   BOOL unicode;
 116   LPWSTR strPropertiesFor;
 117   int nPages;
 118   int active_page;
 119   BOOL isModeless;
 120   BOOL hasHelp;
 121   BOOL hasApply;
 122   BOOL hasFinish;
 123   BOOL usePropPage;
 124   BOOL useCallback;
 125   BOOL activeValid;
 126   PropPageInfo* proppage;
 127   HFONT hFont;
 128   HFONT hFontBold;
 129   int width;
 130   int height;
 131   HIMAGELIST hImageList;
 132   BOOL ended;
 133   INT result;
 134 } PropSheetInfo;
 135
 136 typedef struct
 137 {
 138   int x;
 139   int y;
 140 } PADDING_INFO;
 141
 142 /******************************************************************************
 143  * Defines and global variables
 144  */
 145
 146 static const WCHAR PropSheetInfoStr[] =
 147     {'P','r','o','p','e','r','t','y','S','h','e','e','t','I','n','f','o',0 };
 148
 149 #define PSP_INTERNAL_UNICODE 0x80000000
 150
 151 #define MAX_CAPTION_LENGTH 255
 152 #define MAX_TABTEXT_LENGTH 255
 153 #define MAX_BUTTONTEXT_LENGTH 64
 154
 155 #define INTRNL_ANY_WIZARD (PSH_WIZARD | PSH_WIZARD97_OLD | PSH_WIZARD97_NEW | PSH_WIZARD_LITE)
 156
 157 /* Wizard metrics specified in DLUs */
 158 #define WIZARD_PADDING 7
 159 #define WIZARD_HEADER_HEIGHT 36
 160
 161 /******************************************************************************
 162  * Prototypes
 163  */
 164 static PADDING_INFO PROPSHEET_GetPaddingInfo(HWND hwndDlg);
 165 static void PROPSHEET_SetTitleW(HWND hwndDlg, DWORD dwStyle, LPCWSTR lpszText);
 166 static BOOL PROPSHEET_CanSetCurSel(HWND hwndDlg);
 167 static BOOL PROPSHEET_SetCurSel(HWND hwndDlg,
 168                                 int index,
 169                                 int skipdir,
 170                                 HPROPSHEETPAGE hpage);
 171 static int PROPSHEET_GetPageIndex(HPROPSHEETPAGE hpage, const PropSheetInfo* psInfo);
 172 static PADDING_INFO PROPSHEET_GetPaddingInfoWizard(HWND hwndDlg, const PropSheetInfo* psInfo);
 173 static BOOL PROPSHEET_DoCommand(HWND hwnd, WORD wID);
 174 static BOOL PROPSHEET_RemovePage(HWND hwndDlg, int index, HPROPSHEETPAGE hpage);
 175
 176 static INT_PTR CALLBACK
 177 PROPSHEET_DialogProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
 178
 179 WINE_DEFAULT_DEBUG_CHANNEL(propsheet);
 180
 181 #define add_flag(a) if (dwFlags & a) {strcat(string, #a );strcat(string," ");}
 182 /******************************************************************************
 183  *            PROPSHEET_UnImplementedFlags
 184  *
 185  * Document use of flags we don't implement yet.
 186  */
 187 static VOID PROPSHEET_UnImplementedFlags(DWORD dwFlags)
 188 {
 189     CHAR string[256];
 190
 191     string[0] = '\0';
 192
 193   /*
 194    * unhandled header flags:
 195    *  PSH_RTLREADING         0x00000800
 196    *  PSH_STRETCHWATERMARK   0x00040000
 197    *  PSH_USEPAGELANG        0x00200000
 198    */
 199
 200     add_flag(PSH_RTLREADING);
 201     add_flag(PSH_STRETCHWATERMARK);
 202     add_flag(PSH_USEPAGELANG);
 203     if (string[0] != '\0')
 204         FIXME("%s\n", string);
 205 }
 206 #undef add_flag
 207
 208 /******************************************************************************
 209  *            PROPSHEET_GetPageRect
 210  *
 211  * Retrieve rect from tab control and map into the dialog for SetWindowPos
 212  */
 213 static void PROPSHEET_GetPageRect(const PropSheetInfo * psInfo, HWND hwndDlg,
 214                                   RECT *rc, LPCPROPSHEETPAGEW ppshpage)
 215 {
 216     if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD) {
 217         HWND hwndChild;
 218         RECT r;
 219
 220         if (((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
 221              (psInfo->ppshheader.dwFlags & PSH_HEADER) &&
 222              !(ppshpage->dwFlags & PSP_HIDEHEADER)) ||
 223             (psInfo->ppshheader.dwFlags & PSH_WIZARD))
 224         {
 225             rc->left = rc->top = WIZARD_PADDING;
 226         }
 227         else
 228         {
 229             rc->left = rc->top = 0;
 230         }
 231         rc->right = psInfo->width - rc->left;
 232         rc->bottom = psInfo->height - rc->top;
 233         MapDialogRect(hwndDlg, rc);
 234
 235         if ((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
 236             (psInfo->ppshheader.dwFlags & PSH_HEADER) &&
 237             !(ppshpage->dwFlags & PSP_HIDEHEADER))
 238         {
 239             hwndChild = GetDlgItem(hwndDlg, IDC_SUNKEN_LINEHEADER);
 240             GetClientRect(hwndChild, &r);
 241             MapWindowPoints(hwndChild, hwndDlg, (LPPOINT) &r, 2);
 242             rc->top += r.bottom + 1;
 243         }
 244     } else {
 245         HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
 246         GetClientRect(hwndTabCtrl, rc);
 247         SendMessageW(hwndTabCtrl, TCM_ADJUSTRECT, FALSE, (LPARAM)rc);
 248         MapWindowPoints(hwndTabCtrl, hwndDlg, (LPPOINT)rc, 2);
 249     }
 250 }
 251
 252 /******************************************************************************
 253  *            PROPSHEET_FindPageByResId
 254  *
 255  * Find page index corresponding to page resource id.
 256  */
 257 static INT PROPSHEET_FindPageByResId(const PropSheetInfo * psInfo, LRESULT resId)
 258 {
 259    INT i;
 260
 261    for (i = 0; i < psInfo->nPages; i++)
 262    {
 263       LPCPROPSHEETPAGEA lppsp = (LPCPROPSHEETPAGEA)psInfo->proppage[i].hpage;
 264
 265       /* Fixme: if resource ID is a string shall we use strcmp ??? */
 266       if (lppsp->u.pszTemplate == (LPVOID)resId)
 267          break;
 268    }
 269
 270    return i;
 271 }
 272
 273 /******************************************************************************
 274  *            PROPSHEET_AtoW
 275  *
 276  * Convert ASCII to Unicode since all data is saved as Unicode.
 277  */
 278 static void PROPSHEET_AtoW(LPCWSTR *tostr, LPCSTR frstr)
 279 {
 280     INT len;
 281     WCHAR *to;
 282
 283     TRACE("<%s>\n", frstr);
 284     len = MultiByteToWideChar(CP_ACP, 0, frstr, -1, 0, 0);
 285     to = Alloc(len * sizeof(WCHAR));
 286     MultiByteToWideChar(CP_ACP, 0, frstr, -1, to, len);
 287     *tostr = to;
 288 }
 289
 290 /******************************************************************************
 291  *            PROPSHEET_CollectSheetInfoCommon
 292  *
 293  * Common code for PROPSHEET_CollectSheetInfoA/W
 294  */
 295 static void PROPSHEET_CollectSheetInfoCommon(PropSheetInfo * psInfo, DWORD dwFlags)
 296 {
 297   PROPSHEET_UnImplementedFlags(dwFlags);
 298
 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;
 306
 307   psInfo->result = 0;
 308   psInfo->hImageList = 0;
 309   psInfo->activeValid = FALSE;
 310 }
 311
 312 /******************************************************************************
 313  *            PROPSHEET_CollectSheetInfoA
 314  *
 315  * Collect relevant data.
 316  */
 317 static void PROPSHEET_CollectSheetInfoA(LPCPROPSHEETHEADERA lppsh,
 318                                        PropSheetInfo * psInfo)
 319 {
 320   DWORD dwSize = min(lppsh->dwSize,sizeof(PROPSHEETHEADERA));
 321   DWORD dwFlags = lppsh->dwFlags;
 322
 323   psInfo->useCallback = (dwFlags & PSH_USECALLBACK )&& (lppsh->pfnCallback);
 324
 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);
 329
 330   if (lppsh->dwFlags & INTRNL_ANY_WIZARD)
 331      psInfo->ppshheader.pszCaption = NULL;
 332   else
 333   {
 334      if (!IS_INTRESOURCE(lppsh->pszCaption))
 335      {
 336         int len = MultiByteToWideChar(CP_ACP, 0, lppsh->pszCaption, -1, NULL, 0);
 337         WCHAR *caption = Alloc( len*sizeof (WCHAR) );
 338
 339         MultiByteToWideChar(CP_ACP, 0, lppsh->pszCaption, -1, caption, len);
 340         psInfo->ppshheader.pszCaption = caption;
 341      }
 342   }
 343   psInfo->nPages = lppsh->nPages;
 344
 345   if (dwFlags & PSH_USEPSTARTPAGE)
 346   {
 347     TRACE("PSH_USEPSTARTPAGE is on\n");
 348     psInfo->active_page = 0;
 349   }
 350   else
 351     psInfo->active_page = lppsh->u2.nStartPage;
 352
 353   PROPSHEET_CollectSheetInfoCommon(psInfo, dwFlags);
 354 }
 355
 356 /******************************************************************************
 357  *            PROPSHEET_CollectSheetInfoW
 358  *
 359  * Collect relevant data.
 360  */
 361 static void PROPSHEET_CollectSheetInfoW(LPCPROPSHEETHEADERW lppsh,
 362                                        PropSheetInfo * psInfo)
 363 {
 364   DWORD dwSize = min(lppsh->dwSize,sizeof(PROPSHEETHEADERW));
 365   DWORD dwFlags = lppsh->dwFlags;
 366
 367   psInfo->useCallback = (dwFlags & PSH_USECALLBACK) && (lppsh->pfnCallback);
 368
 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);
 372
 373   if (lppsh->dwFlags & INTRNL_ANY_WIZARD)
 374      psInfo->ppshheader.pszCaption = NULL;
 375   else
 376   {
 377      if (!IS_INTRESOURCE(lppsh->pszCaption))
 378      {
 379         int len = strlenW(lppsh->pszCaption);
 380         WCHAR *caption = Alloc( (len+1)*sizeof(WCHAR) );
 381
 382         psInfo->ppshheader.pszCaption = strcpyW( caption, lppsh->pszCaption );
 383      }
 384   }
 385   psInfo->nPages = lppsh->nPages;
 386
 387   if (dwFlags & PSH_USEPSTARTPAGE)
 388   {
 389     TRACE("PSH_USEPSTARTPAGE is on\n");
 390     psInfo->active_page = 0;
 391   }
 392   else
 393     psInfo->active_page = lppsh->u2.nStartPage;
 394
 395   PROPSHEET_CollectSheetInfoCommon(psInfo, dwFlags);
 396 }
 397
 398 /******************************************************************************
 399  *            PROPSHEET_CollectPageInfo
 400  *
 401  * Collect property sheet data.
 402  * With code taken from DIALOG_ParseTemplate32.
 403  */
 404 static BOOL PROPSHEET_CollectPageInfo(LPCPROPSHEETPAGEW lppsp,
 405                                PropSheetInfo * psInfo,
 406                                int index, BOOL resize)
 407 {
 408   const DLGTEMPLATE* pTemplate;
 409   const WORD*  p;
 410   DWORD dwFlags;
 411   int width, height;
 412
 413   if (!lppsp)
 414     return FALSE;
 415
 416   TRACE("\n");
 417   psInfo->proppage[index].hpage = (HPROPSHEETPAGE)lppsp;
 418   psInfo->proppage[index].hwndPage = 0;
 419   psInfo->proppage[index].isDirty = FALSE;
 420
 421   /*
 422    * Process property page flags.
 423    */
 424   dwFlags = lppsp->dwFlags;
 425   psInfo->proppage[index].useCallback = (dwFlags & PSP_USECALLBACK) && (lppsp->pfnCallback);
 426   psInfo->proppage[index].hasHelp = dwFlags & PSP_HASHELP;
 427   psInfo->proppage[index].hasIcon = dwFlags & (PSP_USEHICON | PSP_USEICONID);
 428
 429   /* as soon as we have a page with the help flag, set the sheet flag on */
 430   if (psInfo->proppage[index].hasHelp)
 431     psInfo->hasHelp = TRUE;
 432
 433   /*
 434    * Process page template.
 435    */
 436   if (dwFlags & PSP_DLGINDIRECT)
 437     pTemplate = lppsp->u.pResource;
 438   else if(dwFlags & PSP_INTERNAL_UNICODE )
 439   {
 440     HRSRC hResource = FindResourceW(lppsp->hInstance,
 441                                     lppsp->u.pszTemplate,
 442                                     (LPWSTR)RT_DIALOG);
 443     HGLOBAL hTemplate = LoadResource(lppsp->hInstance,
 444                                      hResource);
 445     pTemplate = LockResource(hTemplate);
 446   }
 447   else
 448   {
 449     HRSRC hResource = FindResourceA(lppsp->hInstance,
 450                                     (LPCSTR)lppsp->u.pszTemplate,
 451                                     (LPSTR)RT_DIALOG);
 452     HGLOBAL hTemplate = LoadResource(lppsp->hInstance,
 453                                      hResource);
 454     pTemplate = LockResource(hTemplate);
 455   }
 456
 457   /*
 458    * Extract the size of the page and the caption.
 459    */
 460   if (!pTemplate)
 461       return FALSE;
 462
 463   p = (const WORD *)pTemplate;
 464
 465   if (((const MyDLGTEMPLATEEX*)pTemplate)->signature == 0xFFFF)
 466   {
 467     /* DLGTEMPLATEEX (not defined in any std. header file) */
 468
 469     p++;       /* dlgVer    */
 470     p++;       /* signature */
 471     p += 2;    /* help ID   */
 472     p += 2;    /* ext style */
 473     p += 2;    /* style     */
 474   }
 475   else
 476   {
 477     /* DLGTEMPLATE */
 478
 479     p += 2;    /* style     */
 480     p += 2;    /* ext style */
 481   }
 482
 483   p++;    /* nb items */
 484   p++;    /*   x      */
 485   p++;    /*   y      */
 486   width  = (WORD)*p; p++;
 487   height = (WORD)*p; p++;
 488
 489   /* Special calculation for interior wizard pages so the largest page is
 490    * calculated correctly. We need to add all the padding and space occupied
 491    * by the header so the width and height sums up to the whole wizard client
 492    * area. */
 493   if ((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
 494       (psInfo->ppshheader.dwFlags & PSH_HEADER) &&
 495       !(dwFlags & PSP_HIDEHEADER))
 496   {
 497       height += 2 * WIZARD_PADDING + WIZARD_HEADER_HEIGHT;
 498       width += 2 * WIZARD_PADDING;
 499   }
 500   if (psInfo->ppshheader.dwFlags & PSH_WIZARD)
 501   {
 502       height += 2 * WIZARD_PADDING;
 503       width += 2 * WIZARD_PADDING;
 504   }
 505
 506   /* remember the largest width and height */
 507   if (resize)
 508   {
 509       if (width > psInfo->width)
 510         psInfo->width = width;
 511
 512       if (height > psInfo->height)
 513         psInfo->height = height;
 514   }
 515
 516   /* menu */
 517   switch ((WORD)*p)
 518   {
 519     case 0x0000:
 520       p++;
 521       break;
 522     case 0xffff:
 523       p += 2;
 524       break;
 525     default:
 526       p += lstrlenW( p ) + 1;
 527       break;
 528   }
 529
 530   /* class */
 531   switch ((WORD)*p)
 532   {
 533     case 0x0000:
 534       p++;
 535       break;
 536     case 0xffff:
 537       p += 2;
 538       break;
 539     default:
 540       p += lstrlenW( p ) + 1;
 541       break;
 542   }
 543
 544   /* Extract the caption */
 545   psInfo->proppage[index].pszText = p;
 546   TRACE("Tab %d %s\n",index,debugstr_w( p ));
 547
 548   if (dwFlags & PSP_USETITLE)
 549   {
 550     WCHAR szTitle[256];
 551     const WCHAR *pTitle;
 552     static const WCHAR pszNull[] = { '(','n','u','l','l',')',0 };
 553     WCHAR *text;
 554     int len;
 555
 556     if (IS_INTRESOURCE( lppsp->pszTitle ))
 557     {
 558       if (!LoadStringW( lppsp->hInstance, (DWORD_PTR)lppsp->pszTitle,szTitle,sizeof(szTitle)/sizeof(szTitle[0]) ))
 559       {
 560         pTitle = pszNull;
 561         FIXME("Could not load resource #%04x?\n",LOWORD(lppsp->pszTitle));
 562       }
 563       else
 564         pTitle = szTitle;
 565     }
 566     else
 567       pTitle = lppsp->pszTitle;
 568
 569     len = strlenW(pTitle);
 570     text = Alloc( (len+1)*sizeof (WCHAR) );
 571     psInfo->proppage[index].pszText = strcpyW( text, pTitle);
 572   }
 573
 574   /*
 575    * Build the image list for icons
 576    */
 577   if ((dwFlags & PSP_USEHICON) || (dwFlags & PSP_USEICONID))
 578   {
 579     HICON hIcon;
 580     int icon_cx = GetSystemMetrics(SM_CXSMICON);
 581     int icon_cy = GetSystemMetrics(SM_CYSMICON);
 582
 583     if (dwFlags & PSP_USEICONID)
 584       hIcon = LoadImageW(lppsp->hInstance, lppsp->u2.pszIcon, IMAGE_ICON,
 585                          icon_cx, icon_cy, LR_DEFAULTCOLOR);
 586     else
 587       hIcon = lppsp->u2.hIcon;
 588
 589     if ( hIcon )
 590     {
 591       if (psInfo->hImageList == 0 )
 592         psInfo->hImageList = ImageList_Create(icon_cx, icon_cy, ILC_COLOR, 1, 1);
 593
 594       ImageList_AddIcon(psInfo->hImageList, hIcon);
 595     }
 596
 597   }
 598
 599   return TRUE;
 600 }
 601
 602 /******************************************************************************
 603  *            PROPSHEET_CreateDialog
 604  *
 605  * Creates the actual property sheet.
 606  */
 607 static INT_PTR PROPSHEET_CreateDialog(PropSheetInfo* psInfo)
 608 {
 609   LRESULT ret;
 610   LPCVOID template;
 611   LPVOID temp = 0;
 612   HRSRC hRes;
 613   DWORD resSize;
 614   WORD resID = IDD_PROPSHEET;
 615
 616   TRACE("(%p)\n", psInfo);
 617   if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
 618     resID = IDD_WIZARD;
 619
 620   if( psInfo->unicode )
 621   {
 622     if(!(hRes = FindResourceW(COMCTL32_hModule,
 623                             MAKEINTRESOURCEW(resID),
 624                             (LPWSTR)RT_DIALOG)))
 625       return -1;
 626   }
 627   else
 628   {
 629     if(!(hRes = FindResourceA(COMCTL32_hModule,
 630                             MAKEINTRESOURCEA(resID),
 631                             (LPSTR)RT_DIALOG)))
 632       return -1;
 633   }
 634
 635   if(!(template = LoadResource(COMCTL32_hModule, hRes)))
 636     return -1;
 637
 638   /*
 639    * Make a copy of the dialog template.
 640    */
 641   resSize = SizeofResource(COMCTL32_hModule, hRes);
 642
 643   temp = Alloc(resSize);
 644
 645   if (!temp)
 646     return -1;
 647
 648   memcpy(temp, template, resSize);
 649
 650   if (psInfo->ppshheader.dwFlags & PSH_NOCONTEXTHELP)
 651   {
 652     if (((MyDLGTEMPLATEEX*)temp)->signature == 0xFFFF)
 653       ((MyDLGTEMPLATEEX*)temp)->style &= ~DS_CONTEXTHELP;
 654     else
 655       ((DLGTEMPLATE*)temp)->style &= ~DS_CONTEXTHELP;
 656   }
 657   if ((psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD) &&
 658       (psInfo->ppshheader.dwFlags & PSH_WIZARDCONTEXTHELP))
 659   {
 660     if (((MyDLGTEMPLATEEX*)temp)->signature == 0xFFFF)
 661       ((MyDLGTEMPLATEEX*)temp)->style |= DS_CONTEXTHELP;
 662     else
 663       ((DLGTEMPLATE*)temp)->style |= DS_CONTEXTHELP;
 664   }
 665
 666   if (psInfo->useCallback)
 667     (*(psInfo->ppshheader.pfnCallback))(0, PSCB_PRECREATE, (LPARAM)temp);
 668
 669   /* NOTE: MSDN states "Returns a positive value if successful, or -1
 670    * otherwise for modal property sheets.", but this is wrong. The
 671    * actual return value is either TRUE (success), FALSE (cancel) or
 672    * -1 (error). */
 673   if( psInfo->unicode )
 674   {
 675     ret = (INT_PTR)CreateDialogIndirectParamW(psInfo->ppshheader.hInstance,
 676                                           temp, psInfo->ppshheader.hwndParent,
 677                                           PROPSHEET_DialogProc, (LPARAM)psInfo);
 678     if ( !ret ) ret = -1;
 679   }
 680   else
 681   {
 682     ret = (INT_PTR)CreateDialogIndirectParamA(psInfo->ppshheader.hInstance,
 683                                           temp, psInfo->ppshheader.hwndParent,
 684                                           PROPSHEET_DialogProc, (LPARAM)psInfo);
 685     if ( !ret ) ret = -1;
 686   }
 687
 688   Free(temp);
 689
 690   return ret;
 691 }
 692
 693 /******************************************************************************
 694  *            PROPSHEET_SizeMismatch
 695  *
 696  *     Verify that the tab control and the "largest" property sheet page dlg. template
 697  *     match in size.
 698  */
 699 static BOOL PROPSHEET_SizeMismatch(HWND hwndDlg, const PropSheetInfo* psInfo)
 700 {
 701   HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
 702   RECT rcOrigTab, rcPage;
 703
 704   /*
 705    * Original tab size.
 706    */
 707   GetClientRect(hwndTabCtrl, &rcOrigTab);
 708   TRACE("orig tab %s\n", wine_dbgstr_rect(&rcOrigTab));
 709
 710   /*
 711    * Biggest page size.
 712    */
 713   rcPage.left   = 0;
 714   rcPage.top    = 0;
 715   rcPage.right  = psInfo->width;
 716   rcPage.bottom = psInfo->height;
 717
 718   MapDialogRect(hwndDlg, &rcPage);
 719   TRACE("biggest page %s\n", wine_dbgstr_rect(&rcPage));
 720
 721   if ( (rcPage.right - rcPage.left) != (rcOrigTab.right - rcOrigTab.left) )
 722     return TRUE;
 723   if ( (rcPage.bottom - rcPage.top) != (rcOrigTab.bottom - rcOrigTab.top) )
 724     return TRUE;
 725
 726   return FALSE;
 727 }
 728
 729 /******************************************************************************
 730  *            PROPSHEET_AdjustSize
 731  *
 732  * Resizes the property sheet and the tab control to fit the largest page.
 733  */
 734 static BOOL PROPSHEET_AdjustSize(HWND hwndDlg, PropSheetInfo* psInfo)
 735 {
 736   HWND hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
 737   HWND hwndButton = GetDlgItem(hwndDlg, IDOK);
 738   RECT rc,tabRect;
 739   int buttonHeight;
 740   PADDING_INFO padding = PROPSHEET_GetPaddingInfo(hwndDlg);
 741   RECT units;
 742   LONG style;
 743
 744   /* Get the height of buttons */
 745   GetClientRect(hwndButton, &rc);
 746   buttonHeight = rc.bottom;
 747
 748   /*
 749    * Biggest page size.
 750    */
 751   rc.left   = 0;
 752   rc.top    = 0;
 753   rc.right  = psInfo->width;
 754   rc.bottom = psInfo->height;
 755
 756   MapDialogRect(hwndDlg, &rc);
 757
 758   /* retrieve the dialog units */
 759   units.left = units.right = 4;
 760   units.top = units.bottom = 8;
 761   MapDialogRect(hwndDlg, &units);
 762
 763   /*
 764    * Resize the tab control.
 765    */
 766   GetClientRect(hwndTabCtrl,&tabRect);
 767
 768   SendMessageW(hwndTabCtrl, TCM_ADJUSTRECT, FALSE, (LPARAM)&tabRect);
 769
 770   if ((rc.bottom - rc.top) < (tabRect.bottom - tabRect.top))
 771   {
 772       rc.bottom = rc.top + tabRect.bottom - tabRect.top;
 773       psInfo->height = MulDiv((rc.bottom - rc.top),8,units.top);
 774   }
 775
 776   if ((rc.right - rc.left) < (tabRect.right - tabRect.left))
 777   {
 778       rc.right = rc.left + tabRect.right - tabRect.left;
 779       psInfo->width  = MulDiv((rc.right - rc.left),4,units.left);
 780   }
 781
 782   SendMessageW(hwndTabCtrl, TCM_ADJUSTRECT, TRUE, (LPARAM)&rc);
 783
 784   rc.right -= rc.left;
 785   rc.bottom -= rc.top;
 786   TRACE("setting tab %p, rc (0,0)-(%d,%d)\n",
 787         hwndTabCtrl, rc.right, rc.bottom);
 788   SetWindowPos(hwndTabCtrl, 0, 0, 0, rc.right, rc.bottom,
 789                SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE);
 790
 791   GetClientRect(hwndTabCtrl, &rc);
 792
 793   TRACE("tab client rc %s\n", wine_dbgstr_rect(&rc));
 794
 795   rc.right += (padding.x * 2);
 796   rc.bottom += buttonHeight + (3 * padding.y);
 797
 798   style = GetWindowLongW(hwndDlg, GWL_STYLE);
 799   if (!(style & WS_CHILD))
 800     AdjustWindowRect(&rc, style, FALSE);
 801
 802   rc.right -= rc.left;
 803   rc.bottom -= rc.top;
 804
 805   /*
 806    * Resize the property sheet.
 807    */
 808   TRACE("setting dialog %p, rc (0,0)-(%d,%d)\n",
 809         hwndDlg, rc.right, rc.bottom);
 810   SetWindowPos(hwndDlg, 0, 0, 0, rc.right, rc.bottom,
 811                SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE);
 812   return TRUE;
 813 }
 814
 815 /******************************************************************************
 816  *            PROPSHEET_AdjustSizeWizard
 817  *
 818  * Resizes the property sheet to fit the largest page.
 819  */
 820 static BOOL PROPSHEET_AdjustSizeWizard(HWND hwndDlg, const PropSheetInfo* psInfo)
 821 {
 822   HWND hwndLine = GetDlgItem(hwndDlg, IDC_SUNKEN_LINE);
 823   RECT rc, lineRect, dialogRect;
 824
 825   /* Biggest page size */
 826   rc.left   = 0;
 827   rc.top    = 0;
 828   rc.right  = psInfo->width;
 829   rc.bottom = psInfo->height;
 830   MapDialogRect(hwndDlg, &rc);
 831
 832   TRACE("Biggest page %s\n", wine_dbgstr_rect(&rc));
 833
 834   /* Add space for the buttons row */
 835   GetWindowRect(hwndLine, &lineRect);
 836   MapWindowPoints(NULL, hwndDlg, (LPPOINT)&lineRect, 2);
 837   GetClientRect(hwndDlg, &dialogRect);
 838   rc.bottom += dialogRect.bottom - lineRect.top - 1;
 839
 840   /* Convert the client coordinates to window coordinates */
 841   AdjustWindowRect(&rc, GetWindowLongW(hwndDlg, GWL_STYLE), FALSE);
 842
 843   /* Resize the property sheet */
 844   TRACE("setting dialog %p, rc (0,0)-(%d,%d)\n",
 845         hwndDlg, rc.right, rc.bottom);
 846   SetWindowPos(hwndDlg, 0, 0, 0, rc.right - rc.left, rc.bottom - rc.top,
 847                SWP_NOMOVE | SWP_NOZORDER | SWP_NOACTIVATE);
 848
 849   return TRUE;
 850 }
 851
 852 /******************************************************************************
 853  *            PROPSHEET_AdjustButtons
 854  *
 855  * Adjusts the buttons' positions.
 856  */
 857 static BOOL PROPSHEET_AdjustButtons(HWND hwndParent, const PropSheetInfo* psInfo)
 858 {
 859   HWND hwndButton = GetDlgItem(hwndParent, IDOK);
 860   RECT rcSheet;
 861   int x, y;
 862   int num_buttons = 2;
 863   int buttonWidth, buttonHeight;
 864   PADDING_INFO padding = PROPSHEET_GetPaddingInfo(hwndParent);
 865
 866   if (psInfo->hasApply)
 867     num_buttons++;
 868
 869   if (psInfo->hasHelp)
 870     num_buttons++;
 871
 872   /*
 873    * Obtain the size of the buttons.
 874    */
 875   GetClientRect(hwndButton, &rcSheet);
 876   buttonWidth = rcSheet.right;
 877   buttonHeight = rcSheet.bottom;
 878
 879   /*
 880    * Get the size of the property sheet.
 881    */
 882   GetClientRect(hwndParent, &rcSheet);
 883
 884   /*
 885    * All buttons will be at this y coordinate.
 886    */
 887   y = rcSheet.bottom - (padding.y + buttonHeight);
 888
 889   /*
 890    * Position OK button and make it default.
 891    */
 892   hwndButton = GetDlgItem(hwndParent, IDOK);
 893
 894   x = rcSheet.right - ((padding.x + buttonWidth) * num_buttons);
 895
 896   SetWindowPos(hwndButton, 0, x, y, 0, 0,
 897                SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
 898
 899   SendMessageW(hwndParent, DM_SETDEFID, IDOK, 0);
 900
 901
 902   /*
 903    * Position Cancel button.
 904    */
 905   hwndButton = GetDlgItem(hwndParent, IDCANCEL);
 906
 907   x += padding.x + buttonWidth;
 908
 909   SetWindowPos(hwndButton, 0, x, y, 0, 0,
 910                SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
 911
 912   /*
 913    * Position Apply button.
 914    */
 915   hwndButton = GetDlgItem(hwndParent, IDC_APPLY_BUTTON);
 916
 917   if(psInfo->hasApply)
 918     x += padding.x + buttonWidth;
 919   else
 920     ShowWindow(hwndButton, SW_HIDE);
 921
 922   SetWindowPos(hwndButton, 0, x, y, 0, 0,
 923               SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
 924   EnableWindow(hwndButton, FALSE);
 925
 926   /*
 927    * Position Help button.
 928    */
 929   hwndButton = GetDlgItem(hwndParent, IDHELP);
 930
 931   x += padding.x + buttonWidth;
 932   SetWindowPos(hwndButton, 0, x, y, 0, 0,
 933               SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
 934
 935   if(!psInfo->hasHelp)
 936     ShowWindow(hwndButton, SW_HIDE);
 937
 938   return TRUE;
 939 }
 940
 941 /******************************************************************************
 942  *            PROPSHEET_AdjustButtonsWizard
 943  *
 944  * Adjusts the buttons' positions.
 945  */
 946 static BOOL PROPSHEET_AdjustButtonsWizard(HWND hwndParent,
 947                                           const PropSheetInfo* psInfo)
 948 {
 949   HWND hwndButton = GetDlgItem(hwndParent, IDCANCEL);
 950   HWND hwndLine = GetDlgItem(hwndParent, IDC_SUNKEN_LINE);
 951   HWND hwndLineHeader = GetDlgItem(hwndParent, IDC_SUNKEN_LINEHEADER);
 952   RECT rcSheet;
 953   int x, y;
 954   int num_buttons = 3;
 955   int buttonWidth, buttonHeight, lineHeight, lineWidth;
 956   PADDING_INFO padding = PROPSHEET_GetPaddingInfoWizard(hwndParent, psInfo);
 957
 958   if (psInfo->hasHelp)
 959     num_buttons++;
 960   if (psInfo->hasFinish)
 961     num_buttons++;
 962
 963   /*
 964    * Obtain the size of the buttons.
 965    */
 966   GetClientRect(hwndButton, &rcSheet);
 967   buttonWidth = rcSheet.right;
 968   buttonHeight = rcSheet.bottom;
 969
 970   GetClientRect(hwndLine, &rcSheet);
 971   lineHeight = rcSheet.bottom;
 972
 973   /*
 974    * Get the size of the property sheet.
 975    */
 976   GetClientRect(hwndParent, &rcSheet);
 977
 978   /*
 979    * All buttons will be at this y coordinate.
 980    */
 981   y = rcSheet.bottom - (padding.y + buttonHeight);
 982
 983   /*
 984    * Position the Back button.
 985    */
 986   hwndButton = GetDlgItem(hwndParent, IDC_BACK_BUTTON);
 987
 988   x = rcSheet.right - ((padding.x + buttonWidth) * (num_buttons - 1)) - buttonWidth;
 989
 990   SetWindowPos(hwndButton, 0, x, y, 0, 0,
 991                SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
 992
 993   /*
 994    * Position the Next button.
 995    */
 996   hwndButton = GetDlgItem(hwndParent, IDC_NEXT_BUTTON);
 997
 998   x += buttonWidth;
 999
1000   SetWindowPos(hwndButton, 0, x, y, 0, 0,
1001                SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
1002
1003   /*
1004    * Position the Finish button.
1005    */
1006   hwndButton = GetDlgItem(hwndParent, IDC_FINISH_BUTTON);
1007
1008   if (psInfo->hasFinish)
1009     x += padding.x + buttonWidth;
1010
1011   SetWindowPos(hwndButton, 0, x, y, 0, 0,
1012                SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
1013
1014   if (!psInfo->hasFinish)
1015     ShowWindow(hwndButton, SW_HIDE);
1016
1017   /*
1018    * Position the Cancel button.
1019    */
1020   hwndButton = GetDlgItem(hwndParent, IDCANCEL);
1021
1022   x += padding.x + buttonWidth;
1023
1024   SetWindowPos(hwndButton, 0, x, y, 0, 0,
1025                SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
1026
1027   /*
1028    * Position Help button.
1029    */
1030   hwndButton = GetDlgItem(hwndParent, IDHELP);
1031
1032   if (psInfo->hasHelp)
1033   {
1034     x += padding.x + buttonWidth;
1035
1036     SetWindowPos(hwndButton, 0, x, y, 0, 0,
1037                  SWP_NOSIZE | SWP_NOZORDER | SWP_NOACTIVATE);
1038   }
1039   else
1040     ShowWindow(hwndButton, SW_HIDE);
1041
1042   if (psInfo->ppshheader.dwFlags &
1043       (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW | PSH_WIZARD_LITE))
1044       padding.x = 0;
1045
1046   /*
1047    * Position and resize the sunken line.
1048    */
1049   x = padding.x;
1050   y = rcSheet.bottom - ((padding.y * 2) + buttonHeight + lineHeight);
1051
1052   lineWidth = rcSheet.right - (padding.x * 2);
1053   SetWindowPos(hwndLine, 0, x, y, lineWidth, 2,
1054                SWP_NOZORDER | SWP_NOACTIVATE);
1055
1056   /*
1057    * Position and resize the header sunken line.
1058    */
1059
1060   SetWindowPos(hwndLineHeader, 0, 0, 0, rcSheet.right, 2,
1061                SWP_NOZORDER | SWP_NOMOVE | SWP_NOACTIVATE);
1062   if (!(psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)))
1063       ShowWindow(hwndLineHeader, SW_HIDE);
1064
1065   return TRUE;
1066 }
1067
1068 /******************************************************************************
1069  *            PROPSHEET_GetPaddingInfo
1070  *
1071  * Returns the layout information.
1072  */
1073 static PADDING_INFO PROPSHEET_GetPaddingInfo(HWND hwndDlg)
1074 {
1075   HWND hwndTab = GetDlgItem(hwndDlg, IDC_TABCONTROL);
1076   RECT rcTab;
1077   PADDING_INFO padding;
1078
1079   GetWindowRect(hwndTab, &rcTab);
1080   MapWindowPoints( 0, hwndDlg, (POINT *)&rcTab, 2 );
1081
1082   padding.x = rcTab.left;
1083   padding.y = rcTab.top;
1084
1085   return padding;
1086 }
1087
1088 /******************************************************************************
1089  *            PROPSHEET_GetPaddingInfoWizard
1090  *
1091  * Returns the layout information.
1092  * Vertical spacing is the distance between the line and the buttons.
1093  * Do NOT use the Help button to gather padding information when it isn't mapped
1094  * (PSH_HASHELP), as app writers aren't forced to supply correct coordinates
1095  * for it in this case !
1096  * FIXME: I'm not sure about any other coordinate problems with these evil
1097  * buttons. Fix it in case additional problems appear or maybe calculate
1098  * a padding in a completely different way, as this is somewhat messy.
1099  */
1100 static PADDING_INFO PROPSHEET_GetPaddingInfoWizard(HWND hwndDlg, const PropSheetInfo*
1101  psInfo)
1102 {
1103   PADDING_INFO padding;
1104   RECT rc;
1105   HWND hwndControl;
1106   INT idButton;
1107   POINT ptButton, ptLine;
1108
1109   TRACE("\n");
1110   if (psInfo->hasHelp)
1111   {
1112         idButton = IDHELP;
1113   }
1114   else
1115   {
1116     if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
1117     {
1118         idButton = IDC_NEXT_BUTTON;
1119     }
1120     else
1121     {
1122         /* hopefully this is ok */
1123         idButton = IDCANCEL;
1124     }
1125   }
1126
1127   hwndControl = GetDlgItem(hwndDlg, idButton);
1128   GetWindowRect(hwndControl, &rc);
1129   MapWindowPoints( 0, hwndDlg, (POINT *)&rc, 2 );
1130   ptButton.x = rc.left;
1131   ptButton.y = rc.top;
1132
1133   /* Line */
1134   hwndControl = GetDlgItem(hwndDlg, IDC_SUNKEN_LINE);
1135   GetWindowRect(hwndControl, &rc);
1136   MapWindowPoints( 0, hwndDlg, (POINT *)&rc, 2 );
1137   ptLine.x = rc.left;
1138   ptLine.y = rc.bottom;
1139
1140   padding.y = ptButton.y - ptLine.y;
1141
1142   if (padding.y < 0)
1143           ERR("padding negative ! Please report this !\n");
1144
1145   /* this is most probably not correct, but the best we have now */
1146   padding.x = padding.y;
1147   return padding;
1148 }
1149
1150 /******************************************************************************
1151  *            PROPSHEET_CreateTabControl
1152  *
1153  * Insert the tabs in the tab control.
1154  */
1155 static BOOL PROPSHEET_CreateTabControl(HWND hwndParent,
1156                                        const PropSheetInfo * psInfo)
1157 {
1158   HWND hwndTabCtrl = GetDlgItem(hwndParent, IDC_TABCONTROL);
1159   TCITEMW item;
1160   int i, nTabs;
1161   int iImage = 0;
1162
1163   TRACE("\n");
1164   item.mask = TCIF_TEXT;
1165   item.cchTextMax = MAX_TABTEXT_LENGTH;
1166
1167   nTabs = psInfo->nPages;
1168
1169   /*
1170    * Set the image list for icons.
1171    */
1172   if (psInfo->hImageList)
1173   {
1174     SendMessageW(hwndTabCtrl, TCM_SETIMAGELIST, 0, (LPARAM)psInfo->hImageList);
1175   }
1176
1177   SendMessageW(hwndTabCtrl, WM_SETREDRAW, 0, 0);
1178   for (i = 0; i < nTabs; i++)
1179   {
1180     if ( psInfo->proppage[i].hasIcon )
1181     {
1182       item.mask |= TCIF_IMAGE;
1183       item.iImage = iImage++;
1184     }
1185     else
1186     {
1187       item.mask &= ~TCIF_IMAGE;
1188     }
1189
1190     item.pszText = (LPWSTR) psInfo->proppage[i].pszText;
1191     SendMessageW(hwndTabCtrl, TCM_INSERTITEMW, i, (LPARAM)&item);
1192   }
1193   SendMessageW(hwndTabCtrl, WM_SETREDRAW, 1, 0);
1194
1195   return TRUE;
1196 }
1197
1198 /******************************************************************************
1199  *            PROPSHEET_WizardSubclassProc
1200  *
1201  * Subclassing window procedure for wizard exterior pages to prevent drawing
1202  * background and so drawing above the watermark.
1203  */
1204 static LRESULT CALLBACK
1205 PROPSHEET_WizardSubclassProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam, UINT_PTR uID, DWORD_PTR dwRef)
1206 {
1207   switch (uMsg)
1208   {
1209     case WM_ERASEBKGND:
1210       return TRUE;
1211
1212     case WM_CTLCOLORSTATIC:
1213       SetBkColor((HDC)wParam, GetSysColor(COLOR_WINDOW));
1214       return (INT_PTR)GetSysColorBrush(COLOR_WINDOW);
1215   }
1216
1217   return DefSubclassProc(hwnd, uMsg, wParam, lParam);
1218 }
1219
1220 /*
1221  * Get the size of an in-memory Template
1222  *
1223  *( Based on the code of PROPSHEET_CollectPageInfo)
1224  * See also dialog.c/DIALOG_ParseTemplate32().
1225  */
1226
1227 static UINT GetTemplateSize(const DLGTEMPLATE* pTemplate)
1228
1229 {
1230   const WORD*  p = (const WORD *)pTemplate;
1231   BOOL  istemplateex = (((const MyDLGTEMPLATEEX*)pTemplate)->signature == 0xFFFF);
1232   WORD nrofitems;
1233   UINT ret;
1234
1235   if (istemplateex)
1236   {
1237     /* DLGTEMPLATEEX (not defined in any std. header file) */
1238
1239     TRACE("is DLGTEMPLATEEX\n");
1240     p++;       /* dlgVer    */
1241     p++;       /* signature */
1242     p += 2;    /* help ID   */
1243     p += 2;    /* ext style */
1244     p += 2;    /* style     */
1245   }
1246   else
1247   {
1248     /* DLGTEMPLATE */
1249
1250     TRACE("is DLGTEMPLATE\n");
1251     p += 2;    /* style     */
1252     p += 2;    /* ext style */
1253   }
1254
1255   nrofitems =   (WORD)*p; p++;    /* nb items */
1256   p++;    /*   x      */
1257   p++;    /*   y      */
1258   p++;    /*   width  */
1259   p++;    /*   height */
1260
1261   /* menu */
1262   switch ((WORD)*p)
1263   {
1264     case 0x0000:
1265       p++;
1266       break;
1267     case 0xffff:
1268       p += 2;
1269       break;
1270     default:
1271       TRACE("menu %s\n",debugstr_w( p ));
1272       p += lstrlenW( p ) + 1;
1273       break;
1274   }
1275
1276   /* class */
1277   switch ((WORD)*p)
1278   {
1279     case 0x0000:
1280       p++;
1281       break;
1282     case 0xffff:
1283       p += 2; /* 0xffff plus predefined window class ordinal value */
1284       break;
1285     default:
1286       TRACE("class %s\n",debugstr_w( p ));
1287       p += lstrlenW( p ) + 1;
1288       break;
1289   }
1290
1291   /* title */
1292   TRACE("title %s\n",debugstr_w( p ));
1293   p += lstrlenW( p ) + 1;
1294
1295   /* font, if DS_SETFONT set */
1296   if ((DS_SETFONT & ((istemplateex)?  ((const MyDLGTEMPLATEEX*)pTemplate)->style :
1297                      pTemplate->style)))
1298     {
1299       p+=(istemplateex)?3:1;
1300       TRACE("font %s\n",debugstr_w( p ));
1301       p += lstrlenW( p ) + 1; /* the font name */
1302     }
1303
1304   /* now process the DLGITEMTEMPLATE(EX) structs (plus custom data)
1305    * that are following the DLGTEMPLATE(EX) data */
1306   TRACE("%d items\n",nrofitems);
1307   while (nrofitems > 0)
1308     {
1309       p = (WORD*)(((DWORD_PTR)p + 3) & ~3); /* DWORD align */
1310
1311       /* skip header */
1312       p += (istemplateex ? sizeof(MyDLGITEMTEMPLATEEX) : sizeof(DLGITEMTEMPLATE))/sizeof(WORD);
1313
1314       /* check class */
1315       switch ((WORD)*p)
1316         {
1317         case 0x0000:
1318           p++;
1319           break;
1320         case 0xffff:
1321           TRACE("class ordinal 0x%08x\n",*(const DWORD*)p);
1322           p += 2;
1323           break;
1324         default:
1325           TRACE("class %s\n",debugstr_w( p ));
1326           p += lstrlenW( p ) + 1;
1327           break;
1328         }
1329
1330       /* check title text */
1331       switch ((WORD)*p)
1332         {
1333         case 0x0000:
1334           p++;
1335           break;
1336         case 0xffff:
1337           TRACE("text ordinal 0x%08x\n",*(const DWORD*)p);
1338           p += 2;
1339           break;
1340         default:
1341           TRACE("text %s\n",debugstr_w( p ));
1342           p += lstrlenW( p ) + 1;
1343           break;
1344         }
1345       p += *p / sizeof(WORD) + 1;    /* Skip extra data */
1346       --nrofitems;
1347     }
1348
1349   ret = (p - (const WORD*)pTemplate) * sizeof(WORD);
1350   TRACE("%p %p size 0x%08x\n", p, pTemplate, ret);
1351   return ret;
1352 }
1353
1354 /******************************************************************************
1355  *            PROPSHEET_CreatePage
1356  *
1357  * Creates a page.
1358  */
1359 static BOOL PROPSHEET_CreatePage(HWND hwndParent,
1360                                 int index,
1361                                 const PropSheetInfo * psInfo,
1362                                 LPCPROPSHEETPAGEW ppshpage)
1363 {
1364   const DLGTEMPLATE* pTemplate;
1365   HWND hwndPage;
1366   DWORD resSize;
1367   DLGTEMPLATE* pTemplateCopy = NULL;
1368
1369   TRACE("index %d\n", index);
1370
1371   if (ppshpage == NULL)
1372   {
1373     return FALSE;
1374   }
1375
1376   if (ppshpage->dwFlags & PSP_DLGINDIRECT)
1377     {
1378       pTemplate = ppshpage->u.pResource;
1379       resSize = GetTemplateSize(pTemplate);
1380     }
1381   else if(ppshpage->dwFlags & PSP_INTERNAL_UNICODE)
1382   {
1383     HRSRC hResource;
1384     HANDLE hTemplate;
1385
1386     hResource = FindResourceW(ppshpage->hInstance,
1387                                     ppshpage->u.pszTemplate,
1388                                     (LPWSTR)RT_DIALOG);
1389     if(!hResource)
1390         return FALSE;
1391
1392     resSize = SizeofResource(ppshpage->hInstance, hResource);
1393
1394     hTemplate = LoadResource(ppshpage->hInstance, hResource);
1395     if(!hTemplate)
1396         return FALSE;
1397
1398     pTemplate = LockResource(hTemplate);
1399     /*
1400      * Make a copy of the dialog template to make it writable
1401      */
1402   }
1403   else
1404   {
1405     HRSRC hResource;
1406     HANDLE hTemplate;
1407
1408     hResource = FindResourceA(ppshpage->hInstance,
1409                                     (LPCSTR)ppshpage->u.pszTemplate,
1410                                     (LPSTR)RT_DIALOG);
1411     if(!hResource)
1412         return FALSE;
1413
1414     resSize = SizeofResource(ppshpage->hInstance, hResource);
1415
1416     hTemplate = LoadResource(ppshpage->hInstance, hResource);
1417     if(!hTemplate)
1418         return FALSE;
1419
1420     pTemplate = LockResource(hTemplate);
1421     /*
1422      * Make a copy of the dialog template to make it writable
1423      */
1424   }
1425   pTemplateCopy = Alloc(resSize);
1426   if (!pTemplateCopy)
1427     return FALSE;
1428
1429   TRACE("copying pTemplate %p into pTemplateCopy %p (%d)\n", pTemplate, pTemplateCopy, resSize);
1430   memcpy(pTemplateCopy, pTemplate, resSize);
1431
1432   if (((MyDLGTEMPLATEEX*)pTemplateCopy)->signature == 0xFFFF)
1433   {
1434     ((MyDLGTEMPLATEEX*)pTemplateCopy)->style |= WS_CHILD | WS_TABSTOP | DS_CONTROL;
1435     ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~DS_MODALFRAME;
1436     ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_CAPTION;
1437     ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_SYSMENU;
1438     ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_POPUP;
1439     ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_DISABLED;
1440     ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_VISIBLE;
1441     ((MyDLGTEMPLATEEX*)pTemplateCopy)->style &= ~WS_THICKFRAME;
1442
1443     ((MyDLGTEMPLATEEX*)pTemplateCopy)->exStyle |= WS_EX_CONTROLPARENT;
1444   }
1445   else
1446   {
1447     pTemplateCopy->style |= WS_CHILD | WS_TABSTOP | DS_CONTROL;
1448     pTemplateCopy->style &= ~DS_MODALFRAME;
1449     pTemplateCopy->style &= ~WS_CAPTION;
1450     pTemplateCopy->style &= ~WS_SYSMENU;
1451     pTemplateCopy->style &= ~WS_POPUP;
1452     pTemplateCopy->style &= ~WS_DISABLED;
1453     pTemplateCopy->style &= ~WS_VISIBLE;
1454     pTemplateCopy->style &= ~WS_THICKFRAME;
1455
1456     pTemplateCopy->dwExtendedStyle |= WS_EX_CONTROLPARENT;
1457   }
1458
1459   if (psInfo->proppage[index].useCallback)
1460     (*(ppshpage->pfnCallback))(0, PSPCB_CREATE,
1461                                (LPPROPSHEETPAGEW)ppshpage);
1462
1463   if(ppshpage->dwFlags & PSP_INTERNAL_UNICODE)
1464      hwndPage = CreateDialogIndirectParamW(ppshpage->hInstance,
1465                                         pTemplateCopy,
1466                                         hwndParent,
1467                                         ppshpage->pfnDlgProc,
1468                                         (LPARAM)ppshpage);
1469   else
1470      hwndPage = CreateDialogIndirectParamA(ppshpage->hInstance,
1471                                         pTemplateCopy,
1472                                         hwndParent,
1473                                         ppshpage->pfnDlgProc,
1474                                         (LPARAM)ppshpage);
1475   /* Free a no more needed copy */
1476   Free(pTemplateCopy);
1477
1478   if(!hwndPage)
1479       return FALSE;
1480
1481   psInfo->proppage[index].hwndPage = hwndPage;
1482
1483   /* Subclass exterior wizard pages */
1484   if((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
1485      (psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
1486      (ppshpage->dwFlags & PSP_HIDEHEADER))
1487   {
1488       SetWindowSubclass(hwndPage, PROPSHEET_WizardSubclassProc, 1,
1489                         (DWORD_PTR)ppshpage);
1490   }
1491   if (!(psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD))
1492       EnableThemeDialogTexture (hwndPage, ETDT_ENABLETAB);
1493
1494   return TRUE;
1495 }
1496
1497 /******************************************************************************
1498  *            PROPSHEET_LoadWizardBitmaps
1499  *
1500  * Loads the watermark and header bitmaps for a wizard.
1501  */
1502 static VOID PROPSHEET_LoadWizardBitmaps(PropSheetInfo *psInfo)
1503 {
1504   if (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD))
1505   {
1506     /* if PSH_USEHBMWATERMARK is not set, load the resource from pszbmWatermark
1507        and put the HBITMAP in hbmWatermark. Thus all the rest of the code always
1508        considers hbmWatermark as valid. */
1509     if ((psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
1510         !(psInfo->ppshheader.dwFlags & PSH_USEHBMWATERMARK))
1511     {
1512       psInfo->ppshheader.u4.hbmWatermark =
1513         CreateMappedBitmap(psInfo->ppshheader.hInstance, (INT_PTR)psInfo->ppshheader.u4.pszbmWatermark, 0, NULL, 0);
1514     }
1515
1516     /* Same behavior as for watermarks */
1517     if ((psInfo->ppshheader.dwFlags & PSH_HEADER) &&
1518         !(psInfo->ppshheader.dwFlags & PSH_USEHBMHEADER))
1519     {
1520       psInfo->ppshheader.u5.hbmHeader =
1521         CreateMappedBitmap(psInfo->ppshheader.hInstance, (INT_PTR)psInfo->ppshheader.u5.pszbmHeader, 0, NULL, 0);
1522     }
1523   }
1524 }
1525
1526
1527 /******************************************************************************
1528  *            PROPSHEET_ShowPage
1529  *
1530  * Displays or creates the specified page.
1531  */
1532 static BOOL PROPSHEET_ShowPage(HWND hwndDlg, int index, PropSheetInfo * psInfo)
1533 {
1534   HWND hwndTabCtrl;
1535   HWND hwndLineHeader;
1536   HWND control;
1537   LPCPROPSHEETPAGEW ppshpage;
1538
1539   TRACE("active_page %d, index %d\n", psInfo->active_page, index);
1540   if (index == psInfo->active_page)
1541   {
1542       if (GetTopWindow(hwndDlg) != psInfo->proppage[index].hwndPage)
1543           SetWindowPos(psInfo->proppage[index].hwndPage, HWND_TOP, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE);
1544       return TRUE;
1545   }
1546
1547   ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
1548   if (psInfo->proppage[index].hwndPage == 0)
1549   {
1550      PROPSHEET_CreatePage(hwndDlg, index, psInfo, ppshpage);
1551   }
1552
1553   if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
1554   {
1555      PROPSHEET_SetTitleW(hwndDlg, psInfo->ppshheader.dwFlags,
1556                          psInfo->proppage[index].pszText);
1557
1558      control = GetNextDlgTabItem(psInfo->proppage[index].hwndPage, NULL, FALSE);
1559      if(control != NULL)
1560          SetFocus(control);
1561   }
1562
1563   if (psInfo->active_page != -1)
1564      ShowWindow(psInfo->proppage[psInfo->active_page].hwndPage, SW_HIDE);
1565
1566   ShowWindow(psInfo->proppage[index].hwndPage, SW_SHOW);
1567
1568   /* Synchronize current selection with tab control
1569    * It seems to be needed even in case of PSH_WIZARD (no tab controls there) */
1570   hwndTabCtrl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
1571   SendMessageW(hwndTabCtrl, TCM_SETCURSEL, index, 0);
1572
1573   psInfo->active_page = index;
1574   psInfo->activeValid = TRUE;
1575
1576   if (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW) )
1577   {
1578       hwndLineHeader = GetDlgItem(hwndDlg, IDC_SUNKEN_LINEHEADER);
1579       ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
1580
1581       if ((ppshpage->dwFlags & PSP_HIDEHEADER) || (!(psInfo->ppshheader.dwFlags & PSH_HEADER)) )
1582           ShowWindow(hwndLineHeader, SW_HIDE);
1583       else
1584           ShowWindow(hwndLineHeader, SW_SHOW);
1585   }
1586
1587   return TRUE;
1588 }
1589
1590 /******************************************************************************
1591  *            PROPSHEET_Back
1592  */
1593 static BOOL PROPSHEET_Back(HWND hwndDlg)
1594 {
1595   PSHNOTIFY psn;
1596   HWND hwndPage;
1597   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1598   LRESULT result;
1599   int idx;
1600
1601   TRACE("active_page %d\n", psInfo->active_page);
1602   if (psInfo->active_page < 0)
1603      return FALSE;
1604
1605   psn.hdr.code     = PSN_WIZBACK;
1606   psn.hdr.hwndFrom = hwndDlg;
1607   psn.hdr.idFrom   = 0;
1608   psn.lParam       = 0;
1609
1610   hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1611
1612   result = SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1613   if (result == -1)
1614     return FALSE;
1615   else if (result == 0)
1616      idx = psInfo->active_page - 1;
1617   else
1618      idx = PROPSHEET_FindPageByResId(psInfo, result);
1619
1620   if (idx >= 0 && idx < psInfo->nPages)
1621   {
1622      if (PROPSHEET_CanSetCurSel(hwndDlg))
1623      {
1624         SetFocus(GetDlgItem(hwndDlg, IDC_BACK_BUTTON));
1625         SendMessageW(hwndDlg, DM_SETDEFID, IDC_BACK_BUTTON, 0);
1626         PROPSHEET_SetCurSel(hwndDlg, idx, -1, 0);
1627      }
1628   }
1629   return TRUE;
1630 }
1631
1632 /******************************************************************************
1633  *            PROPSHEET_Next
1634  */
1635 static BOOL PROPSHEET_Next(HWND hwndDlg)
1636 {
1637   PSHNOTIFY psn;
1638   HWND hwndPage;
1639   LRESULT msgResult = 0;
1640   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1641   int idx;
1642
1643   TRACE("active_page %d\n", psInfo->active_page);
1644   if (psInfo->active_page < 0)
1645      return FALSE;
1646
1647   psn.hdr.code     = PSN_WIZNEXT;
1648   psn.hdr.hwndFrom = hwndDlg;
1649   psn.hdr.idFrom   = 0;
1650   psn.lParam       = 0;
1651
1652   hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1653
1654   msgResult = SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1655   if (msgResult == -1)
1656     return FALSE;
1657   else if (msgResult == 0)
1658      idx = psInfo->active_page + 1;
1659   else
1660      idx = PROPSHEET_FindPageByResId(psInfo, msgResult);
1661
1662   if (idx < psInfo->nPages )
1663   {
1664      if (PROPSHEET_CanSetCurSel(hwndDlg) != FALSE)
1665      {
1666         SetFocus(GetDlgItem(hwndDlg, IDC_NEXT_BUTTON));
1667         SendMessageW(hwndDlg, DM_SETDEFID, IDC_NEXT_BUTTON, 0);
1668         PROPSHEET_SetCurSel(hwndDlg, idx, 1, 0);
1669      }
1670   }
1671
1672   return TRUE;
1673 }
1674
1675 /******************************************************************************
1676  *            PROPSHEET_Finish
1677  */
1678 static BOOL PROPSHEET_Finish(HWND hwndDlg)
1679 {
1680   PSHNOTIFY psn;
1681   HWND hwndPage;
1682   LRESULT msgResult = 0;
1683   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1684
1685   TRACE("active_page %d\n", psInfo->active_page);
1686   if (psInfo->active_page < 0)
1687      return FALSE;
1688
1689   psn.hdr.code     = PSN_WIZFINISH;
1690   psn.hdr.hwndFrom = hwndDlg;
1691   psn.hdr.idFrom   = 0;
1692   psn.lParam       = 0;
1693
1694   hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1695
1696   msgResult = SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1697
1698   TRACE("msg result %ld\n", msgResult);
1699
1700   if (msgResult != 0)
1701     return FALSE;
1702
1703   if (psInfo->result == 0)
1704       psInfo->result = IDOK;
1705   if (psInfo->isModeless)
1706     psInfo->activeValid = FALSE;
1707   else
1708     psInfo->ended = TRUE;
1709
1710   return TRUE;
1711 }
1712
1713 /******************************************************************************
1714  *            PROPSHEET_Apply
1715  */
1716 static BOOL PROPSHEET_Apply(HWND hwndDlg, LPARAM lParam)
1717 {
1718   int i;
1719   HWND hwndPage;
1720   PSHNOTIFY psn;
1721   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1722
1723   TRACE("active_page %d\n", psInfo->active_page);
1724   if (psInfo->active_page < 0)
1725      return FALSE;
1726
1727   psn.hdr.hwndFrom = hwndDlg;
1728   psn.hdr.idFrom   = 0;
1729   psn.lParam       = 0;
1730
1731
1732   /*
1733    * Send PSN_KILLACTIVE to the current page.
1734    */
1735   psn.hdr.code = PSN_KILLACTIVE;
1736
1737   hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1738
1739   if (SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn) != FALSE)
1740     return FALSE;
1741
1742   /*
1743    * Send PSN_APPLY to all pages.
1744    */
1745   psn.hdr.code = PSN_APPLY;
1746   psn.lParam   = lParam;
1747
1748   for (i = 0; i < psInfo->nPages; i++)
1749   {
1750     hwndPage = psInfo->proppage[i].hwndPage;
1751     if (hwndPage)
1752     {
1753        switch (SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn))
1754        {
1755        case PSNRET_INVALID:
1756            PROPSHEET_ShowPage(hwndDlg, i, psInfo);
1757            /* fall through */
1758        case PSNRET_INVALID_NOCHANGEPAGE:
1759            return FALSE;
1760        }
1761     }
1762   }
1763
1764   if(lParam)
1765   {
1766      psInfo->activeValid = FALSE;
1767   }
1768   else if(psInfo->active_page >= 0)
1769   {
1770      psn.hdr.code = PSN_SETACTIVE;
1771      psn.lParam   = 0;
1772      hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1773      SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1774   }
1775
1776   return TRUE;
1777 }
1778
1779 /******************************************************************************
1780  *            PROPSHEET_Cancel
1781  */
1782 static void PROPSHEET_Cancel(HWND hwndDlg, LPARAM lParam)
1783 {
1784   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1785   HWND hwndPage;
1786   PSHNOTIFY psn;
1787   int i;
1788
1789   TRACE("active_page %d\n", psInfo->active_page);
1790   if (psInfo->active_page < 0)
1791      return;
1792
1793   hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1794   psn.hdr.code     = PSN_QUERYCANCEL;
1795   psn.hdr.hwndFrom = hwndDlg;
1796   psn.hdr.idFrom   = 0;
1797   psn.lParam       = 0;
1798
1799   if (SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn))
1800     return;
1801
1802   psn.hdr.code = PSN_RESET;
1803   psn.lParam   = lParam;
1804
1805   for (i = 0; i < psInfo->nPages; i++)
1806   {
1807     hwndPage = psInfo->proppage[i].hwndPage;
1808
1809     if (hwndPage)
1810        SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1811   }
1812
1813   if (psInfo->isModeless)
1814   {
1815      /* makes PSM_GETCURRENTPAGEHWND return NULL */
1816      psInfo->activeValid = FALSE;
1817   }
1818   else
1819     psInfo->ended = TRUE;
1820 }
1821
1822 /******************************************************************************
1823  *            PROPSHEET_Help
1824  */
1825 static void PROPSHEET_Help(HWND hwndDlg)
1826 {
1827   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1828   HWND hwndPage;
1829   PSHNOTIFY psn;
1830
1831   TRACE("active_page %d\n", psInfo->active_page);
1832   if (psInfo->active_page < 0)
1833      return;
1834
1835   hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1836   psn.hdr.code     = PSN_HELP;
1837   psn.hdr.hwndFrom = hwndDlg;
1838   psn.hdr.idFrom   = 0;
1839   psn.lParam       = 0;
1840
1841   SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1842 }
1843
1844 /******************************************************************************
1845  *            PROPSHEET_Changed
1846  */
1847 static void PROPSHEET_Changed(HWND hwndDlg, HWND hwndDirtyPage)
1848 {
1849   int i;
1850   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1851
1852   TRACE("\n");
1853   if (!psInfo) return;
1854   /*
1855    * Set the dirty flag of this page.
1856    */
1857   for (i = 0; i < psInfo->nPages; i++)
1858   {
1859     if (psInfo->proppage[i].hwndPage == hwndDirtyPage)
1860       psInfo->proppage[i].isDirty = TRUE;
1861   }
1862
1863   /*
1864    * Enable the Apply button.
1865    */
1866   if (psInfo->hasApply)
1867   {
1868     HWND hwndApplyBtn = GetDlgItem(hwndDlg, IDC_APPLY_BUTTON);
1869
1870     EnableWindow(hwndApplyBtn, TRUE);
1871   }
1872 }
1873
1874 /******************************************************************************
1875  *            PROPSHEET_UnChanged
1876  */
1877 static void PROPSHEET_UnChanged(HWND hwndDlg, HWND hwndCleanPage)
1878 {
1879   int i;
1880   BOOL noPageDirty = TRUE;
1881   HWND hwndApplyBtn = GetDlgItem(hwndDlg, IDC_APPLY_BUTTON);
1882   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1883
1884   TRACE("\n");
1885   if ( !psInfo ) return;
1886   for (i = 0; i < psInfo->nPages; i++)
1887   {
1888     /* set the specified page as clean */
1889     if (psInfo->proppage[i].hwndPage == hwndCleanPage)
1890       psInfo->proppage[i].isDirty = FALSE;
1891
1892     /* look to see if there's any dirty pages */
1893     if (psInfo->proppage[i].isDirty)
1894       noPageDirty = FALSE;
1895   }
1896
1897   /*
1898    * Disable Apply button.
1899    */
1900   if (noPageDirty)
1901     EnableWindow(hwndApplyBtn, FALSE);
1902 }
1903
1904 /******************************************************************************
1905  *            PROPSHEET_PressButton
1906  */
1907 static void PROPSHEET_PressButton(HWND hwndDlg, int buttonID)
1908 {
1909   TRACE("buttonID %d\n", buttonID);
1910   switch (buttonID)
1911   {
1912     case PSBTN_APPLYNOW:
1913       PROPSHEET_DoCommand(hwndDlg, IDC_APPLY_BUTTON);
1914       break;
1915     case PSBTN_BACK:
1916       PROPSHEET_Back(hwndDlg);
1917       break;
1918     case PSBTN_CANCEL:
1919       PROPSHEET_DoCommand(hwndDlg, IDCANCEL);
1920       break;
1921     case PSBTN_FINISH:
1922       PROPSHEET_Finish(hwndDlg);
1923       break;
1924     case PSBTN_HELP:
1925       PROPSHEET_DoCommand(hwndDlg, IDHELP);
1926       break;
1927     case PSBTN_NEXT:
1928       PROPSHEET_Next(hwndDlg);
1929       break;
1930     case PSBTN_OK:
1931       PROPSHEET_DoCommand(hwndDlg, IDOK);
1932       break;
1933     default:
1934       FIXME("Invalid button index %d\n", buttonID);
1935   }
1936 }
1937
1938
1939 /*************************************************************************
1940  * BOOL PROPSHEET_CanSetCurSel [Internal]
1941  *
1942  * Test whether the current page can be changed by sending a PSN_KILLACTIVE
1943  *
1944  * PARAMS
1945  *     hwndDlg        [I] handle to a Dialog hWnd
1946  *
1947  * RETURNS
1948  *     TRUE if Current Selection can change
1949  *
1950  * NOTES
1951  */
1952 static BOOL PROPSHEET_CanSetCurSel(HWND hwndDlg)
1953 {
1954   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1955   HWND hwndPage;
1956   PSHNOTIFY psn;
1957   BOOL res = FALSE;
1958
1959   if (!psInfo)
1960   {
1961      res = FALSE;
1962      goto end;
1963   }
1964
1965   TRACE("active_page %d\n", psInfo->active_page);
1966   if (psInfo->active_page < 0)
1967   {
1968      res = TRUE;
1969      goto end;
1970   }
1971
1972   /*
1973    * Notify the current page.
1974    */
1975   hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
1976   psn.hdr.code     = PSN_KILLACTIVE;
1977   psn.hdr.hwndFrom = hwndDlg;
1978   psn.hdr.idFrom   = 0;
1979   psn.lParam       = 0;
1980
1981   res = !SendMessageW(hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
1982
1983 end:
1984   TRACE("<-- %d\n", res);
1985   return res;
1986 }
1987
1988 /******************************************************************************
1989  *            PROPSHEET_SetCurSel
1990  */
1991 static BOOL PROPSHEET_SetCurSel(HWND hwndDlg,
1992                                 int index,
1993                                 int skipdir,
1994                                 HPROPSHEETPAGE hpage
1995                                 )
1996 {
1997   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
1998   HWND hwndHelp  = GetDlgItem(hwndDlg, IDHELP);
1999   HWND hwndTabControl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
2000
2001   TRACE("index %d, skipdir %d, hpage %p\n", index, skipdir, hpage);
2002   /* hpage takes precedence over index */
2003   if (hpage != NULL)
2004     index = PROPSHEET_GetPageIndex(hpage, psInfo);
2005
2006   if (index < 0 || index >= psInfo->nPages)
2007   {
2008     TRACE("Could not find page to select!\n");
2009     return FALSE;
2010   }
2011
2012   /* unset active page while doing this transition. */
2013   if (psInfo->active_page != -1)
2014      ShowWindow(psInfo->proppage[psInfo->active_page].hwndPage, SW_HIDE);
2015   psInfo->active_page = -1;
2016
2017   while (1) {
2018     int result;
2019     PSHNOTIFY psn;
2020     RECT rc;
2021     LPCPROPSHEETPAGEW ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
2022
2023     if (hwndTabControl)
2024         SendMessageW(hwndTabControl, TCM_SETCURSEL, index, 0);
2025
2026     psn.hdr.code     = PSN_SETACTIVE;
2027     psn.hdr.hwndFrom = hwndDlg;
2028     psn.hdr.idFrom   = 0;
2029     psn.lParam       = 0;
2030
2031     if (!psInfo->proppage[index].hwndPage) {
2032       if(!PROPSHEET_CreatePage(hwndDlg, index, psInfo, ppshpage)) {
2033         PROPSHEET_RemovePage(hwndDlg, index, NULL);
2034         if(index >= psInfo->nPages)
2035           index--;
2036         if(index < 0)
2037             return FALSE;
2038         continue;
2039       }
2040     }
2041
2042     /* Resize the property sheet page to the fit in the Tab control
2043      * (for regular property sheets) or to fit in the client area (for
2044      * wizards).
2045      * NOTE: The resizing happens every time the page is selected and
2046      * not only when it's created (some applications depend on it). */
2047     PROPSHEET_GetPageRect(psInfo, hwndDlg, &rc, ppshpage);
2048     TRACE("setting page %p, rc (%s) w=%d, h=%d\n",
2049           psInfo->proppage[index].hwndPage, wine_dbgstr_rect(&rc),
2050           rc.right - rc.left, rc.bottom - rc.top);
2051     SetWindowPos(psInfo->proppage[index].hwndPage, HWND_TOP,
2052                  rc.left, rc.top,
2053                  rc.right - rc.left, rc.bottom - rc.top, 0);
2054
2055     result = SendMessageW(psInfo->proppage[index].hwndPage, WM_NOTIFY, 0, (LPARAM) &psn);
2056     if (!result)
2057       break;
2058     if (result == -1) {
2059       index+=skipdir;
2060       if (index < 0) {
2061         index = 0;
2062         WARN("Tried to skip before first property sheet page!\n");
2063         break;
2064       }
2065       if (index >= psInfo->nPages) {
2066         WARN("Tried to skip after last property sheet page!\n");
2067         index = psInfo->nPages-1;
2068         break;
2069       }
2070     }
2071     else if (result != 0)
2072     {
2073       int old_index = index;
2074       index = PROPSHEET_FindPageByResId(psInfo, result);
2075       if(index >= psInfo->nPages) {
2076         index = old_index;
2077         WARN("Tried to skip to nonexistent page by res id\n");
2078         break;
2079       }
2080       continue;
2081     }
2082   }
2083
2084   /* Invalidate the header area */
2085   if ( (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
2086        (psInfo->ppshheader.dwFlags & PSH_HEADER) )
2087   {
2088     HWND hwndLineHeader = GetDlgItem(hwndDlg, IDC_SUNKEN_LINEHEADER);
2089     RECT r;
2090
2091     GetClientRect(hwndLineHeader, &r);
2092     MapWindowPoints(hwndLineHeader, hwndDlg, (LPPOINT) &r, 2);
2093     SetRect(&r, 0, 0, r.right + 1, r.top - 1);
2094
2095     InvalidateRect(hwndDlg, &r, TRUE);
2096   }
2097
2098   /*
2099    * Display the new page.
2100    */
2101   PROPSHEET_ShowPage(hwndDlg, index, psInfo);
2102
2103   if (psInfo->proppage[index].hasHelp)
2104     EnableWindow(hwndHelp, TRUE);
2105   else
2106     EnableWindow(hwndHelp, FALSE);
2107
2108   return TRUE;
2109 }
2110
2111 /******************************************************************************
2112  *            PROPSHEET_SetCurSelId
2113  *
2114  * Selects the page, specified by resource id.
2115  */
2116 static void PROPSHEET_SetCurSelId(HWND hwndDlg, int id)
2117 {
2118       int idx;
2119       PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2120
2121       idx = PROPSHEET_FindPageByResId(psInfo, id);
2122       if (idx < psInfo->nPages )
2123       {
2124           if (PROPSHEET_CanSetCurSel(hwndDlg) != FALSE)
2125               PROPSHEET_SetCurSel(hwndDlg, idx, 1, 0);
2126       }
2127 }
2128
2129 /******************************************************************************
2130  *            PROPSHEET_SetTitleA
2131  */
2132 static void PROPSHEET_SetTitleA(HWND hwndDlg, DWORD dwStyle, LPCSTR lpszText)
2133 {
2134   if(!IS_INTRESOURCE(lpszText))
2135   {
2136      WCHAR szTitle[256];
2137      MultiByteToWideChar(CP_ACP, 0, lpszText, -1,
2138                          szTitle, sizeof(szTitle)/sizeof(WCHAR));
2139      PROPSHEET_SetTitleW(hwndDlg, dwStyle, szTitle);
2140   }
2141   else
2142   {
2143      PROPSHEET_SetTitleW(hwndDlg, dwStyle, (LPCWSTR)lpszText);
2144   }
2145 }
2146
2147 /******************************************************************************
2148  *            PROPSHEET_SetTitleW
2149  */
2150 static void PROPSHEET_SetTitleW(HWND hwndDlg, DWORD dwStyle, LPCWSTR lpszText)
2151 {
2152   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2153   WCHAR szTitle[256];
2154
2155   TRACE("%s (style %08x)\n", debugstr_w(lpszText), dwStyle);
2156   if (IS_INTRESOURCE(lpszText)) {
2157     if (!LoadStringW(psInfo->ppshheader.hInstance,
2158                      LOWORD(lpszText), szTitle, sizeof(szTitle)/sizeof(szTitle[0])))
2159       return;
2160     lpszText = szTitle;
2161   }
2162   if (dwStyle & PSH_PROPTITLE)
2163   {
2164     WCHAR* dest;
2165     int lentitle = strlenW(lpszText);
2166     int lenprop  = strlenW(psInfo->strPropertiesFor);
2167
2168     dest = Alloc( (lentitle + lenprop + 1)*sizeof (WCHAR));
2169     wsprintfW(dest, psInfo->strPropertiesFor, lpszText);
2170
2171     SetWindowTextW(hwndDlg, dest);
2172     Free(dest);
2173   }
2174   else
2175     SetWindowTextW(hwndDlg, lpszText);
2176 }
2177
2178 /******************************************************************************
2179  *            PROPSHEET_SetFinishTextA
2180  */
2181 static void PROPSHEET_SetFinishTextA(HWND hwndDlg, LPCSTR lpszText)
2182 {
2183   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2184   HWND hwndButton = GetDlgItem(hwndDlg, IDC_FINISH_BUTTON);
2185
2186   TRACE("'%s'\n", lpszText);
2187   /* Set text, show and enable the Finish button */
2188   SetWindowTextA(hwndButton, lpszText);
2189   ShowWindow(hwndButton, SW_SHOW);
2190   EnableWindow(hwndButton, TRUE);
2191
2192   /* Make it default pushbutton */
2193   SendMessageW(hwndDlg, DM_SETDEFID, IDC_FINISH_BUTTON, 0);
2194
2195   /* Hide Back button */
2196   hwndButton = GetDlgItem(hwndDlg, IDC_BACK_BUTTON);
2197   ShowWindow(hwndButton, SW_HIDE);
2198
2199   if (!psInfo->hasFinish)
2200   {
2201     /* Hide Next button */
2202     hwndButton = GetDlgItem(hwndDlg, IDC_NEXT_BUTTON);
2203     ShowWindow(hwndButton, SW_HIDE);
2204   }
2205 }
2206
2207 /******************************************************************************
2208  *            PROPSHEET_SetFinishTextW
2209  */
2210 static void PROPSHEET_SetFinishTextW(HWND hwndDlg, LPCWSTR lpszText)
2211 {
2212   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2213   HWND hwndButton = GetDlgItem(hwndDlg, IDC_FINISH_BUTTON);
2214
2215   TRACE("%s\n", debugstr_w(lpszText));
2216   /* Set text, show and enable the Finish button */
2217   SetWindowTextW(hwndButton, lpszText);
2218   ShowWindow(hwndButton, SW_SHOW);
2219   EnableWindow(hwndButton, TRUE);
2220
2221   /* Make it default pushbutton */
2222   SendMessageW(hwndDlg, DM_SETDEFID, IDC_FINISH_BUTTON, 0);
2223
2224   /* Hide Back button */
2225   hwndButton = GetDlgItem(hwndDlg, IDC_BACK_BUTTON);
2226   ShowWindow(hwndButton, SW_HIDE);
2227
2228   if (!psInfo->hasFinish)
2229   {
2230     /* Hide Next button */
2231     hwndButton = GetDlgItem(hwndDlg, IDC_NEXT_BUTTON);
2232     ShowWindow(hwndButton, SW_HIDE);
2233   }
2234 }
2235
2236 /******************************************************************************
2237  *            PROPSHEET_QuerySiblings
2238  */
2239 static LRESULT PROPSHEET_QuerySiblings(HWND hwndDlg,
2240                                        WPARAM wParam, LPARAM lParam)
2241 {
2242   int i = 0;
2243   HWND hwndPage;
2244   LRESULT msgResult = 0;
2245   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2246
2247   while ((i < psInfo->nPages) && (msgResult == 0))
2248   {
2249     hwndPage = psInfo->proppage[i].hwndPage;
2250     msgResult = SendMessageW(hwndPage, PSM_QUERYSIBLINGS, wParam, lParam);
2251     i++;
2252   }
2253
2254   return msgResult;
2255 }
2256
2257
2258 /******************************************************************************
2259  *            PROPSHEET_AddPage
2260  */
2261 static BOOL PROPSHEET_AddPage(HWND hwndDlg,
2262                               HPROPSHEETPAGE hpage)
2263 {
2264   PropPageInfo * ppi;
2265   PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2266   HWND hwndTabControl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
2267   TCITEMW item;
2268   LPCPROPSHEETPAGEW ppsp = (LPCPROPSHEETPAGEW)hpage;
2269
2270   TRACE("hpage %p\n", hpage);
2271   /*
2272    * Allocate and fill in a new PropPageInfo entry.
2273    */
2274   ppi = ReAlloc(psInfo->proppage, sizeof(PropPageInfo) * (psInfo->nPages + 1));
2275   if (!ppi)
2276       return FALSE;
2277
2278   psInfo->proppage = ppi;
2279   if (!PROPSHEET_CollectPageInfo(ppsp, psInfo, psInfo->nPages, FALSE))
2280       return FALSE;
2281
2282   psInfo->proppage[psInfo->nPages].hpage = hpage;
2283
2284   if (ppsp->dwFlags & PSP_PREMATURE)
2285   {
2286      /* Create the page but don't show it */
2287      if(!PROPSHEET_CreatePage(hwndDlg, psInfo->nPages, psInfo, ppsp))
2288          return FALSE;
2289   }
2290
2291   /*
2292    * Add a new tab to the tab control.
2293    */
2294   item.mask = TCIF_TEXT;
2295   item.pszText = (LPWSTR) psInfo->proppage[psInfo->nPages].pszText;
2296   item.cchTextMax = MAX_TABTEXT_LENGTH;
2297
2298   if (psInfo->hImageList)
2299   {
2300     SendMessageW(hwndTabControl, TCM_SETIMAGELIST, 0, (LPARAM)psInfo->hImageList);
2301   }
2302
2303   if ( psInfo->proppage[psInfo->nPages].hasIcon )
2304   {
2305     item.mask |= TCIF_IMAGE;
2306     item.iImage = psInfo->nPages;
2307   }
2308
2309   SendMessageW(hwndTabControl, TCM_INSERTITEMW, psInfo->nPages + 1,
2310                (LPARAM)&item);
2311
2312   psInfo->nPages++;
2313
2314   /* If it is the only page - show it */
2315   if(psInfo->nPages == 1)
2316      PROPSHEET_SetCurSel(hwndDlg, 0, 1, 0);
2317   return TRUE;
2318 }
2319
2320 /******************************************************************************
2321  *            PROPSHEET_RemovePage
2322  */
2323 static BOOL PROPSHEET_RemovePage(HWND hwndDlg,
2324                                  int index,
2325                                  HPROPSHEETPAGE hpage)
2326 {
2327   PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2328   HWND hwndTabControl = GetDlgItem(hwndDlg, IDC_TABCONTROL);
2329   PropPageInfo* oldPages;
2330
2331   TRACE("index %d, hpage %p\n", index, hpage);
2332   if (!psInfo) {
2333     return FALSE;
2334   }
2335   /*
2336    * hpage takes precedence over index.
2337    */
2338   if (hpage != 0)
2339   {
2340     index = PROPSHEET_GetPageIndex(hpage, psInfo);
2341   }
2342
2343   /* Make sure that index is within range */
2344   if (index < 0 || index >= psInfo->nPages)
2345   {
2346       TRACE("Could not find page to remove!\n");
2347       return FALSE;
2348   }
2349
2350   TRACE("total pages %d removing page %d active page %d\n",
2351         psInfo->nPages, index, psInfo->active_page);
2352   /*
2353    * Check if we're removing the active page.
2354    */
2355   if (index == psInfo->active_page)
2356   {
2357     if (psInfo->nPages > 1)
2358     {
2359       if (index > 0)
2360       {
2361         /* activate previous page  */
2362         PROPSHEET_SetCurSel(hwndDlg, index - 1, -1, 0);
2363       }
2364       else
2365       {
2366         /* activate the next page */
2367         PROPSHEET_SetCurSel(hwndDlg, index + 1, 1, 0);
2368         psInfo->active_page = index;
2369       }
2370     }
2371     else
2372     {
2373       psInfo->active_page = -1;
2374       if (!psInfo->isModeless)
2375       {
2376          psInfo->ended = TRUE;
2377          return TRUE;
2378       }
2379     }
2380   }
2381   else if (index < psInfo->active_page)
2382     psInfo->active_page--;
2383
2384   /* Unsubclass the page dialog window */
2385   if((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD) &&
2386      (psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
2387      ((PROPSHEETPAGEW*)psInfo->proppage[index].hpage)->dwFlags & PSP_HIDEHEADER))
2388   {
2389      RemoveWindowSubclass(psInfo->proppage[index].hwndPage,
2390                           PROPSHEET_WizardSubclassProc, 1);
2391   }
2392
2393   /* Destroy page dialog window */
2394   DestroyWindow(psInfo->proppage[index].hwndPage);
2395
2396   /* Free page resources */
2397   if(psInfo->proppage[index].hpage)
2398   {
2399      PROPSHEETPAGEW* psp = (PROPSHEETPAGEW*)psInfo->proppage[index].hpage;
2400
2401      if (psp->dwFlags & PSP_USETITLE)
2402         Free ((LPVOID)psInfo->proppage[index].pszText);
2403
2404      DestroyPropertySheetPage(psInfo->proppage[index].hpage);
2405   }
2406
2407   /* Remove the tab */
2408   SendMessageW(hwndTabControl, TCM_DELETEITEM, index, 0);
2409
2410   oldPages = psInfo->proppage;
2411   psInfo->nPages--;
2412   psInfo->proppage = Alloc(sizeof(PropPageInfo) * psInfo->nPages);
2413
2414   if (index > 0)
2415     memcpy(&psInfo->proppage[0], &oldPages[0], index * sizeof(PropPageInfo));
2416
2417   if (index < psInfo->nPages)
2418     memcpy(&psInfo->proppage[index], &oldPages[index + 1],
2419            (psInfo->nPages - index) * sizeof(PropPageInfo));
2420
2421   Free(oldPages);
2422
2423   return FALSE;
2424 }
2425
2426 /******************************************************************************
2427  *            PROPSHEET_SetWizButtons
2428  *
2429  * This code will work if (and assumes that) the Next button is on top of the
2430  * Finish button. ie. Finish comes after Next in the Z order.
2431  * This means make sure the dialog template reflects this.
2432  *
2433  */
2434 static void PROPSHEET_SetWizButtons(HWND hwndDlg, DWORD dwFlags)
2435 {
2436   PropSheetInfo* psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2437   HWND hwndBack   = GetDlgItem(hwndDlg, IDC_BACK_BUTTON);
2438   HWND hwndNext   = GetDlgItem(hwndDlg, IDC_NEXT_BUTTON);
2439   HWND hwndFinish = GetDlgItem(hwndDlg, IDC_FINISH_BUTTON);
2440
2441   TRACE("%d\n", dwFlags);
2442
2443   EnableWindow(hwndBack, FALSE);
2444   EnableWindow(hwndNext, FALSE);
2445   EnableWindow(hwndFinish, FALSE);
2446
2447   /* set the default pushbutton to an enabled button */
2448   if (((dwFlags & PSWIZB_FINISH) || psInfo->hasFinish) && !(dwFlags & PSWIZB_DISABLEDFINISH))
2449     SendMessageW(hwndDlg, DM_SETDEFID, IDC_FINISH_BUTTON, 0);
2450   else if (dwFlags & PSWIZB_NEXT)
2451     SendMessageW(hwndDlg, DM_SETDEFID, IDC_NEXT_BUTTON, 0);
2452   else if (dwFlags & PSWIZB_BACK)
2453     SendMessageW(hwndDlg, DM_SETDEFID, IDC_BACK_BUTTON, 0);
2454   else
2455     SendMessageW(hwndDlg, DM_SETDEFID, IDCANCEL, 0);
2456
2457
2458   if (dwFlags & PSWIZB_BACK)
2459     EnableWindow(hwndBack, TRUE);
2460
2461   if (dwFlags & PSWIZB_NEXT)
2462     EnableWindow(hwndNext, TRUE);
2463
2464   if (!psInfo->hasFinish)
2465   {
2466     if ((dwFlags & PSWIZB_FINISH) || (dwFlags & PSWIZB_DISABLEDFINISH))
2467     {
2468       /* Hide the Next button */
2469       ShowWindow(hwndNext, SW_HIDE);
2470
2471       /* Show the Finish button */
2472       ShowWindow(hwndFinish, SW_SHOW);
2473
2474       if (!(dwFlags & PSWIZB_DISABLEDFINISH))
2475         EnableWindow(hwndFinish, TRUE);
2476     }
2477     else
2478     {
2479       /* Hide the Finish button */
2480       ShowWindow(hwndFinish, SW_HIDE);
2481       /* Show the Next button */
2482       ShowWindow(hwndNext, SW_SHOW);
2483     }
2484   }
2485   else if (!(dwFlags & PSWIZB_DISABLEDFINISH))
2486     EnableWindow(hwndFinish, TRUE);
2487 }
2488
2489 /******************************************************************************
2490  *            PROPSHEET_InsertPage
2491  */
2492 static BOOL PROPSHEET_InsertPage(HWND hwndDlg, HPROPSHEETPAGE hpageInsertAfter, HPROPSHEETPAGE hpage)
2493 {
2494     if (IS_INTRESOURCE(hpageInsertAfter))
2495         FIXME("(%p, %d, %p): stub\n", hwndDlg, LOWORD(hpageInsertAfter), hpage);
2496     else
2497         FIXME("(%p, %p, %p): stub\n", hwndDlg, hpageInsertAfter, hpage);
2498     return FALSE;
2499 }
2500
2501 /******************************************************************************
2502  *            PROPSHEET_SetHeaderTitleW
2503  */
2504 static void PROPSHEET_SetHeaderTitleW(HWND hwndDlg, int iPageIndex, LPCWSTR pszHeaderTitle)
2505 {
2506     FIXME("(%p, %d, %s): stub\n", hwndDlg, iPageIndex, debugstr_w(pszHeaderTitle));
2507 }
2508
2509 /******************************************************************************
2510  *            PROPSHEET_SetHeaderTitleA
2511  */
2512 static void PROPSHEET_SetHeaderTitleA(HWND hwndDlg, int iPageIndex, LPCSTR pszHeaderTitle)
2513 {
2514     FIXME("(%p, %d, %s): stub\n", hwndDlg, iPageIndex, debugstr_a(pszHeaderTitle));
2515 }
2516
2517 /******************************************************************************
2518  *            PROPSHEET_SetHeaderSubTitleW
2519  */
2520 static void PROPSHEET_SetHeaderSubTitleW(HWND hwndDlg, int iPageIndex, LPCWSTR pszHeaderSubTitle)
2521 {
2522     FIXME("(%p, %d, %s): stub\n", hwndDlg, iPageIndex, debugstr_w(pszHeaderSubTitle));
2523 }
2524
2525 /******************************************************************************
2526  *            PROPSHEET_SetHeaderSubTitleA
2527  */
2528 static void PROPSHEET_SetHeaderSubTitleA(HWND hwndDlg, int iPageIndex, LPCSTR pszHeaderSubTitle)
2529 {
2530     FIXME("(%p, %d, %s): stub\n", hwndDlg, iPageIndex, debugstr_a(pszHeaderSubTitle));
2531 }
2532
2533 /******************************************************************************
2534  *            PROPSHEET_HwndToIndex
2535  */
2536 static LRESULT PROPSHEET_HwndToIndex(HWND hwndDlg, HWND hPageDlg)
2537 {
2538     int index;
2539     PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2540
2541     TRACE("(%p, %p)\n", hwndDlg, hPageDlg);
2542
2543     for (index = 0; index < psInfo->nPages; index++)
2544         if (psInfo->proppage[index].hwndPage == hPageDlg)
2545             return index;
2546     WARN("%p not found\n", hPageDlg);
2547     return -1;
2548 }
2549
2550 /******************************************************************************
2551  *            PROPSHEET_IndexToHwnd
2552  */
2553 static LRESULT PROPSHEET_IndexToHwnd(HWND hwndDlg, int iPageIndex)
2554 {
2555     PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2556     TRACE("(%p, %d)\n", hwndDlg, iPageIndex);
2557     if (!psInfo)
2558         return 0;
2559     if (iPageIndex<0 || iPageIndex>=psInfo->nPages) {
2560         WARN("%d out of range.\n", iPageIndex);
2561         return 0;
2562     }
2563     return (LRESULT)psInfo->proppage[iPageIndex].hwndPage;
2564 }
2565
2566 /******************************************************************************
2567  *            PROPSHEET_PageToIndex
2568  */
2569 static LRESULT PROPSHEET_PageToIndex(HWND hwndDlg, HPROPSHEETPAGE hPage)
2570 {
2571     int index;
2572     PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2573
2574     TRACE("(%p, %p)\n", hwndDlg, hPage);
2575
2576     for (index = 0; index < psInfo->nPages; index++)
2577         if (psInfo->proppage[index].hpage == hPage)
2578             return index;
2579     WARN("%p not found\n", hPage);
2580     return -1;
2581 }
2582
2583 /******************************************************************************
2584  *            PROPSHEET_IndexToPage
2585  */
2586 static LRESULT PROPSHEET_IndexToPage(HWND hwndDlg, int iPageIndex)
2587 {
2588     PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2589     TRACE("(%p, %d)\n", hwndDlg, iPageIndex);
2590     if (iPageIndex<0 || iPageIndex>=psInfo->nPages) {
2591         WARN("%d out of range.\n", iPageIndex);
2592         return 0;
2593     }
2594     return (LRESULT)psInfo->proppage[iPageIndex].hpage;
2595 }
2596
2597 /******************************************************************************
2598  *            PROPSHEET_IdToIndex
2599  */
2600 static LRESULT PROPSHEET_IdToIndex(HWND hwndDlg, int iPageId)
2601 {
2602     int index;
2603     LPCPROPSHEETPAGEW psp;
2604     PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2605     TRACE("(%p, %d)\n", hwndDlg, iPageId);
2606     for (index = 0; index < psInfo->nPages; index++) {
2607         psp = (LPCPROPSHEETPAGEW)psInfo->proppage[index].hpage;
2608         if (psp->u.pszTemplate == MAKEINTRESOURCEW(iPageId))
2609             return index;
2610     }
2611
2612     return -1;
2613 }
2614
2615 /******************************************************************************
2616  *            PROPSHEET_IndexToId
2617  */
2618 static LRESULT PROPSHEET_IndexToId(HWND hwndDlg, int iPageIndex)
2619 {
2620     PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2621     LPCPROPSHEETPAGEW psp;
2622     TRACE("(%p, %d)\n", hwndDlg, iPageIndex);
2623     if (iPageIndex<0 || iPageIndex>=psInfo->nPages) {
2624         WARN("%d out of range.\n", iPageIndex);
2625         return 0;
2626     }
2627     psp = (LPCPROPSHEETPAGEW)psInfo->proppage[iPageIndex].hpage;
2628     if (psp->dwFlags & PSP_DLGINDIRECT || !IS_INTRESOURCE(psp->u.pszTemplate)) {
2629         return 0;
2630     }
2631     return (LRESULT)psp->u.pszTemplate;
2632 }
2633
2634 /******************************************************************************
2635  *            PROPSHEET_GetResult
2636  */
2637 static LRESULT PROPSHEET_GetResult(HWND hwndDlg)
2638 {
2639     PropSheetInfo * psInfo = GetPropW(hwndDlg, PropSheetInfoStr);
2640     return psInfo->result;
2641 }
2642
2643 /******************************************************************************
2644  *            PROPSHEET_RecalcPageSizes
2645  */
2646 static BOOL PROPSHEET_RecalcPageSizes(HWND hwndDlg)
2647 {
2648     FIXME("(%p): stub\n", hwndDlg);
2649     return FALSE;
2650 }
2651
2652 /******************************************************************************
2653  *            PROPSHEET_GetPageIndex
2654  *
2655  * Given a HPROPSHEETPAGE, returns the index of the corresponding page from
2656  * the array of PropPageInfo.
2657  */
2658 static int PROPSHEET_GetPageIndex(HPROPSHEETPAGE hpage, const PropSheetInfo* psInfo)
2659 {
2660   BOOL found = FALSE;
2661   int index = 0;
2662
2663   TRACE("hpage %p\n", hpage);
2664   while ((index < psInfo->nPages) && (found == FALSE))
2665   {
2666     if (psInfo->proppage[index].hpage == hpage)
2667       found = TRUE;
2668     else
2669       index++;
2670   }
2671
2672   if (found == FALSE)
2673     index = -1;
2674
2675   return index;
2676 }
2677
2678 /******************************************************************************
2679  *            PROPSHEET_CleanUp
2680  */
2681 static void PROPSHEET_CleanUp(HWND hwndDlg)
2682 {
2683   int i;
2684   PropSheetInfo* psInfo = RemovePropW(hwndDlg, PropSheetInfoStr);
2685
2686   TRACE("\n");
2687   if (!psInfo) return;
2688   if (!IS_INTRESOURCE(psInfo->ppshheader.pszCaption))
2689       Free ((LPVOID)psInfo->ppshheader.pszCaption);
2690
2691   for (i = 0; i < psInfo->nPages; i++)
2692   {
2693      PROPSHEETPAGEA* psp = (PROPSHEETPAGEA*)psInfo->proppage[i].hpage;
2694
2695      /* Unsubclass the page dialog window */
2696      if((psInfo->ppshheader.dwFlags & (PSH_WIZARD97_NEW | PSH_WIZARD97_OLD)) &&
2697         (psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
2698         (psp->dwFlags & PSP_HIDEHEADER))
2699      {
2700         RemoveWindowSubclass(psInfo->proppage[i].hwndPage,
2701                              PROPSHEET_WizardSubclassProc, 1);
2702      }
2703
2704      if(psInfo->proppage[i].hwndPage)
2705         DestroyWindow(psInfo->proppage[i].hwndPage);
2706
2707      if(psp)
2708      {
2709         if (psp->dwFlags & PSP_USETITLE)
2710            Free ((LPVOID)psInfo->proppage[i].pszText);
2711
2712         DestroyPropertySheetPage(psInfo->proppage[i].hpage);
2713      }
2714   }
2715
2716   DeleteObject(psInfo->hFont);
2717   DeleteObject(psInfo->hFontBold);
2718   /* If we created the bitmaps, destroy them */
2719   if ((psInfo->ppshheader.dwFlags & PSH_WATERMARK) &&
2720       (!(psInfo->ppshheader.dwFlags & PSH_USEHBMWATERMARK)) )
2721       DeleteObject(psInfo->ppshheader.u4.hbmWatermark);
2722   if ((psInfo->ppshheader.dwFlags & PSH_HEADER) &&
2723       (!(psInfo->ppshheader.dwFlags & PSH_USEHBMHEADER)) )
2724       DeleteObject(psInfo->ppshheader.u5.hbmHeader);
2725
2726   Free(psInfo->proppage);
2727   Free(psInfo->strPropertiesFor);
2728   ImageList_Destroy(psInfo->hImageList);
2729
2730   GlobalFree(psInfo);
2731 }
2732
2733 static INT do_loop(const PropSheetInfo *psInfo)
2734 {
2735     MSG msg;
2736     INT ret = -1;
2737     HWND hwnd = psInfo->hwnd;
2738
2739     while(IsWindow(hwnd) && !psInfo->ended && (ret = GetMessageW(&msg, NULL, 0, 0)))
2740     {
2741         if(ret == -1)
2742             break;
2743
2744         if(!IsDialogMessageW(hwnd, &msg))
2745         {
2746             TranslateMessage(&msg);
2747             DispatchMessageW(&msg);
2748         }
2749     }
2750
2751     if(ret == 0)
2752     {
2753         PostQuitMessage(msg.wParam);
2754         ret = -1;
2755     }
2756
2757     if(ret != -1)
2758         ret = psInfo->result;
2759
2760     DestroyWindow(hwnd);
2761     return ret;
2762 }
2763
2764 /******************************************************************************
2765  *            PROPSHEET_PropertySheet
2766  *
2767  * Common code between PropertySheetA/W
2768  */
2769 static INT_PTR PROPSHEET_PropertySheet(PropSheetInfo* psInfo, BOOL unicode)
2770 {
2771   INT_PTR bRet = 0;
2772   HWND parent = NULL;
2773   if (psInfo->active_page >= psInfo->nPages) psInfo->active_page = 0;
2774   TRACE("startpage: %d of %d pages\n", psInfo->active_page, psInfo->nPages);
2775
2776   psInfo->unicode = unicode;
2777   psInfo->ended = FALSE;
2778
2779   if(!psInfo->isModeless)
2780   {
2781       parent = psInfo->ppshheader.hwndParent;
2782       if (parent) EnableWindow(parent, FALSE);
2783   }
2784   bRet = PROPSHEET_CreateDialog(psInfo);
2785   if(!psInfo->isModeless)
2786   {
2787       bRet = do_loop(psInfo);
2788       if (parent) EnableWindow(parent, TRUE);
2789   }
2790   return bRet;
2791 }
2792
2793 /******************************************************************************
2794  *            PropertySheet    (COMCTL32.@)
2795  *            PropertySheetA   (COMCTL32.@)
2796  *
2797  * Creates a property sheet in the specified property sheet header.
2798  *
2799  * RETURNS
2800  *     Modal property sheets: Positive if successful or -1 otherwise.
2801  *     Modeless property sheets: Property sheet handle.
2802  *     Or:
2803  *| ID_PSREBOOTSYSTEM - The user must reboot the computer for the changes to take effect.
2804  *| ID_PSRESTARTWINDOWS - The user must restart Windows for the changes to take effect.
2805  */
2806 INT_PTR WINAPI PropertySheetA(LPCPROPSHEETHEADERA lppsh)
2807 {
2808   PropSheetInfo* psInfo = GlobalAlloc(GPTR, sizeof(PropSheetInfo));
2809   UINT i, n;
2810   const BYTE* pByte;
2811
2812   TRACE("(%p)\n", lppsh);
2813
2814   PROPSHEET_CollectSheetInfoA(lppsh, psInfo);
2815
2816   psInfo->proppage = Alloc(sizeof(PropPageInfo) * lppsh->nPages);
2817   pByte = (const BYTE*) psInfo->ppshheader.u3.ppsp;
2818
2819   for (n = i = 0; i < lppsh->nPages; i++, n++)
2820   {
2821     if (!psInfo->usePropPage)
2822       psInfo->proppage[n].hpage = psInfo->ppshheader.u3.phpage[i];
2823     else
2824     {
2825        psInfo->proppage[n].hpage = CreatePropertySheetPageA((LPCPROPSHEETPAGEA)pByte);
2826        pByte += ((LPCPROPSHEETPAGEA)pByte)->dwSize;
2827     }
2828
2829     if (!PROPSHEET_CollectPageInfo((LPCPROPSHEETPAGEW)psInfo->proppage[n].hpage,
2830                                psInfo, n, TRUE))
2831     {
2832         if (psInfo->usePropPage)
2833             DestroyPropertySheetPage(psInfo->proppage[n].hpage);
2834         n--;
2835         psInfo->nPages--;
2836     }
2837   }
2838
2839   return PROPSHEET_PropertySheet(psInfo, FALSE);
2840 }
2841
2842 /******************************************************************************
2843  *            PropertySheetW   (COMCTL32.@)
2844  *
2845  * See PropertySheetA.
2846  */
2847 INT_PTR WINAPI PropertySheetW(LPCPROPSHEETHEADERW lppsh)
2848 {
2849   PropSheetInfo* psInfo = GlobalAlloc(GPTR, sizeof(PropSheetInfo));
2850   UINT i, n;
2851   const BYTE* pByte;
2852
2853   TRACE("(%p)\n", lppsh);
2854
2855   PROPSHEET_CollectSheetInfoW(lppsh, psInfo);
2856
2857   psInfo->proppage = Alloc(sizeof(PropPageInfo) * lppsh->nPages);
2858   pByte = (const BYTE*) psInfo->ppshheader.u3.ppsp;
2859
2860   for (n = i = 0; i < lppsh->nPages; i++, n++)
2861   {
2862     if (!psInfo->usePropPage)
2863       psInfo->proppage[n].hpage = psInfo->ppshheader.u3.phpage[i];
2864     else
2865     {
2866        psInfo->proppage[n].hpage = CreatePropertySheetPageW((LPCPROPSHEETPAGEW)pByte);
2867        pByte += ((LPCPROPSHEETPAGEW)pByte)->dwSize;
2868     }
2869
2870     if (!PROPSHEET_CollectPageInfo((LPCPROPSHEETPAGEW)psInfo->proppage[n].hpage,
2871                                psInfo, n, TRUE))
2872     {
2873         if (psInfo->usePropPage)
2874             DestroyPropertySheetPage(psInfo->proppage[n].hpage);
2875         n--;
2876         psInfo->nPages--;
2877     }
2878   }
2879
2880   return PROPSHEET_PropertySheet(psInfo, TRUE);
2881 }
2882
2883 static LPWSTR load_string( HINSTANCE instance, LPCWSTR str )
2884 {
2885     LPWSTR ret;
2886
2887     if (IS_INTRESOURCE(str))
2888     {
2889         HRSRC hrsrc;
2890         HGLOBAL hmem;
2891         WCHAR *ptr;
2892         WORD i, id = LOWORD(str);
2893         UINT len;
2894
2895         if (!(hrsrc = FindResourceW( instance, MAKEINTRESOURCEW((id >> 4) + 1), (LPWSTR)RT_STRING )))
2896             return NULL;
2897         if (!(hmem = LoadResource( instance, hrsrc ))) return NULL;
2898         if (!(ptr = LockResource( hmem ))) return NULL;
2899         for (i = id & 0x0f; i > 0; i--) ptr += *ptr + 1;
2900         len = *ptr;
2901         if (!len) return NULL;
2902         ret = Alloc( (len + 1) * sizeof(WCHAR) );
2903         if (ret)
2904         {
2905             memcpy( ret, ptr + 1, len * sizeof(WCHAR) );
2906             ret[len] = 0;
2907         }
2908     }
2909     else
2910     {
2911         int len = (strlenW(str) + 1) * sizeof(WCHAR);
2912         ret = Alloc( len );
2913         if (ret) memcpy( ret, str, len );
2914     }
2915     return ret;
2916 }
2917
2918
2919 /******************************************************************************
2920  *            CreatePropertySheetPage    (COMCTL32.@)
2921  *            CreatePropertySheetPageA   (COMCTL32.@)
2922  *
2923  * Creates a new property sheet page.
2924  *
2925  * RETURNS
2926  *     Success: Handle to new property sheet page.
2927  *     Failure: NULL.
2928  *
2929  * NOTES
2930  *     An application must use the PSM_ADDPAGE message to add the new page to
2931  *     an existing property sheet.
2932  */
2933 HPROPSHEETPAGE WINAPI CreatePropertySheetPageA(
2934                           LPCPROPSHEETPAGEA lpPropSheetPage)
2935 {
2936   PROPSHEETPAGEW* ppsp = Alloc(sizeof(PROPSHEETPAGEW));
2937
2938   memcpy(ppsp,lpPropSheetPage,min(lpPropSheetPage->dwSize,sizeof(PROPSHEETPAGEA)));
2939
2940   ppsp->dwFlags &= ~ PSP_INTERNAL_UNICODE;
2941
2942     if ( !(ppsp->dwFlags & PSP_DLGINDIRECT) )
2943     {
2944         if (!IS_INTRESOURCE( ppsp->u.pszTemplate ))
2945         {
2946             int len = strlen(lpPropSheetPage->u.pszTemplate) + 1;
2947             char *template = Alloc( len );
2948
2949             ppsp->u.pszTemplate = (LPWSTR)strcpy( template, lpPropSheetPage->u.pszTemplate );
2950         }
2951     }
2952
2953     if (ppsp->dwFlags & PSP_USEICONID)
2954     {
2955         if (!IS_INTRESOURCE( ppsp->u2.pszIcon ))
2956             PROPSHEET_AtoW(&ppsp->u2.pszIcon, lpPropSheetPage->u2.pszIcon);
2957     }
2958
2959     if (ppsp->dwFlags & PSP_USETITLE)
2960     {
2961         if (!IS_INTRESOURCE( ppsp->pszTitle ))
2962             PROPSHEET_AtoW( &ppsp->pszTitle, lpPropSheetPage->pszTitle );
2963         else
2964             ppsp->pszTitle = load_string( ppsp->hInstance, ppsp->pszTitle );
2965     }
2966     else
2967         ppsp->pszTitle = NULL;
2968
2969     if (ppsp->dwFlags & PSP_HIDEHEADER)
2970         ppsp->dwFlags &= ~(PSP_USEHEADERTITLE | PSP_USEHEADERSUBTITLE);
2971
2972     if (ppsp->dwFlags & PSP_USEHEADERTITLE)
2973     {
2974         if (!IS_INTRESOURCE( ppsp->pszHeaderTitle ))
2975             PROPSHEET_AtoW(&ppsp->pszHeaderTitle, lpPropSheetPage->pszHeaderTitle);
2976         else
2977             ppsp->pszHeaderTitle = load_string( ppsp->hInstance, ppsp->pszHeaderTitle );
2978     }
2979     else
2980         ppsp->pszHeaderTitle = NULL;
2981
2982     if (ppsp->dwFlags & PSP_USEHEADERSUBTITLE)
2983     {
2984         if (!IS_INTRESOURCE( ppsp->pszHeaderSubTitle ))
2985             PROPSHEET_AtoW(&ppsp->pszHeaderSubTitle, lpPropSheetPage->pszHeaderSubTitle);
2986         else
2987             ppsp->pszHeaderSubTitle = load_string( ppsp->hInstance, ppsp->pszHeaderSubTitle );
2988     }
2989     else
2990         ppsp->pszHeaderSubTitle = NULL;
2991
2992     return (HPROPSHEETPAGE)ppsp;
2993 }
2994
2995 /******************************************************************************
2996  *            CreatePropertySheetPageW   (COMCTL32.@)
2997  *
2998  * See CreatePropertySheetA.
2999  */
3000 HPROPSHEETPAGE WINAPI CreatePropertySheetPageW(LPCPROPSHEETPAGEW lpPropSheetPage)
3001 {
3002   PROPSHEETPAGEW* ppsp = Alloc(sizeof(PROPSHEETPAGEW));
3003
3004   memcpy(ppsp,lpPropSheetPage,min(lpPropSheetPage->dwSize,sizeof(PROPSHEETPAGEW)));
3005
3006   ppsp->dwFlags |= PSP_INTERNAL_UNICODE;
3007
3008     if ( !(ppsp->dwFlags & PSP_DLGINDIRECT) )
3009     {
3010         if (!IS_INTRESOURCE( ppsp->u.pszTemplate ))
3011         {
3012             int len = strlenW(lpPropSheetPage->u.pszTemplate) + 1;
3013             WCHAR *template = Alloc( len * sizeof (WCHAR) );
3014
3015             ppsp->u.pszTemplate = strcpyW( template, lpPropSheetPage->u.pszTemplate );
3016         }
3017     }
3018
3019     if ( ppsp->dwFlags & PSP_USEICONID )
3020     {
3021         if (!IS_INTRESOURCE( ppsp->u2.pszIcon ))
3022         {
3023             int len = strlenW(lpPropSheetPage->u2.pszIcon) + 1;
3024             WCHAR *icon = Alloc( len * sizeof (WCHAR) );
3025
3026             ppsp->u2.pszIcon = strcpyW( icon, lpPropSheetPage->u2.pszIcon );
3027         }
3028     }
3029
3030     if (ppsp->dwFlags & PSP_USETITLE)
3031         ppsp->pszTitle = load_string( ppsp->hInstance, ppsp->pszTitle );
3032     else
3033         ppsp->pszTitle = NULL;
3034
3035     if (ppsp->dwFlags & PSP_HIDEHEADER)
3036         ppsp->dwFlags &= ~(PSP_USEHEADERTITLE | PSP_USEHEADERSUBTITLE);
3037
3038     if (ppsp->dwFlags & PSP_USEHEADERTITLE)
3039         ppsp->pszHeaderTitle = load_string( ppsp->hInstance, ppsp->pszHeaderTitle );
3040     else
3041         ppsp->pszHeaderTitle = NULL;
3042
3043     if (ppsp->dwFlags & PSP_USEHEADERSUBTITLE)
3044         ppsp->pszHeaderSubTitle = load_string( ppsp->hInstance, ppsp->pszHeaderSubTitle );
3045     else
3046         ppsp->pszHeaderSubTitle = NULL;
3047
3048     return (HPROPSHEETPAGE)ppsp;
3049 }
3050
3051 /******************************************************************************
3052  *            DestroyPropertySheetPage   (COMCTL32.@)
3053  *
3054  * Destroys a property sheet page previously created with
3055  * CreatePropertySheetA() or CreatePropertySheetW() and frees the associated
3056  * memory.
3057  *
3058  * RETURNS
3059  *     Success: TRUE
3060  *     Failure: FALSE
3061  */
3062 BOOL WINAPI DestroyPropertySheetPage(HPROPSHEETPAGE hPropPage)
3063 {
3064   PROPSHEETPAGEW *psp = (PROPSHEETPAGEW *)hPropPage;
3065
3066   if (!psp)
3067      return FALSE;
3068
3069   if (!(psp->dwFlags & PSP_DLGINDIRECT) && !IS_INTRESOURCE( psp->u.pszTemplate ))
3070      Free ((LPVOID)psp->u.pszTemplate);
3071
3072   if ((psp->dwFlags & PSP_USEICONID) && !IS_INTRESOURCE( psp->u2.pszIcon ))
3073      Free ((LPVOID)psp->u2.pszIcon);
3074
3075   if ((psp->dwFlags & PSP_USETITLE) && !IS_INTRESOURCE( psp->pszTitle ))
3076      Free ((LPVOID)psp->pszTitle);
3077
3078   if ((psp->dwFlags & PSP_USEHEADERTITLE) && !IS_INTRESOURCE( psp->pszHeaderTitle ))
3079      Free ((LPVOID)psp->pszHeaderTitle);
3080
3081   if ((psp->dwFlags & PSP_USEHEADERSUBTITLE) && !IS_INTRESOURCE( psp->pszHeaderSubTitle ))
3082      Free ((LPVOID)psp->pszHeaderSubTitle);
3083
3084   Free(hPropPage);
3085
3086   return TRUE;
3087 }
3088
3089 /******************************************************************************
3090  *            PROPSHEET_IsDialogMessage
3091  */
3092 static BOOL PROPSHEET_IsDialogMessage(HWND hwnd, LPMSG lpMsg)
3093 {
3094    PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3095
3096    TRACE("\n");
3097    if (!psInfo || (hwnd != lpMsg->hwnd && !IsChild(hwnd, lpMsg->hwnd)))
3098       return FALSE;
3099
3100    if (lpMsg->message == WM_KEYDOWN && (GetKeyState(VK_CONTROL) & 0x8000))
3101    {
3102       int new_page = 0;
3103       INT dlgCode = SendMessageW(lpMsg->hwnd, WM_GETDLGCODE, 0, (LPARAM)lpMsg);
3104
3105       if (!(dlgCode & DLGC_WANTMESSAGE))
3106       {
3107          switch (lpMsg->wParam)
3108          {
3109             case VK_TAB:
3110                if (GetKeyState(VK_SHIFT) & 0x8000)
3111                    new_page = -1;
3112                 else
3113                    new_page = 1;
3114                break;
3115
3116             case VK_NEXT:   new_page = 1;  break;
3117             case VK_PRIOR:  new_page = -1; break;
3118          }
3119       }
3120
3121       if (new_page)
3122       {
3123          if (PROPSHEET_CanSetCurSel(hwnd) != FALSE)
3124          {
3125             new_page += psInfo->active_page;
3126
3127             if (new_page < 0)
3128                new_page = psInfo->nPages - 1;
3129             else if (new_page >= psInfo->nPages)
3130                new_page = 0;
3131
3132             PROPSHEET_SetCurSel(hwnd, new_page, 1, 0);
3133          }
3134
3135          return TRUE;
3136       }
3137    }
3138
3139    return IsDialogMessageW(hwnd, lpMsg);
3140 }
3141
3142 /******************************************************************************
3143  *            PROPSHEET_DoCommand
3144  */
3145 static BOOL PROPSHEET_DoCommand(HWND hwnd, WORD wID)
3146 {
3147
3148     switch (wID) {
3149
3150     case IDOK:
3151     case IDC_APPLY_BUTTON:
3152         {
3153             HWND hwndApplyBtn = GetDlgItem(hwnd, IDC_APPLY_BUTTON);
3154
3155             if (PROPSHEET_Apply(hwnd, wID == IDOK ? 1: 0) == FALSE)
3156                 break;
3157
3158             if (wID == IDOK)
3159                 {
3160                     PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3161
3162                     /* don't overwrite ID_PSRESTARTWINDOWS or ID_PSREBOOTSYSTEM */
3163                     if (psInfo->result == 0)
3164                         psInfo->result = IDOK;
3165
3166                     if (psInfo->isModeless)
3167                         psInfo->activeValid = FALSE;
3168                     else
3169                         psInfo->ended = TRUE;
3170                 }
3171             else
3172                 EnableWindow(hwndApplyBtn, FALSE);
3173
3174             break;
3175         }
3176
3177     case IDC_BACK_BUTTON:
3178         PROPSHEET_Back(hwnd);
3179         break;
3180
3181     case IDC_NEXT_BUTTON:
3182         PROPSHEET_Next(hwnd);
3183         break;
3184
3185     case IDC_FINISH_BUTTON:
3186         PROPSHEET_Finish(hwnd);
3187         break;
3188
3189     case IDCANCEL:
3190         PROPSHEET_Cancel(hwnd, 0);
3191         break;
3192
3193     case IDHELP:
3194         PROPSHEET_Help(hwnd);
3195         break;
3196
3197     default:
3198         return FALSE;
3199     }
3200
3201     return TRUE;
3202 }
3203
3204 /******************************************************************************
3205  *            PROPSHEET_Paint
3206  */
3207 static LRESULT PROPSHEET_Paint(HWND hwnd, HDC hdcParam)
3208 {
3209     PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3210     PAINTSTRUCT ps;
3211     HDC hdc, hdcSrc;
3212     BITMAP bm;
3213     HBITMAP hbmp;
3214     HPALETTE hOldPal = 0;
3215     int offsety = 0;
3216     HBRUSH hbr;
3217     RECT r, rzone;
3218     LPCPROPSHEETPAGEW ppshpage;
3219     WCHAR szBuffer[256];
3220     int nLength;
3221
3222     hdc = hdcParam ? hdcParam : BeginPaint(hwnd, &ps);
3223     if (!hdc) return 1;
3224
3225     hdcSrc = CreateCompatibleDC(0);
3226
3227     if (psInfo->ppshheader.dwFlags & PSH_USEHPLWATERMARK)
3228         hOldPal = SelectPalette(hdc, psInfo->ppshheader.hplWatermark, FALSE);
3229
3230     if (psInfo->active_page < 0)
3231         ppshpage = NULL;
3232     else
3233         ppshpage = (LPCPROPSHEETPAGEW)psInfo->proppage[psInfo->active_page].hpage;
3234
3235     if ( (ppshpage && !(ppshpage->dwFlags & PSP_HIDEHEADER)) &&
3236          (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
3237          (psInfo->ppshheader.dwFlags & PSH_HEADER) )
3238     {
3239         HWND hwndLineHeader = GetDlgItem(hwnd, IDC_SUNKEN_LINEHEADER);
3240         HFONT hOldFont;
3241         COLORREF clrOld = 0;
3242         int oldBkMode = 0;
3243
3244         hbmp = SelectObject(hdcSrc, psInfo->ppshheader.u5.hbmHeader);
3245         hOldFont = SelectObject(hdc, psInfo->hFontBold);
3246
3247         GetClientRect(hwndLineHeader, &r);
3248         MapWindowPoints(hwndLineHeader, hwnd, (LPPOINT) &r, 2);
3249         SetRect(&rzone, 0, 0, r.right + 1, r.top - 1);
3250
3251         GetObjectW(psInfo->ppshheader.u5.hbmHeader, sizeof(BITMAP), &bm);
3252
3253         if (psInfo->ppshheader.dwFlags & PSH_WIZARD97_OLD)
3254         {
3255             /* Fill the unoccupied part of the header with color of the
3256              * left-top pixel, but do it only when needed.
3257              */
3258             if (bm.bmWidth < r.right || bm.bmHeight < r.bottom)
3259             {
3260                 hbr = CreateSolidBrush(GetPixel(hdcSrc, 0, 0));
3261                 CopyRect(&r, &rzone);
3262                 if (bm.bmWidth < r.right)
3263                 {
3264                     r.left = bm.bmWidth;
3265                     FillRect(hdc, &r, hbr);
3266                 }
3267                 if (bm.bmHeight < r.bottom)
3268                 {
3269                     r.left = 0;
3270                     r.top = bm.bmHeight;
3271                     FillRect(hdc, &r, hbr);
3272                 }
3273                 DeleteObject(hbr);
3274             }
3275
3276             /* Draw the header itself. */
3277             BitBlt(hdc, 0, 0,
3278                    bm.bmWidth, min(bm.bmHeight, rzone.bottom),
3279                    hdcSrc, 0, 0, SRCCOPY);
3280         }
3281         else
3282         {
3283             int margin;
3284             hbr = GetSysColorBrush(COLOR_WINDOW);
3285             FillRect(hdc, &rzone, hbr);
3286
3287             /* Draw the header bitmap. It's always centered like a
3288              * common 49 x 49 bitmap. */
3289             margin = (rzone.bottom - 49) / 2;
3290             BitBlt(hdc, rzone.right - 49 - margin, margin,
3291                    min(bm.bmWidth, 49), min(bm.bmHeight, 49),
3292                    hdcSrc, 0, 0, SRCCOPY);
3293
3294             /* NOTE: Native COMCTL32 draws a white stripe over the bitmap
3295              * if its height is smaller than 49 pixels. Because the reason
3296              * for this bug is unknown the current code doesn't try to
3297              * replicate it. */
3298         }
3299
3300         clrOld = SetTextColor (hdc, 0x00000000);
3301         oldBkMode = SetBkMode (hdc, TRANSPARENT);
3302
3303         if (ppshpage->dwFlags & PSP_USEHEADERTITLE) {
3304             SetRect(&r, 20, 10, 0, 0);
3305             if (!IS_INTRESOURCE(ppshpage->pszHeaderTitle))
3306                 DrawTextW(hdc, ppshpage->pszHeaderTitle, -1, &r, DT_LEFT | DT_SINGLELINE | DT_NOCLIP);
3307             else
3308             {
3309                 nLength = LoadStringW(ppshpage->hInstance, (UINT_PTR)ppshpage->pszHeaderTitle,
3310                                       szBuffer, 256);
3311                 if (nLength != 0)
3312                 {
3313                     DrawTextW(hdc, szBuffer, nLength, &r, DT_LEFT | DT_SINGLELINE | DT_NOCLIP);
3314                 }
3315             }
3316         }
3317
3318         if (ppshpage->dwFlags & PSP_USEHEADERSUBTITLE) {
3319             SelectObject(hdc, psInfo->hFont);
3320             SetRect(&r, 40, 25, rzone.right - 69, rzone.bottom);
3321             if (!IS_INTRESOURCE(ppshpage->pszHeaderTitle))
3322                 DrawTextW(hdc, ppshpage->pszHeaderSubTitle, -1, &r, DT_LEFT | DT_WORDBREAK);
3323             else
3324             {
3325                 nLength = LoadStringW(ppshpage->hInstance, (UINT_PTR)ppshpage->pszHeaderSubTitle,
3326                                       szBuffer, 256);
3327                 if (nLength != 0)
3328                 {
3329                     DrawTextW(hdc, szBuffer, nLength, &r, DT_LEFT | DT_WORDBREAK);
3330                 }
3331             }
3332         }
3333
3334         offsety = rzone.bottom + 2;
3335
3336         SetTextColor(hdc, clrOld);
3337         SetBkMode(hdc, oldBkMode);
3338         SelectObject(hdc, hOldFont);
3339         SelectObject(hdcSrc, hbmp);
3340     }
3341
3342     if ( (ppshpage && (ppshpage->dwFlags & PSP_HIDEHEADER)) &&
3343          (psInfo->ppshheader.dwFlags & (PSH_WIZARD97_OLD | PSH_WIZARD97_NEW)) &&
3344          (psInfo->ppshheader.dwFlags & PSH_WATERMARK) )
3345     {
3346         HWND hwndLine = GetDlgItem(hwnd, IDC_SUNKEN_LINE);
3347
3348         GetClientRect(hwndLine, &r);
3349         MapWindowPoints(hwndLine, hwnd, (LPPOINT) &r, 2);
3350
3351         rzone.left = 0;
3352         rzone.top = 0;
3353         rzone.right = r.right;
3354         rzone.bottom = r.top - 1;
3355
3356         hbr = GetSysColorBrush(COLOR_WINDOW);
3357         FillRect(hdc, &rzone, hbr);
3358
3359         GetObjectW(psInfo->ppshheader.u4.hbmWatermark, sizeof(BITMAP), &bm);
3360         hbmp = SelectObject(hdcSrc, psInfo->ppshheader.u4.hbmWatermark);
3361
3362         /* The watermark is truncated to a width of 164 pixels */
3363         r.right = min(r.right, 164);
3364         BitBlt(hdc, 0, offsety, min(bm.bmWidth, r.right),
3365                min(bm.bmHeight, r.bottom), hdcSrc, 0, 0, SRCCOPY);
3366
3367         /* If the bitmap is not big enough, fill the remaining area
3368            with the color of pixel (0,0) of bitmap - see MSDN */
3369         if (r.top > bm.bmHeight) {
3370             r.bottom = r.top - 1;
3371             r.top = bm.bmHeight;
3372             r.left = 0;
3373             r.right = bm.bmWidth;
3374             hbr = CreateSolidBrush(GetPixel(hdcSrc, 0, 0));
3375             FillRect(hdc, &r, hbr);
3376             DeleteObject(hbr);
3377         }
3378
3379         SelectObject(hdcSrc, hbmp);
3380     }
3381
3382     if (psInfo->ppshheader.dwFlags & PSH_USEHPLWATERMARK)
3383         SelectPalette(hdc, hOldPal, FALSE);
3384
3385     DeleteDC(hdcSrc);
3386
3387     if (!hdcParam) EndPaint(hwnd, &ps);
3388
3389     return 0;
3390 }
3391
3392 /******************************************************************************
3393  *            PROPSHEET_DialogProc
3394  */
3395 static INT_PTR CALLBACK
3396 PROPSHEET_DialogProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
3397 {
3398   TRACE("hwnd=%p msg=0x%04x wparam=%lx lparam=%lx\n",
3399         hwnd, uMsg, wParam, lParam);
3400
3401   switch (uMsg)
3402   {
3403     case WM_INITDIALOG:
3404     {
3405       PropSheetInfo* psInfo = (PropSheetInfo*) lParam;
3406       WCHAR* strCaption = Alloc(MAX_CAPTION_LENGTH*sizeof(WCHAR));
3407       HWND hwndTabCtrl = GetDlgItem(hwnd, IDC_TABCONTROL);
3408       int idx;
3409       LOGFONTW logFont;
3410
3411       /* Using PropSheetInfoStr to store extra data doesn't match the native
3412        * common control: native uses TCM_[GS]ETITEM
3413        */
3414       SetPropW(hwnd, PropSheetInfoStr, psInfo);
3415
3416       /*
3417        * psInfo->hwnd is not being used by WINE code - it exists
3418        * for compatibility with "real" Windoze. The same about
3419        * SetWindowLongPtr - WINE is only using the PropSheetInfoStr
3420        * property.
3421        */
3422       psInfo->hwnd = hwnd;
3423       SetWindowLongPtrW(hwnd, DWLP_USER, (DWORD_PTR)psInfo);
3424
3425       if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
3426       {
3427         /* set up the Next and Back buttons by default */
3428         PROPSHEET_SetWizButtons(hwnd, PSWIZB_BACK|PSWIZB_NEXT);
3429       }
3430
3431       /* Set up fonts */
3432       SystemParametersInfoW (SPI_GETICONTITLELOGFONT, 0, &logFont, 0);
3433       psInfo->hFont = CreateFontIndirectW (&logFont);
3434       logFont.lfWeight = FW_BOLD;
3435       psInfo->hFontBold = CreateFontIndirectW (&logFont);
3436
3437       /*
3438        * Small icon in the title bar.
3439        */
3440       if ((psInfo->ppshheader.dwFlags & PSH_USEICONID) ||
3441           (psInfo->ppshheader.dwFlags & PSH_USEHICON))
3442       {
3443         HICON hIcon;
3444         int icon_cx = GetSystemMetrics(SM_CXSMICON);
3445         int icon_cy = GetSystemMetrics(SM_CYSMICON);
3446
3447         if (psInfo->ppshheader.dwFlags & PSH_USEICONID)
3448           hIcon = LoadImageW(psInfo->ppshheader.hInstance,
3449                              psInfo->ppshheader.u.pszIcon,
3450                              IMAGE_ICON,
3451                              icon_cx, icon_cy,
3452                              LR_DEFAULTCOLOR);
3453         else
3454           hIcon = psInfo->ppshheader.u.hIcon;
3455
3456         SendMessageW(hwnd, WM_SETICON, 0, (LPARAM)hIcon);
3457       }
3458
3459       if (psInfo->ppshheader.dwFlags & PSH_USEHICON)
3460         SendMessageW(hwnd, WM_SETICON, 0, (LPARAM)psInfo->ppshheader.u.hIcon);
3461
3462       psInfo->strPropertiesFor = strCaption;
3463
3464       GetWindowTextW(hwnd, psInfo->strPropertiesFor, MAX_CAPTION_LENGTH);
3465
3466       PROPSHEET_CreateTabControl(hwnd, psInfo);
3467
3468       PROPSHEET_LoadWizardBitmaps(psInfo);
3469
3470       if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
3471       {
3472         ShowWindow(hwndTabCtrl, SW_HIDE);
3473         PROPSHEET_AdjustSizeWizard(hwnd, psInfo);
3474         PROPSHEET_AdjustButtonsWizard(hwnd, psInfo);
3475         SetFocus(GetDlgItem(hwnd, IDC_NEXT_BUTTON));
3476       }
3477       else
3478       {
3479         if (PROPSHEET_SizeMismatch(hwnd, psInfo))
3480         {
3481           PROPSHEET_AdjustSize(hwnd, psInfo);
3482           PROPSHEET_AdjustButtons(hwnd, psInfo);
3483         }
3484         SetFocus(GetDlgItem(hwnd, IDOK));
3485       }
3486
3487       if (IS_INTRESOURCE(psInfo->ppshheader.pszCaption) &&
3488               psInfo->ppshheader.hInstance)
3489       {
3490          WCHAR szText[256];
3491
3492          if (LoadStringW(psInfo->ppshheader.hInstance,
3493                          (UINT_PTR)psInfo->ppshheader.pszCaption, szText, 255))
3494             PROPSHEET_SetTitleW(hwnd, psInfo->ppshheader.dwFlags, szText);
3495       }
3496       else
3497       {
3498          PROPSHEET_SetTitleW(hwnd, psInfo->ppshheader.dwFlags,
3499                          psInfo->ppshheader.pszCaption);
3500       }
3501
3502
3503       if (psInfo->useCallback)
3504              (*(psInfo->ppshheader.pfnCallback))(hwnd, PSCB_INITIALIZED, 0);
3505
3506       idx = psInfo->active_page;
3507       psInfo->active_page = -1;
3508
3509       PROPSHEET_SetCurSel(hwnd, idx, 1, psInfo->proppage[idx].hpage);
3510
3511       /* doing TCM_SETCURSEL seems to be needed even in case of PSH_WIZARD,
3512        * as some programs call TCM_GETCURSEL to get the current selection
3513        * from which to switch to the next page */
3514       SendMessageW(hwndTabCtrl, TCM_SETCURSEL, psInfo->active_page, 0);
3515
3516       PROPSHEET_UnChanged(hwnd, NULL);
3517
3518       /* wizards set their focus during init */
3519       if (psInfo->ppshheader.dwFlags & INTRNL_ANY_WIZARD)
3520           return FALSE;
3521
3522       return TRUE;
3523     }
3524
3525     case WM_PRINTCLIENT:
3526     case WM_PAINT:
3527       PROPSHEET_Paint(hwnd, (HDC)wParam);
3528       return TRUE;
3529
3530     case WM_DESTROY:
3531       PROPSHEET_CleanUp(hwnd);
3532       return TRUE;
3533
3534     case WM_CLOSE:
3535       PROPSHEET_Cancel(hwnd, 1);
3536       return FALSE; /* let DefDlgProc post us WM_COMMAND/IDCANCEL */
3537
3538     case WM_COMMAND:
3539       if (!PROPSHEET_DoCommand(hwnd, LOWORD(wParam)))
3540       {
3541           PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3542
3543           if (!psInfo)
3544               return FALSE;
3545
3546           /* No default handler, forward notification to active page */
3547           if (psInfo->activeValid && psInfo->active_page != -1)
3548           {
3549              HWND hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
3550              SendMessageW(hwndPage, WM_COMMAND, wParam, lParam);
3551           }
3552       }
3553       return TRUE;
3554
3555     case WM_NOTIFY:
3556     {
3557       NMHDR* pnmh = (LPNMHDR) lParam;
3558
3559       if (pnmh->code == TCN_SELCHANGE)
3560       {
3561         int index = SendMessageW(pnmh->hwndFrom, TCM_GETCURSEL, 0, 0);
3562         PROPSHEET_SetCurSel(hwnd, index, 1, 0);
3563       }
3564
3565       if(pnmh->code == TCN_SELCHANGING)
3566       {
3567         BOOL bRet = PROPSHEET_CanSetCurSel(hwnd);
3568         SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, !bRet);
3569         return TRUE;
3570       }
3571
3572       return FALSE;
3573     }
3574
3575     case WM_SYSCOLORCHANGE:
3576       COMCTL32_RefreshSysColors();
3577       return FALSE;
3578
3579     case PSM_GETCURRENTPAGEHWND:
3580     {
3581       PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3582       HWND hwndPage = 0;
3583
3584       if (!psInfo)
3585         return FALSE;
3586
3587       if (psInfo->activeValid && psInfo->active_page != -1)
3588         hwndPage = psInfo->proppage[psInfo->active_page].hwndPage;
3589
3590       SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, (DWORD_PTR)hwndPage);
3591
3592       return TRUE;
3593     }
3594
3595     case PSM_CHANGED:
3596       PROPSHEET_Changed(hwnd, (HWND)wParam);
3597       return TRUE;
3598
3599     case PSM_UNCHANGED:
3600       PROPSHEET_UnChanged(hwnd, (HWND)wParam);
3601       return TRUE;
3602
3603     case PSM_GETTABCONTROL:
3604     {
3605       HWND hwndTabCtrl = GetDlgItem(hwnd, IDC_TABCONTROL);
3606
3607       SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, (DWORD_PTR)hwndTabCtrl);
3608
3609       return TRUE;
3610     }
3611
3612     case PSM_SETCURSEL:
3613     {
3614       BOOL msgResult;
3615
3616       msgResult = PROPSHEET_CanSetCurSel(hwnd);
3617       if(msgResult != FALSE)
3618       {
3619         msgResult = PROPSHEET_SetCurSel(hwnd,
3620                                        (int)wParam,
3621                                        1,
3622                                        (HPROPSHEETPAGE)lParam);
3623       }
3624
3625       SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3626
3627       return TRUE;
3628     }
3629
3630     case PSM_CANCELTOCLOSE:
3631     {
3632       WCHAR buf[MAX_BUTTONTEXT_LENGTH];
3633       HWND hwndOK = GetDlgItem(hwnd, IDOK);
3634       HWND hwndCancel = GetDlgItem(hwnd, IDCANCEL);
3635
3636       EnableWindow(hwndCancel, FALSE);
3637       if (LoadStringW(COMCTL32_hModule, IDS_CLOSE, buf, sizeof(buf)/sizeof(buf[0])))
3638          SetWindowTextW(hwndOK, buf);
3639
3640       return FALSE;
3641     }
3642
3643     case PSM_RESTARTWINDOWS:
3644     {
3645       PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3646
3647       if (!psInfo)
3648         return FALSE;
3649
3650       /* reboot system takes precedence over restart windows */
3651       if (psInfo->result != ID_PSREBOOTSYSTEM)
3652           psInfo->result = ID_PSRESTARTWINDOWS;
3653
3654       return TRUE;
3655     }
3656
3657     case PSM_REBOOTSYSTEM:
3658     {
3659       PropSheetInfo* psInfo = GetPropW(hwnd, PropSheetInfoStr);
3660
3661       if (!psInfo)
3662         return FALSE;
3663
3664       psInfo->result = ID_PSREBOOTSYSTEM;
3665
3666       return TRUE;
3667     }
3668
3669     case PSM_SETTITLEA:
3670       PROPSHEET_SetTitleA(hwnd, (DWORD) wParam, (LPCSTR) lParam);
3671       return TRUE;
3672
3673     case PSM_SETTITLEW:
3674       PROPSHEET_SetTitleW(hwnd, (DWORD) wParam, (LPCWSTR) lParam);
3675       return TRUE;
3676
3677     case PSM_APPLY:
3678     {
3679       BOOL msgResult = PROPSHEET_Apply(hwnd, 0);
3680
3681       SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3682
3683       return TRUE;
3684     }
3685
3686     case PSM_QUERYSIBLINGS:
3687     {
3688       LRESULT msgResult = PROPSHEET_QuerySiblings(hwnd, wParam, lParam);
3689
3690       SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3691
3692       return TRUE;
3693     }
3694
3695     case PSM_ADDPAGE:
3696     {
3697       /*
3698        * Note: MSVC++ 6.0 documentation says that PSM_ADDPAGE does not have
3699        *       a return value. This is not true. PSM_ADDPAGE returns TRUE
3700        *       on success or FALSE otherwise, as specified on MSDN Online.
3701        *       Also see the MFC code for
3702        *       CPropertySheet::AddPage(CPropertyPage* pPage).
3703        */
3704
3705       BOOL msgResult = PROPSHEET_AddPage(hwnd, (HPROPSHEETPAGE)lParam);
3706
3707       SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3708
3709       return TRUE;
3710     }
3711
3712     case PSM_REMOVEPAGE:
3713       PROPSHEET_RemovePage(hwnd, (int)wParam, (HPROPSHEETPAGE)lParam);
3714       return TRUE;
3715
3716     case PSM_ISDIALOGMESSAGE:
3717     {
3718        BOOL msgResult = PROPSHEET_IsDialogMessage(hwnd, (LPMSG)lParam);
3719        SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3720        return TRUE;
3721     }
3722
3723     case PSM_PRESSBUTTON:
3724       PROPSHEET_PressButton(hwnd, (int)wParam);
3725       return TRUE;
3726
3727     case PSM_SETFINISHTEXTA:
3728       PROPSHEET_SetFinishTextA(hwnd, (LPCSTR) lParam);
3729       return TRUE;
3730
3731     case PSM_SETWIZBUTTONS:
3732       PROPSHEET_SetWizButtons(hwnd, (DWORD)lParam);
3733       return TRUE;
3734
3735     case PSM_SETCURSELID:
3736         PROPSHEET_SetCurSelId(hwnd, (int)lParam);
3737         return TRUE;
3738
3739     case PSM_SETFINISHTEXTW:
3740         PROPSHEET_SetFinishTextW(hwnd, (LPCWSTR) lParam);
3741         return FALSE;
3742
3743     case PSM_INSERTPAGE:
3744     {
3745         BOOL msgResult = PROPSHEET_InsertPage(hwnd, (HPROPSHEETPAGE)wParam, (HPROPSHEETPAGE)lParam);
3746         SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3747         return TRUE;
3748     }
3749
3750     case PSM_SETHEADERTITLEW:
3751         PROPSHEET_SetHeaderTitleW(hwnd, (int)wParam, (LPCWSTR)lParam);
3752         return TRUE;
3753
3754     case PSM_SETHEADERTITLEA:
3755         PROPSHEET_SetHeaderTitleA(hwnd, (int)wParam, (LPCSTR)lParam);
3756         return TRUE;
3757
3758     case PSM_SETHEADERSUBTITLEW:
3759         PROPSHEET_SetHeaderSubTitleW(hwnd, (int)wParam, (LPCWSTR)lParam);
3760         return TRUE;
3761
3762     case PSM_SETHEADERSUBTITLEA:
3763         PROPSHEET_SetHeaderSubTitleA(hwnd, (int)wParam, (LPCSTR)lParam);
3764         return TRUE;
3765
3766     case PSM_HWNDTOINDEX:
3767     {
3768         LRESULT msgResult = PROPSHEET_HwndToIndex(hwnd, (HWND)wParam);
3769         SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3770         return TRUE;
3771     }
3772
3773     case PSM_INDEXTOHWND:
3774     {
3775         LRESULT msgResult = PROPSHEET_IndexToHwnd(hwnd, (int)wParam);
3776         SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3777         return TRUE;
3778     }
3779
3780     case PSM_PAGETOINDEX:
3781     {
3782         LRESULT msgResult = PROPSHEET_PageToIndex(hwnd, (HPROPSHEETPAGE)wParam);
3783         SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3784         return TRUE;
3785     }
3786
3787     case PSM_INDEXTOPAGE:
3788     {
3789         LRESULT msgResult = PROPSHEET_IndexToPage(hwnd, (int)wParam);
3790         SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3791         return TRUE;
3792     }
3793
3794     case PSM_IDTOINDEX:
3795     {
3796         LRESULT msgResult = PROPSHEET_IdToIndex(hwnd, (int)lParam);
3797         SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3798         return TRUE;
3799     }
3800
3801     case PSM_INDEXTOID:
3802     {
3803         LRESULT msgResult = PROPSHEET_IndexToId(hwnd, (int)wParam);
3804         SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3805         return TRUE;
3806     }
3807
3808     case PSM_GETRESULT:
3809     {
3810         LRESULT msgResult = PROPSHEET_GetResult(hwnd);
3811         SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3812         return TRUE;
3813     }
3814
3815     case PSM_RECALCPAGESIZES:
3816     {
3817         LRESULT msgResult = PROPSHEET_RecalcPageSizes(hwnd);
3818         SetWindowLongPtrW(hwnd, DWLP_MSGRESULT, msgResult);
3819         return TRUE;
3820     }
3821
3822     default:
3823       return FALSE;
3824   }
3825 }