SetFocus (hScroll) ;
return 0 ;
case WM_VSCROLL :
switch (wParam)
{
case SB_TOP :
iPosition = 0 ;
break ;
case SB_BOTTOM :
iPosition = iNumLines ;
break ;
case SB_LINEUP :
iPosition -= 1 ;
break ;
case SB_LINEDOWN :
iPosition += 1 ;
break ;
case SB_PAGEUP :
iPosition -= cyClient / cyChar ;
break ;
case SB_PAGEDOWN :
iPosition += cyClient / cyChar ;
break ;
case SB_THUMBPOSITION :
iPosition = LOWORD (lParam) ;
break ;
}
if (iPosition != GetScrollPos (hScroll, SB_CTL))
{
SetScrollPos (hScroll, SB_CTL, iPosition, TRUE) ;
InvalidateRect (hwnd, NULL, TRUE) ;
}
return 0 ;
case WM_PAINT :
hdc = BeginPaint (hwnd, &ps) ;
pText = (char *) LockResource (hResource) ;
GetClientRect (hwnd, &rect) ;
rect.left += cxChar ;
rect.top += cyChar * (1 - iPosition) ;
DrawTextA (hdc, pText, -1, &rect, DT_EXTERNALLEADING) ;
EndPaint (hwnd, &ps) ;
return 0 ;
case WM_DESTROY :
FreeResource (hResource) ;
PostQuitMessage (0) ;
return 0 ;
}
return DefWindowProc (hwnd, message, wParam,