Hola tiammat, puedes utilizar el evento OnMouseWeel de tu ScrollBox:
Código Delphi
[-]
procedure TForm1.ScrollBox1MouseWheel(Sender: TObject; Shift: TShiftState;
WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
begin
ScrollBox1.VertScrollBar.Position:=ScrollBox1.VertScrollBar.Position-(WheelDelta div 30);
end;
Para el dbGrid, revisa esta
página.
Y recuerda preguntas diferentes, deben estar en hilos diferentes.
Saluditos