Delphi - scroll del mouse

Saludos,

Tengo problemas con el scroll del mouse, ojala alguien me pudiera decir como activar para que con el scroll del mouse se pueda mover un scroll bar en una forma, porke tengo una aplicacion que tiene scroll bar y aparece bajado ntonces como no se como activar el scroll del mouse, tengo ke hacer el desplazamiento con el puntero y hacerlo todo manual...

procedure TForm1.FormMouseWheelDown(Sender: TObject; Shift: TShiftState;
MousePos: TPoint; var Handled: Boolean);
begin
Form1.VertScrollBar.Position:=Form1.VertScrollBar.Position+10;
end;

procedure TForm1.FormMouseWheelUp(Sender: TObject; Shift: TShiftState;
MousePos: TPoint; var Handled: Boolean);
begin
Form1.VertScrollBar.Position:=Form1.VertScrollBar.Position-10;
end;

Saludos.

Gracias esto sirvio de maravilla, solo una duda mas, cuando abre mi aplicacion, el scrollbar aparece abajo, no sabes como o donde ponerle que la posicion inicial sea hasta arriba?

Prueba con poner en el OnShow del Form

Form1.VertScrollBar.Position:=0;

Saludos.