Mit dem Mausrad in einer Scrollbox scrollen

[delphicoder123]

Das richtige Ereignis zu nehmen hat auch nicht geholfen.
Genau das gleiche Verhalten, wie vorher.

Delphi-Quellcode:

procedure TForm1.ScrollBox2MouseWheel(Sender: TObject;
  Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint;
  var Handled: Boolean);
begin
  ScrollBox2.VertScrollBar.Position := ScrollBox2.VertScrollBar.Position + WheelDelta;
end;