为clistbox加上智能水平滚动条.doc

为为 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.cbSize = sizeof(SCROLLINFO); scrollInfo.fMask = SIF_ALL; GetScrollInfo(SB_VERT, 在调试器内观察 SCROLLINFO，可以发现要获得 nMax 和 nPage 的正确数值，列表框至少应含有一个字符串。

SCROLLINFO 的成员 nPage 保存了列表框“每页”能够显示的项目数，nMax 是列表框内项目总数当 nMax 大于或等于 nPage，就出现了垂直滚动条我们需要知道垂直滚动条的宽度以正确计算列表框的有效显示宽度这里使用一个初始值为 0 的整数 nScrollWidth 表示，并在垂直滚动条显示时将它赋值： int nScrollWidth = 0; if(GetCount() > 1 } 接下来声明一个 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), 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( int nRet = CListBox::DeleteString(nIndex); int nBoxWidth = lRect.right - lRect.left; m_nMaxWidth = nBoxWidth; SIZE sSize; CClientDC myDC(this); int i; char szEntry[257]; for (i = 0; i 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); }。