[MFC] 为CListBox加上智能水平滚动条

　　在MFC中，用列表框（CListBox）来显示多个字符串是一种很方便的方法。但缺省的列表框水平滚动条不够智能——这里智能的含义是：在应该出现的时候出现，不应该出现的时候消失，而且应能自动调节自己的大小。本文通过实例说明了存在的问题和解决办法。

一、问题演示

　　首先用Visual Studio应用向导创建工程CustomCListBox。这是一个基于对话框的应用，向导提供的所有可选参数均采用其缺省值。

　　在资源编辑器中将对主话框字体设为宋体12，插入一个CListBox控制，设其ID为IDC_LLISTTEST，大小为125 X 84。 请确认列表框的垂直滚动条、水平滚动条有效，取消其排序风格。

　　启动Class Wizard，选择Member Variables选项卡，为列表框加入对应的成员变量m_lListTest，在Category中选择Control。

　　接下来在Workspace窗格中选择ClassView，扩展CCustomCListBoxDlg类并双击OnInitDialog()，在编辑窗格中找到注释行“TODO: Add extra initialization here”，在该行下面加入以下内容：

　　m_lListTest.AddString(_T( "One "));　　m_lListTest.AddString(_T( "Two "));　　m_lListTest.AddString(_T( "Three "));　　m_lListTest.AddString(_T( "Four "));　　m_lListTest.AddString(_T( "Five "));　　m_lListTest.AddString(_T( "Six "));　　m_lListTest.AddString(_T( "北国风光，千里冰封，万里雪飘。 "));　　m_lListTest.AddString(_T( "Eight "));　　m_lListTest.AddString(_T( "Nine "));　　m_lListTest.AddString(_T( "Ten "));

　　编译并运行这个工程，可以发现列表框能够正确显示全部内容。

　　如果在上述m_lListText.AddString(_T "Ten "))后面加入一行：

　　m_lListTest.AddString(_T( "Eleven "));

　　重新编译并运行该工程，可以发现出现了一个垂直滚动条。垂直滚动条的出现使得列表框水平方向有效显示宽度变小，第七行的内容被切割而不能完整显示。但此时水平滚动条并没有自动出现，第七行被切割部分就无法看到了。

　　如果我们删除最后加入的语句，把第七行汉字加长到超出列表框显示宽度为止，也可以发现水平滚动条不会自动出现。被切割部分仍旧无法看到。

　　由此可知，CListBox的水平滚动条并不象垂直滚动条那样“聪明”：垂直滚动条总是能够在需要它的时候自动出现，并能够自动调节自身大小，而水平滚动条不能。

二、解决问题

　　为提高代码的可重用性，可以创建CListBox的派生类，在派生类中实现“智能”水平滚动条。需要考虑的主要问题包括：跟踪最大字符串宽度（应能适应不同场合下的字体变化），必要时计算垂直滚动条宽度，自动显示和调节水平滚动条的大小。

　　选菜单 Insert/New Class，设新创建类的名字为CDJListBox，其基类为CListBox，其它选项采用缺省值。单击OK，Visual Studio自动生成DJListBox.cpp和DJListBox.h两个文件。

　　接下来将主对话框的列表框改为CDJListBox类型，即在CLassView扩展CCustomListBoxDlg类并双击m_lListTest成员，在编辑窗格，修改

　　CListBox m_lListTest;

　　为：

　　CDJListBox m_lListTest;

　　然后，在类声明代码之前，插入

　　#include "DJListBox.h "

　　此时如果重新编译并运行，是无法看到任何实质性的改变的，因为我们并没有修改CDJListBox。所有对于CDJListBox的调用都直接传递给基类CListBox了。

　　跟踪字符串最大宽度可以通过覆盖CListBox::AddString()实现。打开DJListBox.h，紧接类的析构函数加入如下声明：

　　int AddString( LPCTSTR lpszItem );

　　并在实现文件DJListBox.cpp加入该函数框架：

