关于MFC的Tab Control控件的

1. 新建一个MFC工程, 取名MyTab, 选择Dialog based, 然后Finish. 2. 删除对话框上默认添加的三个控件. 添加Tab Control控件并在Property属性中设置ID为IDC_TABTEST 在More Styles里勾上Bottom. 调速尺寸使其布满整个对话框, 我这边Tab Control的尺寸最后为164X203. 在ClassWizard为其添加变量, 变量名为m_tab. 类型为CTabCtrl.3. 在对话框的初始化函数OnInitDialog里面添加如下代码:m_tab.InsertItem(0,"参数一") //添加参数一选项卡m_tab.InsertItem(1,"参数二") //添加参数二选项卡m_tab.InsertItem(2,"结果") //添加结果选项卡4.在对话框资源里面添加三个对话框资源, ID分别命名为IDD_PARA1, IDD_PARA2, IDD_RESULT. 字体为宋体, 字号为9, style为Child, Border为None, 宽度调整为161. 再分别为其添加对应的基于CDialog类CPara1, CPara2, CResult.5. 在CMyTabDlg类中添加三个成员变量m_para1, m_para2, m_result, 分别是三个子对话框的实例. 代码如下:CResult m_result CPara2 m_para2 CPara1 m_para1 6. 在IDD_PARA1对话框上添加静态文本控件内容为"参数一" 再在后面插入一个文本框控件, 用ClassWizard将其关联为一个int型变量,名为m_nPara1 在IDD_PARA2对话框上添加静态文本控件内容为"参数二" 再在后面插入一个文本框控件, 用ClassWizard将其关联为一个int型变量,名为m_nPara2 在IDD_RESULT对话框上添加静态文本控件内容为"结果" 再在后面插入一个文本框控件, 用ClassWizard将其关联为一个int型变量,名为m_nResult 7. 为CPara1类添加成员函数int GetParaValue() 代码如下:int CPara1::GetParaValue(){ return m_nPara1 }为CPara2类添加成员函数int GetParaValue() 代码如下:int CPara2::GetParaValue(){ return m_nPara2 }为CResult类添加成员函数void SetResultValue(int nResult) 代码如下:void CResult::SetResultValue(int nResult){ m_nResult = nResult }8. 在IDD_MYTAB_DIALOG对话框的初始化函数OnInitDialog里面添加如下代码://关联对话框,并且将IDC_TABTEST控件设为父窗口m_para1.Create(IDD_PARA1,GetDlgItem(IDC_TABTEST)) m_para2.Create(IDD_PARA2,GetDlgItem(IDC_TABTEST)) m_result.Create(IDD_RESULT,GetDlgItem(IDC_TABTEST)) //获得IDC_TABTEST客户区大小CRect rs m_tab.GetClientRect(&rs) //调整子对话框在父窗口中的位置rs.top+=1rs.bottom-=60rs.left+=1rs.right-=2//设置子对话框尺寸并移动到指定位置m_para1.MoveWindow(&rs) m_para2.MoveWindow(&rs) m_result.MoveWindow(&rs) //分别设置隐藏和显示m_para1.ShowWindow(true) m_para2.ShowWindow(false) m_result.ShowWindow(false) //设置默认的选项卡m_tab.SetCurSel(0)9. 添加Tab Control控件的TCN_SELCHANGE事件响应函数OnSelchangeTabtest(NMHDR* pNMHDR, LRESULT* pResult) ,函数体代码如下:int CurSel = m_tab.GetCurSel()switch(CurSel) { case 0: m_para1.ShowWindow(true)m_para2.ShowWindow(false)m_result.ShowWindow(false)breakcase 1: m_para1.ShowWindow(false)m_para2.ShowWindow(true)m_result.ShowWindow(false)breakcase 2: m_para1.ShowWindow(false)m_para2.ShowWindow(false)m_result.ShowWindow(true)breakdefault: } *pResult = 010. 在IDD_MYTAB_DIALOG对话框下面添加一个按钮, 标题为"计算" 为其添加事件响应函数, 代码如下:m_para1.UpdateData(true)m_para2.UpdateData(true)m_result.SetResultValue(m_para1.GetParaValue()+m_para2.GetParaValue())m_result.UpdateData(false)

