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