向导对话框[转]

很久以前在网上看到的一片文章，忘了是谁写的了，觉得很好，所以在这里转载。

首先要了解的是CPropertySheet实际上是由一个TabCtrl加多个Page和多个按钮组成
这里强调一点，DoModal的时候并没有把所有的PAGE都创建出来，只有在SetActivePage的时候才创建
所以如果你初始化的代码在OnInitDialog，那么刚开始最好先用SetActivePage切换一下

在讲述之前，大家可以先看看《深入浅出CPropertySheet》（翻译的不错）
http://www.vckbase.com/document/viewdoc/?id=427
其实原文后面还有一个例子，不过原理上帖中也表现出来了，就是窗口的移动MoveWindow和HeaderCtrl的创建等
参见 http://www.codeguru.com/Cpp/controls/propertysheet/article.php/c3973/
所以在此一些简单按钮的隐藏和移动及其Enable使能就不多说了

一、布局修改
a.修改字体
重载OnInitDialog,CreateFont创建字体pFont
SendMessageToDescendants(WM_SETFONT, (WPARAM)pFont->GetSafeHandle(), TRUE);
如果字体的改变（如高度、宽度）可能需要改变控件的位置，这样看起来才和谐一点，参见
Prpfont.exe sample demonstrates how to set the desired font for your CPropertyPages in Visual C++
http://support.microsoft.com/default.aspx?scid=kb;en-us;142170

b.设置初始的焦点
GetPage(0)->SetModified ();//使应用按钮有效
SendMessage(DM_SETDEFID,ID_APPLY_NOW); //也可设置到自己添加的按钮中

c.改变大小Resizable(这类文章和发问比较多，所以主要帖URL，见谅)
使用ResizableLib（适用于几乎所有窗口，Dialog,PropSheet,SDI,MDI等）
http://www.codeproject.com/dialog/ResizableLib.asp
也可参看Resizable CPropertySheet
http://www.codeproject.com/property/resizableproperties.asp
http://www.codeguru.com/Cpp/controls/propertysheet/sizing/article.php/c599/
运行期间动态进行调整大小，避免切换后又恢复原来大小，参见
http://support.microsoft.com/default.aspx?scid=kb;en-us;143291

注：如果自己在OnInitDialog做MoveWindow的时候要记住代码放到CPropertySheet::OnInitDialog();后

d.向导方式
最简单的就是设置模式 SetWizardMode //注意最前和最后页的SetWizardButtons
后来添加了Wizard97 风格，主要有两块地方填充的，左边的叫WATERMARK和上部的叫HEADER
注：左边和上部一般不能同时显示，所以要想显示WATERMARK，需要在PAGE中设置PSP_HIDEHEADER风格（VC7默认才设了）

添加WIZARD97风格，同时设置对应的位图
psh.dwFlags =  PSH_WIZARD97|PSH_WATERMARK|PSH_HEADER;
psh.pszbmWatermark = MAKEINTRESOURCE(IDB_WATERMARK);
psh.pszbmHeader =    MAKEINTRESOURCE(IDB_BANNER);

如果要HEADER中显示文本TITLE也可设置PSP_USEHEADERTITLE和PSP_USEHEADERSUBTITLE，如
psp.dwFlags =           PSP_DEFAULT|PSP_USEHEADERTITLE|PSP_USEHEADERSUBTITLE;
psp.pszHeaderTitle =    MAKEINTRESOURCE(IDS_TITLE1);
psp.pszHeaderSubTitle = MAKEINTRESOURCE(IDS_SUBTITLE1);

更多的详情有兴趣的可自行搜索，如6.0版本中PROPSHEETPAGE新添的hActCtx等，在此点到为止

e.内嵌入对话框中和Modeless
ps.Create(this);//如果要内嵌添加,WS_CHILD|WS_VISIBLE
ps.ShowWindow(SW_SHOW);
但这时候出来的是没有标准按钮，想要添加可重载OnInitDialog
BOOL CMySheet::OnInitDialog()
{
   m_bModeless = FALSE;
   m_nFlags |= WF_CONTINUEMODAL;

   BOOL bResult = CPropertySheet::OnInitDialog();

   m_bModeless = TRUE;
   m_nFlags &= ~WF_CONTINUEMODAL;
   return bResult;
}
P.S.焦点切换后子属性框(modeless)僵死,请在OnInitDialog中添加
ModifyStyleEx(0,WS_EX_CONTROLPARENT);

二、标签TabCtrl的操作
a.修改Text
有三种方法
m_pPage1=newCPage1(IDS_MYCAPTION);//idofstringresource

m_pPage1->m_psp.dwFlags|=PSP_USETITLE;
m_pPage1->m_psp.pszTitle=_T("MyCaption");

运行时也可修改标签
TC_ITEM ti;
ti.mask=TCIF_TEXT;
ti.pszText=pszText;
VERIFY(GetTabControl()->SetItem(nPage,&ti));

b.Tab使用Scrollbar而不是用多行
EnableStackedTabs(FALSE);即可，原理就是GetTabControl()->ModifyStyle(TCS_MULTILINE, TCS_SINGLELINE)

