TabControl 相对应的窗口中无法显示WebBrowser控件

nsky567

在TabControl的标签页相对应的窗口中添加WebBrowser控件后，界面无法显示WebBrowser控件，但是WebBrowser控件的功能却能够正常使用。这说明WebBrowser控件添加是成功的，但是WebBrowser控件为什么不能显示呢？应该如何做才能让WebBrowser控件在标签页相对应的窗口中显示呢？
谢谢~~

xx_player

这是我那个例子 MFCTabWeb.rar (220.5 KB, 下载次数: 3)

2019-4-22 15:35 上传

点击文件名下载附件 ，看在你机器上能不能用，不能用，讲的都是白讲。
运行环境window10,编译vs2015.
它直接是能显示地。

xx_player

假设你tabcontrol绑定变量m_tab,WebBrowser绑定变量为m_ie,在基于对话框测试，则OnInitDialog()函数里添加
        m_tab.InsertItem(0, L"百度");
        m_tab.InsertItem(1, L"搜狐");
        m_tab.InsertItem(2, L"凤凰");
        m_tab.InsertItem(3, L"VC驿站");
        m_tab.SetCurSel(0);
        CWnd*pWnd = m_tab.GetWindow(GW_HWNDFIRST);
        RECT rc;
        m_tab.GetWindowRect(&rc);
        m_tab.AdjustRect(TRUE, &rc);
        m_ie.SetParent(pWnd);
        m_ie.SetWindowPos(pWnd,
                rc.left, rc.top,
                rc.right-rc.left,rc.bottom-rc.top,
                SWP_SHOWWINDOW);
        VARIANT url;
        url.vt=  VT_BSTR;
        url.bstrVal = SysAllocString(L"http://www.baidu.com");
        m_ie.Navigate2(&url, 0,0,0,0);

m_tab响应事件OnTcnSelchangeTab1(NMHDR *pNMHDR, LRESULT *pResult)里添加
        int CurSel = m_tab.GetCurSel();
        VARIANT url;
        url.vt = VT_BSTR;
        url.bstrVal = L"http://www.baidu.com";
        switch (CurSel)
        {
        case 0:url.bstrVal = L"http://www.baidu.com";m_ie.Navigate2(&url,0,0,0,0);break;
        case 1:url.bstrVal = L"http://www.sohu.com";m_ie.Navigate2(&url, 0,0, 0,0);break;
        case 2:url.bstrVal = L"http://www.ifeng.com";m_ie.Navigate2(&url,0, 0, 0,0);break;
        case 3:url.bstrVal = L"https://www.cctry.com";m_ie.Navigate2(&url,0, 0, 0,0);break;
        }
即可。
如果tabcontrol页中不止一个控件，就建对话框的方法 ，把控件分类都放在不同的对话框里，然后
在也改变响应事件中，显示该显示的对话框。把其它的对话框窗口都隐藏。

注意:
  要用ctrl+d反复键调整tab顺序，把tabcontrol摆在序号1,最底层，并把webBrowser窗体调整与tab客户区一样大小。

nsky567

xx_player 发表于 2019-4-20 18:02
假设你tabcontrol绑定变量m_tab,WebBrowser绑定变量为m_ie,在基于对话框测试，则OnInitDialog()函数里添加
...

非常感谢！我的问题可能没有描述清楚。我的意思就像您说的那样。我的TabControl页中不止一个控件，用建对话框的方法 ，把控件分类都放在不同的对话框里，每个分页对话框中添加一个WebBrowser控件和Button控件，然后在也改变响应事件中，显示该显示的对话框。把其它的对话框窗口都隐藏。这样在分页对话框中Button控件能够正常显示，但是WebBrowser控件却显示不出来。

xx_player

那就这样试试，强制显示 m_ie.ShowWindow(SW_SHOW);如果不行就把的父改为桌面m_ie.SetParent(NULL);再强制m_ie.ShowWindow(SW_SHOW);还不行，再m_ie.SetForegroundWindow();让它处于顶级窗口.还不出来，就这样
        m_ie.MoveWindow(0, 0, 640, 480, 1);
        m_ie.SetForegroundWindow();
        m_ie.SetParent(NULL);
让它跳出tab，指定大小直接裸显。还不行，就不用mfc,打开c#，拖WebBrowser看它显不显，显示，说明还有救。
再回到MFC，新建对话框，重新拖一个看它在纯环境显不显，窗口弄大点，还是不显，
那就真的没办法了。去把.netFrame卸了，重新装一下。控件本身不正常。
投降吧。

