LRESULT CALLBACK WndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
static int cxChar, cxCaps, cyChar, cyClient, iVscrollPos ;
HDC hdc ;
int i, y ;
PAINTSTRUCT ps ;
TCHAR szBuffer[10] ;
TEXTMETRIC tm ;
switch (message)
{
case WM_CREATE:
hdc = GetDC (hwnd) ;
GetTextMetrics (hdc, &tm) ;
cxChar = tm.tmAveCharWidth ;
cxCaps = (tm.tmPitchAndFamily & 1 ? 3 : 2) * cxChar / 2 ;
cyChar = tm.tmHeight + tm.tmExternalLeading ;
ReleaseDC (hwnd, hdc) ;
SetScrollRange (hwnd, SB_VERT, 0, NUMLINES - 1, FALSE) ;
SetScrollPos (hwnd, SB_VERT, iVscrollPos, TRUE) ;
return 0 ;
case WM_SIZE:
cyClient = HIWORD (lParam) ;
return 0 ;
case WM_VSCROLL:
switch (LOWORD (wParam))
{
case SB_LINEUP:
iVscrollPos -= 1 ;
break ;
case SB_LINEDOWN:
iVscrollPos += 1 ;
break ;
case SB_PAGEUP:
iVscrollPos -= cyClient / cyChar ;
break ;
case SB_PAGEDOWN:
iVscrollPos += cyClient / cyChar ;
break ;
case SB_THUMBPOSITION:
iVscrollPos = HIWORD (wParam) ;
break ;
default :
break ;
}
iVscrollPos = max (0, min (iVscrollPos, NUMLINES - 1)) ;
if (iVscrollPos != GetScrollPos (hwnd, SB_VERT))
{
SetScrollPos (hwnd, SB_VERT, iVscrollPos, TRUE) ;
InvalidateRect (hwnd, NULL, TRUE) ;
}
return 0 ;
case WM_PAINT:
hdc = BeginPaint (hwnd, &ps) ;
for (i = 0 ; i < NUMLINES ; i++)
{
y = cyChar * (i - iVscrollPos) ;
TextOut (hdc, 0, y,
sysmetrics[i].szLabel,
lstrlen (sysmetrics[i].szLabel)) ;
TextOut (hdc, 22 * cxCaps, y,
sysmetrics[i].szDesc,
lstrlen (sysmetrics[i].szDesc)) ;
SetTextAlign (hdc, TA_RIGHT | TA_TOP) ;
TextOut (hdc, 22 * cxCaps + 40 * cxChar, y, szBuffer,
wsprintf (szBuffer, TEXT ("%5d"),
GetSystemMetrics (sysmetrics[i].iIndex))) ;
SetTextAlign (hdc, TA_LEFT | TA_TOP) ;
}
EndPaint (hwnd, &ps) ;
return 0 ;
case WM_DESTROY:
PostQuitMessage (0) ;
return 0 ;
}
return DefWindowProc (hwnd, message, wParam, lParam) ;
}
WndProc窗口消息處理程序在處理WM_CREATE消息時(shí)增加了兩條敘述，以設(shè)置垂直滾動(dòng)條的范圍和初始位置：
SetScrollRange (hwnd, SB_VERT, 0, NUMLINES - 1, FALSE) ;
SetScrollPos (hwnd, SB_VERT, iVscrollPos, TRUE) ;
具有NUMLINES行文字，所以滾動(dòng)條范圍被設(shè)定為0至NUMLINES-1。滾動(dòng)條的每個(gè)位置對(duì)應(yīng)于在顯示區(qū)域頂部顯示的一個(gè)文字行。如果卷動(dòng)方塊的位置為0，則第一行會(huì)被放置在顯示區(qū)域的頂部。如果位置大于0，其它行就會(huì)出現(xiàn)在顯示區(qū)域的頂部。當(dāng)位置為NUMLINES-1時(shí)，則最后一行文字出現(xiàn)在顯示區(qū)域的頂部。
為了有助于處理WM_VSCROLL消息，在窗口消息處理程序中定義了一個(gè)靜態(tài)變量iVscrollPos，這一變量是滾動(dòng)條內(nèi)卷動(dòng)方塊的目前位置。對(duì)于SB_LINEUP和SB_LINEDOWN，只需要將卷動(dòng)方塊調(diào)整一個(gè)單位的位置。對(duì)于SB_PAGEUP和SB_PAGEDOWN，我們想移動(dòng)一整面的內(nèi)容，或者移動(dòng)cyClient /cyChar個(gè)單位的位置。對(duì)于SB_THUMBPOSITION，新的卷動(dòng)方塊位置是wParam的高字組。SB_ENDSCROLL和SB_THUMBTRACK消息被忽略。
在程序依據(jù)收到的WM_VSCROLL消息計(jì)算出新的iVscrollPos值后，用min和max宏來(lái)調(diào)整iVscrollPos，以確保它在最大值與最小值之間。程序然后將iVscrollPos與呼叫GetScrollPos取得的先前位置相比較，如果卷動(dòng)位置發(fā)生了變化，則使用SetScrollPos來(lái)進(jìn)行更新，并且呼叫InvalidateRect使整個(gè)窗口無(wú)效。
InvalidateRect呼叫產(chǎn)生一個(gè)WM_PAINT消息。
在處理完滾動(dòng)條消息后，不更新顯示區(qū)域，相反，它呼叫InvalidateRect使顯示區(qū)域失效。這導(dǎo)致Windows將一個(gè)WM_PAINT消息放入消息隊(duì)列中。
最好能使Windows程序在響應(yīng)WM_PAINT消息時(shí)完成所有的顯示區(qū)域繪制功能。因?yàn)槌绦虮仨氃谝唤邮盏絎M_PAINT消息時(shí)就更新整個(gè)顯示區(qū)域，如果在程序的其它部分也繪制的話，將很可能使程序代碼重復(fù)。
只將窗口顯示區(qū)域標(biāo)記為無(wú)效以產(chǎn)生WM_PAINT消息，對(duì)于某些應(yīng)用程序來(lái)說(shuō)也許不是完全令人滿意的選擇。在呼叫InvalidateRect之后，Windows將WM_PAINT消息放入消息隊(duì)列中，最后由窗口消息處理程序處理它。然而，Windows將WM_PAINT消息當(dāng)成低優(yōu)先級(jí)消息，如果系統(tǒng)有許多其它的動(dòng)作正在發(fā)生，那么也許會(huì)讓您等待一會(huì)兒工夫。這時(shí)，當(dāng)對(duì)話框消失時(shí)，將會(huì)出現(xiàn)一些空白的「洞」，程序仍然等待更新它的窗口。
如果您希望立即更新無(wú)效區(qū)域，可以在呼叫InvalidateRect之后呼叫UpdateWindow：
UpdateWindow (hwnd) ;
如果顯示區(qū)域的任一部分無(wú)效，則UpdateWindow將導(dǎo)致Windows用WM_PAINT消息呼叫窗口消息處理程序（如果整個(gè)顯示區(qū)域有效，則不呼叫窗口消息處理程序）。這一WM_PAINT消息不進(jìn)入消息隊(duì)列，直接由Windows呼叫窗口消息處理程序。窗口消息處理程序完成更新后立即退出，Windows將控制傳回給程序中UpdateWindow呼叫之后的敘述。