　　int CDJListBox::AddString(LPCTSTR lpszItem)　　{　　　　//此处加入字符串宽度跟踪、水平滚动条显示等代码　　}

　　字符串宽度跟踪可以用整形成员变量m_nMaxWidth实现。在DjListBox.h的protected声明区内，加入以下一行：

　　int m_nMaxWidth;

　　在DJListBox.cpp文件，找到CDJListBox的建构函数，为这个最大宽度作初始化：

　　m_nMaxWidth = 0;

　　现在可以改动新加入的AddString()了。先应该调用基类AddString()，并用nRet记录其返回值：

　　int nRet = CListBox::AddString(lpszItem);

　　接下来调用GetScrollInfo()以获得垂直滚动条的相关信息。这些信息是通过一个SCROLLINFO结构传递的，下面是对该结构初始化并调用GetScrollInfo()的代码：

　　SCROLLINFO scrollInfo;　　memset(&scrollInfo, 0, sizeof(SCROLLINFO));　　scrollInfo.cbSize = sizeof(SCROLLINFO);　　scrollInfo.fMask = SIF_ALL;　　GetScrollInfo(SB_VERT, &scrollInfo, SIF_ALL);

　　在调试器内观察SCROLLINFO，可以发现要获得nMax和nPage的正确数值，列表框至少应含有一个字符串。SCROLLINFO的成员nPage保存了列表框“每页”能够显示的项目数，nMax是列表框内项目总数。当nMax大于或等于nPage，就出现了垂直滚动条。我们需要知道垂直滚动条的宽度以正确计算列表框的有效显示宽度。这里使用一个初始值为0的整数nScrollWidth表示，并在垂直滚动条显示时将它赋值：

　　int nScrollWidth = 0;　　if((GetCount() > 1) && ((int)scrollInfo.nMax >= (int)scrollInfo.nPage))　　{　　　　nScrollWidth = GetSystemMetrics(SM_CXVSCROLL);　　}

　　接下来声明一个SIZE变量sSize，并实例化对话框的CClientDC：

　　SIZE sSize;　　CClientDC myDC(this);

　　对话框所采用的字体，有可能是缺省字体，也有可能是有目的的选择。在对话框编辑器中右击对话框，并选择Properties可以查看当前值。虽然MyDC是从列表框取得的，但列表框字体信息并未包含在MyDC中。也就是说，对话框创建时所用字体并没有“选入”CClientDC。要从GetTextExtentPoint32()获得真正的字符串大小，应该先调用GetFont()获得列表框的字体信息，然后将此字体选入MyDC，代码为：

　　Cfont* pListBoxFont = GetFont();　　if(pListBoxFont != NULL)　　{　　　　Cfont* pOldFont = myDC.SelectObject(pListBoxFont);

　　现在可以调用GetTextExtendPoint32()函数来获得字符串的宽度了。字符串的宽度由sSize结构的cx成员返回，将该值和已有最大宽度相比较：

　　　　GetTextExtentPoint32(myDC.m_hDC, lpszItem, strlen(lpszItem), &sSize);　　　　m_nMaxWidth = max(m_nMaxWidth, (int)sSize.cx);

　　剩下的重要工作之一，就是设置水平滚动条的大小了。这可以通过调用SetHorizontalExtent()完成。如果传递给它的整形参数比列表框本身宽度小，则水平滚动条被隐藏。

　　这里有一个容易被忽略的地方。如果仔细观察CListBox，可以发现文本左边有一栏小小的空白，它的大小为3 。这部分宽度应该加到文本宽度上。如果希望在文本右边也同样空出一栏，则可以在文本宽度上再加3。

　　SetHorizontalExtent(m_nMaxWidth + 3);

　　在结束之前，我们需要为MyDC选入原有字体。原有字体保存在pOldFont中：

　　　　myDC.SelectObject(pOldFont);

　　}

　　return nRet;

　　编译并执行新的代码，可以看到水平滚动条终于能够自动显示了。

三、其它问题

　　在实际应用中，凡是改变列表框内容的函数都可能影响水平滚动条的显示要求，因而也必须加以定制。但其基本过程——计算文本宽度并按指定大小显示滚动条等，和上述讨论过程是相似的。

　　CListBox类能够改变列表内容的方法除AddString()外，还有DeleteString()，InsertString()，ResetContent()。其中InsertString()用于在指定位置插入字符串，在本文讨论的主题内它和AddString()是一样的。

　　DeleteString()删除一个字符串，在派生类中其参考代码如下：

　　int CDJListBox::DeleteString(UINT nIndex)　　{　　　　RECT lRect;　　　　GetWindowRect(&lRect);

　　　　int nRet = CListBox::DeleteString(nIndex);

　　　　int nBoxWidth = lRect.right - lRect.left;　　　　m_nMaxWidth = nBoxWidth;

　　　　SIZE sSize;　　　　CClientDC myDC(this);

　　　　CFont* pListBoxFont = GetFont();　　　　CFont* pOldFont = myDC.SelectObject(pListBoxFont);

　　　　char szEntry[257];　　　　　　　　　　　　　　　　　　// 必须确保足够大

　　　　for (int i = 0; i < GetCount(); i++)　　　　{　　　　　　GetText(i, szEntry);　　　　　　GetTextExtentPoint32(myDC.m_hDC, szEntry, wcslen(szEntry), &sSize);　　　　　　maxWidth = max(maxWidth, (int)sSize.cx);　　　　}

　　　　myDC.SelectObject(pOldFont);

　　　　if (m_nMaxWidth > nBoxWidth) // 显示水平滚动条　　　　{　　　　　　ShowScrollBar(SB_HORZ, TRUE);　　　　　　SetHorizontalExtent(m_nMaxWidth);　　　　}　　　　else　　　　{　　　　　　ShowScrollBar(SB_HORZ, FALSE);　　　　}　　　　return nRet;　　}

　　ResetContent()用于清除列表框的全部内容。在派生类中其参考代码如下：

　　void CDJListBox::ResetContent()　　{　　　　CListBox::ResetContent();

　　　　m_nMaxWidth = 0;　　　　SetHorizontalExtent(0);

　　}