Listing 5

// Add to TScrollWin class
virtual void WMSize(RTMessage Msg)
  = [WM_FIRST + WM_SIZE];

// Add to SCROLL.CPP
void TScrollWin::WMSize(RTMessage Msg)
{
  TWindow::WMSize(Msg);
  if (Msg.WParam != SIZEICONIC)
    AdjustScroller();
}
