Re: Change Property Sheet Size?

The OnSize method of the propertysheet class would be a good place to resize
the tab and the pages. The article I posted describes this. The apply it
to a propertysheet that gets resized by the user, your is getting resized by
the programmer, subtract the code that puts the resize ancher on the bottom
of the dialog and the rest is exactly the same.

Here is the answer all spelled out:
//////////////////////////// CMyPropertySheet.h
/////////////////////////////////
#pragma once

// CMyPropertySheet

class CMyPropertySheet : public CPropertySheet
{
 DECLARE_DYNAMIC(CMyPropertySheet)

public:
   CMyPropertySheet();
   CMyPropertySheet(UINT nIDCaption, CWnd* pParentWnd = NULL, UINT
iSelectPage = 0);
   CMyPropertySheet(LPCTSTR pszCaption, CWnd* pParentWnd = NULL, UINT
iSelectPage = 0);
   virtual ~CMyPropertySheet();

protected:
   BOOL m_bNeedInit;
   CRect m_rCrt;

   virtual BOOL OnInitDialog();
   afx_msg void OnSize(UINT nType, int cx, int cy);
   DECLARE_MESSAGE_MAP()
};

//////////////////////////// CMyPropertySheet.cpp
/////////////////////////////////
// MyPropertySheet.cpp : implementation file
//

#include "stdafx.h"
#include "MyPropertySheet.h"
#include ".\mypropertysheet.h"

// CMyPropertySheet

IMPLEMENT_DYNAMIC(CMyPropertySheet, CPropertySheet)

CMyPropertySheet::CMyPropertySheet()
: m_bNeedInit(TRUE)
{
}

CMyPropertySheet::CMyPropertySheet(UINT nIDCaption, CWnd* pParentWnd, UINT
iSelectPage)
:CPropertySheet(nIDCaption, pParentWnd, iSelectPage)
, m_bNeedInit(TRUE)
{
}

CMyPropertySheet::CMyPropertySheet(LPCTSTR pszCaption, CWnd* pParentWnd,
UINT iSelectPage)
: CPropertySheet(pszCaption, pParentWnd, iSelectPage)
, m_bNeedInit(TRUE)
{
}

CMyPropertySheet::~CMyPropertySheet()
{
}

BEGIN_MESSAGE_MAP(CMyPropertySheet, CPropertySheet)
   ON_WM_SIZE()
END_MESSAGE_MAP()

// CMyPropertySheet message handlers

BOOL CMyPropertySheet::OnInitDialog()
{
   BOOL bResult = CPropertySheet::OnInitDialog();

   m_bNeedInit = FALSE;
   GetClientRect(&m_rCrt);

   return bResult;
}

// Handle WM_SIZE events by resizing the tab control and by
// moving all the buttons on the property sheet.
void CMyPropertySheet::OnSize(UINT nType, int cx, int cy)
{
   CRect r1;
   CPropertySheet::OnSize(nType, cx, cy);

   if (m_bNeedInit)
      return;

   CTabCtrl *pTab = GetTabControl();
   ASSERT(NULL != pTab && IsWindow(pTab->m_hWnd));

   int dx = cx - m_rCrt.Width();
   int dy = cy - m_rCrt.Height();
   GetClientRect(&m_rCrt);

   HDWP hDWP = ::BeginDeferWindowPos(5);

   pTab->GetClientRect(&r1);
   r1.right += dx; r1.bottom += dy;
   ::DeferWindowPos(hDWP, pTab->m_hWnd, NULL,
                    0, 0, r1.Width(), r1.Height(),
                    SWP_NOACTIVATE|SWP_NOMOVE|SWP_NOZORDER);

   // Move all buttons with the lower right sides
   for (CWnd *pChild = GetWindow(GW_CHILD);
        pChild != NULL;
        pChild = pChild->GetWindow(GW_HWNDNEXT))
   {
      if (pChild->SendMessage(WM_GETDLGCODE) & DLGC_BUTTON)
      {
         pChild->GetWindowRect(&r1); ScreenToClient(&r1);
         r1.top += dy; r1.bottom += dy; r1.left+= dx; r1.right += dx;
         ::DeferWindowPos(hDWP, pChild->m_hWnd, NULL,
                          r1.left, r1.top, 0, 0,
                          SWP_NOACTIVATE|SWP_NOSIZE|SWP_NOZORDER);
      }
      // Resize everything else...
      else
      {
         pChild->GetClientRect(&r1);
       r1.right += dx; r1.bottom += dy;
       ::DeferWindowPos(hDWP, pChild->m_hWnd, NULL, 0, 0, r1.Width(),
r1.Height(),SWP_NOACTIVATE|SWP_NOMOVE|SWP_NOZORDER);
      }

   }

   ::EndDeferWindowPos(hDWP);
}

And you can change the layout of the controls on your propertypages in the
OnSize handler of each of your PropertyPage classes.

AliR.
"rockdale" <rockdale.green@gmail.com> wrote in message
news:977bf1d6-96a3-4f1c-80b9-371186785272@v38g2000yqb.googlegroups.com...