为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中：