1、在对话框中添加一个标签页控件，并为此控件关联一个CTabCtrl类变量m_tabctrl.

2、创建若干个对话框资源作为标签页控件的标签。

     修改两个属性：

     Border:    none   // 边界为空，这样它就没了标题栏

     Style:      Child   // 这个模板就可以当作另一个窗口的子窗口了在对话框的初始化函数

3，在对话框的初始化函数OnInitDialog中， 添加初始化标签页控件的代码

     3.1)  // 添加标签页，并设定标签名

     m_tabctrl.InsertItem(0, _T("XXX"))

     m_tabctrl.InsertItem(1, _T("XXX"))

     m_tabctrl.InsertItem(2, _T("XXX"))

     m_tabctrl.InsertItem(3, _T("XXX"))

     3.2)  // new若干个对话框对象，为并其添加之前定义的对话框模板，设定其父窗口为m_tabctrl 

      // new CDialog 对象   

     m_pDlgArray[0] = new CBookInfo   

     m_pDlgArray[1] = new CReaderInfo   

     m_pDlgArray[2] = new CBorrowInfo   

     m_pDlgArray[3] = new CManagerInfo

 

     3.3)  // 为CDialog对象添加对话框模板   

     m_pDlgArray[0]->Create(IDD_BOOK_INFO, &m_tabctrl)  

     m_pDlgArray[1]->Create(IDD_READER_INFO, &m_tabctrl)   

     m_pDlgArray[2]->Create(IDD_BORROW_INFO, &m_tabctrl)   

     m_pDlgArray[3]->Create(IDD_MANAGER_INFO, &m_tabctrl)

 

    3.4)  // 设置对话框在标签控件中的位置   

    CRect rc   

    m_tabctrl.GetClientRect(&rc)

    rc.top  += 20  

    rc.left  += 5   

    rc.bottom -= 5   

    rc.right -= 5

    m_pDlgArray[0]->MoveWindow(&rc)   

    m_pDlgArray[1]->MoveWindow(&rc)   

    m_pDlgArray[2]->MoveWindow(&rc)   

    m_pDlgArray[3]->MoveWindow(&rc)

 

    3.5)  // 设置缺省标签页   

    m_pDlgArray[m_nCurSel]->ShowWindow(SW_SHOW)   

    m_Tab.SetCurSel(m_nCurSel)

4.为标签控件添加TCN_SELECHANGE消息的响应函数

void CLibraryMSDlg::OnTcnSelchangeTab(NMHDR *PNMHDR, LRESULT *pResult)

{  

    int nNewSel = m_tabctrl.GetCurSel()

    if (m_nCurSel != nNewSel)  

   {  

         m_pDlgArray[m_nCurSel]->ShowWindow(SW_HIDE)   

         m_pDlgArray[nNewSel]->ShowWindow(SW_SHOW)

         m_nCurSel = nNewSel  

    }   

    return

}

m_TabCtrl.SetWindowPos(NULL,10,10,rtClient.Width()-20,

rtClient.Height()-20,SWP_SHOWWINDOW)

TCITEM tcItem

tcItem.mask = TCIF_TEXT

tcItem.pszText = _T("数据提取模块")

m_TabCtrl.InsertItem(0,&tcItem)

tcItem.pszText = _T("数据处理模块")

m_TabCtrl.InsertItem(1,&tcItem)

tcItem.pszText = _T("建模模块")

m_TabCtrl.InsertItem(2,&tcItem)

tcItem.pszText = _T("仿真模块")

m_TabCtrl.InsertItem(3,&tcItem)

tcItem.pszText = _T("比较模块")

m_TabCtrl.InsertItem(4,&tcItem)

试试，看看行不？

---