I was looking for an option to make mouse wheel work with scrollbox component, so far I got this 

```
void __fastcall TForm1::ScrollBox1MouseWheelDown(TObject *Sender, TShiftState Shift,
          TPoint &MousePos, bool &Handled)
{
    Form1->ScrollBox1->VertScrollBar->Position++;
}

void __fastcall TForm1::ScrollBox1MouseWheelUp(TObject *Sender, TShiftState Shift,
          TPoint &MousePos, bool &Handled)
{
    Form1->ScrollBox1->VertScrollBar->Position--;
}

```

So far it works, but it scrolls really slow. Is there any way to make it scroll faster, or maybe even better way of handling scrolling in c++ builder?