VC实现滚动条的详解

显示区域大小：

我们曾经使用过 GetClientRect 函数来获取显示区域的大小，使用这个函数没有什么不好，只是效率太低，确定显示区域更好的方法是在窗口消息处理程序中处理 WM_SIZE消息。传递给窗口消息处理程序的lParam 参数的低字节包含显示区域的宽度，高字节包含高度。

static int nxClient, nyClient;

case WM_SIZE:

nxClient = LOWORD(lParam);

nyClient = HIWORD(lParam);

return 0;

滚动条的范围和位置：

每个滚动条有一个相关的“范围”和“位置”，位置是一个整数序列。

SetScrollRange(hwnd, iBar, iMin, iMax, bRedraw);

 // iBar 为 SB_VERT 或者 SB_HORZ。如果想要 Windows 根据新范围重画滚动条，则 //设置bRedraw 为 TRUE;

SetScrollPos(hwnd, iBar, iPos, bRedraw);

//iPos 是设置在iMin 和 iMax 之间的整数值

当释放鼠标按键后，程序会收到一个带有SB_ENDSCROLL通知码的消息，一般可以忽略这个消息。

当把鼠标的光标在滑块上按鼠标时，就会产生SB_THUMBTRACK 和 SB_THUMBPOSITION 通知码的滚动条消息。当 wParam 的低字节是 SB_THUMBTRACK时，wParam 的高字节是使用者在拖动滑块时的当前位置。当 wParam 的低字节是 SB_THUMBPOSITION 时，wParam 的高字节是使用者释放滑块的最终位置。

滚动条范围使用 32 位的值也是可以的，但是当使用了32位的时候，wParam(16位) 的高字节就不能准确获得滑块当前的位置了，这时候，需要使用 GetScrollInfo 函数来得到信息。

OK，来写代码：

第一步，在 CreateWindow 中添加 WS_VSCROLL 如下：

hwnd = CreateWindow(szClsName, TEXT("Scroll Test."), WS_OVERLAPPEDWINDOW | WS_VSCROLL, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL, hInstance, NULL);

第二步，添加 WM_VSCROLL 响应：

WM_VSCROLL:

switch(LOWORD){wParam}

{

case SB_THUMBTRACK:

nVPos = HIWORD(wParam);

break;

case SB_PAGEDOWN:

nVPos += nyClient / nyChar;

break;

case SB_PAGEUP:

nVPos -= nyClinet / nyChar;

break;

case SB_LINEDOWN:

nVPos += 1;

break;

case SB_LINEUP:

nVPos -= 1;

break;

}

nVPos = max(0, min(nVPos, NUMLINES - nyClinet / nyChar));

if(nVPos != GetScrollPos(hwnd, SB_VERT)) //滑块位置改变

{

SetScrollPos(hwnd, SB_VERT, nVPos, TRUE); //重设位置

InvalidateRect(hwnd, NULL, TRUE);   //重绘显示区

}

第三步：添加绘制响应

case WM_PAINT:

hdc = BeginPaint(hwnd, &ps);

  for(i = 0; i < NUMLINES; i++)

  {

   y = nyChar * (i - nVPos);

   TextOut(hdc, 0, y, sysmetrics[i].szLabel, lstrlen(sysmetrics[i].szLabel));

   TextOut(hdc, 22*nxCaps, y, 

    sysmetrics[i].szDesc, lstrlen(sysmetrics[i].szDesc));

   SetTextAlign(hdc, TA_RIGHT | TA_TOP);

   TextOut(hdc, 22*nxCaps + 40*nxChar, y, 

    szBuf, wsprintf(szBuf, TEXT("%d"), GetSystemMetrics(sysmetrics[i].Index)));

   SetTextAlign(hdc, TA_LEFT | TA_TOP);

  }

EndPaint(hwnd, &ps);

  第四步，当窗口大小发生改变时重绘

  case WM_SIZE:

nyClient = HIWORD(lParam);

SetScrollRange(hwnd, SB_VERT, 0, NUMLINES - nyClient / nyChar, FALSE);

SetScrollPos(hwnd, SB_VERT, nVPos, TRUE);

if((NUMLINES - nVPos)*nyChar < nyClient && NUMLINES * nyChar > nyClient)

{

nVPos = NUMLINES - nyClient / nyChar;

//PostMessage(hwnd, WM_VSCROLL, (nVPos << 16) & SB_THUMBTRACK, 0);

}

///////////////////////////////////  源码   /////////////////////////////////////////////

#define UNICODE UNICODE
      #include <Windows.h>
     #include "metrics.h"