nsky567

xx_player 发表于 2019-4-19 17:48
这是我那个例子，看在你机器上能不能用，不能用，讲的都是白讲。
运行环境window10,编译vs2015.
它直接是 ...

谢谢谢谢！非常感谢！是我的问题。

xx_player

不过下午我专心搞了个页控件对话框地，有问题悬着不舒服。虽然问题已经结束，还是发上来，与前面的有点区别。那个.SetWindowPos在对话框里工作不正常。
页控件分4页，每页绑一个无模式对话框，对话框属性设为子窗口，绑定变量m_page1,m_page2,m_page3,m_page4,单元独立。
表示各种情况都考虑了，不是耍赖弄一个糊弄。
OnInitDialog()这样加
        m_tab.InsertItem(0, L"列表视页");
        m_tab.InsertItem(1, L"树形页");
        m_tab.InsertItem(2, L"百度页");
        m_tab.InsertItem(3, L"VC论坛页");

        CWnd*pCWnd = m_tab.GetWindow(GW_HWNDFIRST);
        m_page1.Create(IDD_DIALOG1, pCWnd);
        m_page2.Create(IDD_DIALOG2, pCWnd);
        m_page3.Create(IDD_DIALOG3, pCWnd);
        m_page4.Create(IDD_DIALOG4, pCWnd);
        m_page1.ShowWindow(SW_SHOW);
        //初始化各页控件
        //列表视
        TCHAR*s[] = {
                L"列名1",
                L"列名2",
                L"列名3",
                L"列名4",
                L"列名5",
        };
        LVCOLUMN lvc;
        for (int i = 0;i < 5;i++) {
                lvc.mask = LVCF_TEXT | LVCF_WIDTH;
                lvc.cx = 100;
                lvc.pszText = s;
                m_page1.m_listview.InsertColumn(i, &lvc);
        }
        //树
        HTREEITEM htreeitem = m_page2.m_treeview.InsertItem(L"根1");
        m_page2.m_treeview.InsertItem(L"节点1", htreeitem);
        m_page2.m_treeview.InsertItem(L"节点2", htreeitem);
        m_page2.m_treeview.InsertItem(L"节点3", htreeitem);
        //浏览器
        VARIANT url;
        url.vt = VT_BSTR;
        url.bstrVal = SysAllocString(L"http://www.baidu.com");
        m_page3.m_ie.Navigate2(&url, 0, 0, 0, 0);
        url.vt = VT_BSTR;
        url.bstrVal = SysAllocString(L"https://www.cctry.com");
        m_page4.m_ie.Navigate2(&url, 0, 0, 0, 0);
        RECT rc;
        m_tab.GetWindowRect(&rc);
        m_tab.AdjustRect(TRUE, &rc);
        m_page1.MoveWindow(&rc,TRUE);
        m_page2.MoveWindow(&rc, TRUE);
        m_page3.MoveWindow(&rc, TRUE);
        m_page4.MoveWindow(&rc, TRUE);
        m_tab.SetCurSel(0);

OnSelchangeTab1响应
        int CurSel = m_tab.GetCurSel();
        m_page1.ShowWindow(SW_HIDE);
        m_page2.ShowWindow(SW_HIDE);
        m_page3.ShowWindow(SW_HIDE);
        m_page4.ShowWindow(SW_HIDE);
        CWnd*pCWnd = m_tab.GetWindow(GW_HWNDFIRST);
        switch (CurSel)
        {
        case 0:m_page1.ShowWindow(SW_SHOW);break;
        case 1:m_page2.ShowWindow(SW_SHOW);break;
        case 2:m_page3.ShowWindow(SW_SHOW);break;
        case 3:m_page4.ShowWindow(SW_SHOW);break;
        }

再增加一个析构函数
CMFCDlgTabWebDlg::~CMFCDlgTabWebDlg()
{
        m_page1.DestroyWindow();
        m_page2.DestroyWindow();
        m_page3.DestroyWindow();
        m_page4.DestroyWindow();
}

代码在这里 MFCDlgTabWeb.rar (225.95 KB, 下载次数: 3)

2019-4-22 21:33 上传

点击文件名下载附件

运行环面


不是给网站做广告，是搞深了，不知不觉中毒了，就想起用它做测试。

nsky567

xx_player 发表于 2019-4-22 21:39
不过下午我专心搞了个页控件对话框地，有问题悬着不舒服。虽然问题已经结束，还是发上来，与前面的有点区别 ...

大赞 非常非常感谢