c.如何调整标签位置(下面或者左右)一般自画，参考：
http://www.codeguru.com/Cpp/controls/controls/tabcontrols/article.php/c6385/

d.Disable Tab中如果要重画TabItem使其看起来灰化，也可以看Paul的CTabCtrlWithDisable
http://www.microsoft.com/msj/0398/c0398.aspx

e.CPropertySheet页中的标题栏中显示指定数量的属性页，如：标题栏要求每行显示5个属性页
可使用 MutliRowTabView 参见 http://www.codeguru.com/Cpp/controls/propertysheet/article.php/c623/

三、消息的响应
a.获得CPropertySheet的WM_CLOSE消息
http://dev.csdn.net/develop/article/35/35982.shtm比较简便地实现了此功能,
但需要覆盖每个属性页的OnApply函数,且不利于宏观同步未完成的任务.
现提供一个通过覆盖CMyPropertySheet类的OnCommand函数实现此功能的方法.
OnCommand的实现代码如下:
BOOL CMyPropertySheet::OnCommand(WPARA MwParam,LPARAM lParam)

b.NOTIFY的响应 如:Disable 某个TAB
BOOL CMySheet::OnNotify(WPARAM wParam, LPARAM lParam, LRESULT* pResult)
   {
       NMHDR* pnmh = (NMHDR*)lParam;
       // tab is about to change
       if (TCN_SELCHANGING == pnmh->code)
           // save the current page index
           m_nLastActive = GetActiveIndex ();
       // tab has been changed
       else if (TCN_SELCHANGE == pnmh->code)
       {
           // get the current page index
           int nCurrentPage = GetActiveIndex ();
           // if current page is in our map of disabled pages
           if (m_DisabledPages.Lookup (nCurrentPage, nCurrentPage))
           // activate the previous page
           PostMessage (PSM_SETCURSEL, m_nLastActive);
       }
       return CPropertySheet::OnNotify(wParam, lParam, pResult);
   }

c.如何响应上下文帮助  
Title Bar添加问号(?)按钮的响应：添加WN_HELP响应
ON_WM_HELPINFO()//添加函数BOOL OnHelpInfo(HELPINFO*)
如果响应底部的帮助按钮（原理：一般按钮的点击映射）
ON_COMMAND(IDHELP, OnHelp)//添加函数BOOL OnHelp()

将标签对话框作为一个控件在对话框中实现也是现在比较常见的用户界面，见图5实现的示例。通过它可以将几个不同的模块在一个界面中同用户交互来实现功能，简洁明快和设置手段集中是它的特点。实现的方法简述如下：

①完成标签对话框中标签页的设计，这里我们举例有三个标签页，分别为CPage1、 CPage2和CPage3三个CPropertyPage的派生类；

②在项目中新建一个将包含标签对话框控件的对话框模版，相应的对话框派生类为CDlg，在该模版中加入除标签对话框外的其他控件，布局要考虑清楚。

③在对话框中希望出现标签对话框的位置上放置一个Picture控件，资源ID命名为IDC_STATICPIC，其type为Frame，其余的取缺省值；该Picture控件的尺寸是与前面设计好的标签页的大小有关，经验的方法可以做：找到最大的标签页，在其上放置一个覆盖全部控件域的Picture控件，考察它的Width和Height，前面提到的IDC_STATICPIC的高度与Height近似，宽度比Width略小；当然这里只是一个指导性的方法，具体的Width和Height应该视情况在程序中进行调整，方能做到结果满意。

④在CDlg类中加入下列公有成员数据：

public:

CPropertySheet m_sheet；

CPage1 m_page1；

CPage2 m_page2；

CPage3 m_page3；

⑤在CDlg类中重载WM_INITDIALOG消息的处理函数OnInitDialog，加入下面的代码：

// TODO: Add extra initialization here

m_sheet.AddPage(&m_page1)；

m_sheet.AddPage(&m_page2)；

m_sheet.AddPage(&m_page3)；

//创建标签对话框控件

m_sheet.Create(this, WS_CHILD | WS_VISIBLE, 0)；

//使Tab键消息有效，可以通过Tab键转移输入焦点

m_sheet.ModifyStyleEx (0, WS_EX_CONTROLPARENT)；

m_sheet.ModifyStyle( 0, WS_TABSTOP )；

//确定标签对话框控件在对话框中出现的位置

CRect rcSheet；

GetDlgItem( IDC_STATICPIC )->GetWindowRect( &rcSheet )；

ScreenToClient( &rcSheet )；

m_sheet.SetWindowPos( NULL,rcSheet.left, rcSheet.top, 0, 0,

SWP_NOZORDER | SWP_NOSIZE | SWP_NOACTIVATE )；

至此工作已经完成，值得注意的是，关于标签对话框出现的位置和大小是一个相对棘手的问题，需要在编程时慢慢模索，还有要想保留在标签对话框中的设置，则需要在对话框的DoModal()返回值为IDOK时进行相应的编程。