LRESULT CALLBACK WndProc(
       HWND hwnd,      // handle to window
       UINT uMsg,      // message identifier
       WPARAM wParam,  // first message parameter
       LPARAM lParam   // second message parameter
       )
{
 HDC hdc;
 PAINTSTRUCT ps;
 static int nxChar, nyChar, nxCaps;
 static int nyClient, nVPos;
 int i, y;
 TCHAR szBuf[10];

 switch(uMsg)
 {
 case WM_CREATE:
  TEXTMETRIC tm;
  hdc = GetDC(hwnd);
  GetTextMetrics(hdc, &tm);

  nxChar = tm.tmAveCharWidth;
  nyChar = tm.tmHeight + tm.tmExternalLeading;
  nxCaps = (tm.tmPitchAndFamily & 1 ? 3 : 2) * nxChar / 2 ;
  ReleaseDC(hwnd, hdc);

 case WM_PAINT:
  hdc = BeginPaint(hwnd, &ps);
  for(i = 0; i < NUMLINES; i++)
  {
   y = nyChar * (i - nVPos);
   TextOut(hdc, 0, y, sysmetrics[i].szLabel, lstrlen(sysmetrics[i].szLabel));
   TextOut(hdc, 22*nxCaps, y,
    sysmetrics[i].szDesc, lstrlen(sysmetrics[i].szDesc));

   SetTextAlign(hdc, TA_RIGHT | TA_TOP);
   TextOut(hdc, 22*nxCaps + 40*nxChar, y,
    szBuf, wsprintf(szBuf, TEXT("%d"), GetSystemMetrics(sysmetrics[i].Index)));
   SetTextAlign(hdc, TA_LEFT | TA_TOP);
  }
  EndPaint(hwnd, &ps);
  return 0;
 case WM_SIZE:  
  nyClient = HIWORD(lParam);
  SetScrollRange(hwnd, SB_VERT, 0, NUMLINES - nyClient / nyChar, FALSE);
  SetScrollPos(hwnd, SB_VERT, nVPos, TRUE);
  if((NUMLINES - nVPos)*nyChar < nyClient && NUMLINES * nyChar > nyClient)
  {
   nVPos = NUMLINES - nyClient / nyChar;
   //PostMessage(hwnd, WM_VSCROLL, (nVPos<<16) & SB_THUMBTRACK,0);
  }
  return 0;
 case WM_VSCROLL:
  switch(LOWORD(wParam))
  {
  case SB_THUMBTRACK:
   nVPos = HIWORD(wParam);
   break;
  case SB_PAGEDOWN:
   nVPos += nyClient / nyChar;
   break;
  case SB_PAGEUP:
   nVPos -= nyClient / nyChar;
   break;
  case SB_LINEDOWN:
   nVPos += 1;
   break;
  case SB_LINEUP:
   nVPos -= 1;
   break;
  }
  nVPos = max(0, min(nVPos, NUMLINES - nyClient / nyChar));
  if(nVPos != GetScrollPos(hwnd, SB_VERT))
  {
   SetScrollPos(hwnd, SB_VERT, nVPos, TRUE);
   InvalidateRect(hwnd, NULL, TRUE);
  }
  return 0;
 case WM_CLOSE:
  DestroyWindow(hwnd);
 case WM_DESTROY:
  PostQuitMessage(0);
  return 0;
 }
 return DefWindowProc(hwnd, uMsg, wParam, lParam);
}

int WINAPI WinMain(
       HINSTANCE hInstance,      // handle to current instance
       HINSTANCE hPrevInstance,  // handle to previous instance
       LPSTR lpCmdLine,          // command line
       int nCmdShow              // show state
       )
{
 static TCHAR szClsName[] = TEXT("HelloWin");
 HWND hwnd;
 MSG msg;
 WNDCLASS cls;
 
 cls.cbClsExtra = 0;
 cls.cbWndExtra = 0;
 cls.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
 cls.hCursor = LoadCursor(NULL, IDC_ARROW);
 cls.hIcon = LoadIcon(NULL, IDI_APPLICATION);
 cls.hInstance = hInstance;
 cls.lpfnWndProc = WndProc;
 cls.lpszClassName = szClsName;
 cls.lpszMenuName = NULL;
 cls.style = CS_VREDRAW | CS_HREDRAW;
 
 if(!RegisterClass(&cls))
 {
  MessageBox(NULL, TEXT("This program requires Windows NT!"),
   szClsName, MB_ICONERROR);
  return 0;
 }
 
 hwnd = CreateWindow(szClsName, TEXT("Bing's Pad"), WS_OVERLAPPEDWINDOW | WS_VSCROLL,
  CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
  NULL, NULL, hInstance, NULL);
 
 ShowWindow(hwnd, nCmdShow);
 UpdateWindow(hwnd);
 
 while(GetMessage(&msg,NULL,0,0))
 {
  TranslateMessage(&msg);
  DispatchMessage(&msg);
 }
 
 return msg.wParam;
}