Scrollen mit Mausrad

[knochen]

Hallo zusammen,

wie kann ich den Inhalt einer Form oder einer Scrollbox mit dem Mausrad scollen?

Beipiel: Ich habe eine Form, darauf eine Scrollbox, in der Scrollbox so viele Komponenten, dass man scrollen muss, um sie zu sehen. Standardverhalten von Delphi: man fasst den Scrollbalken an, erst beim Loslassen scrollt die Box an die gewünschte Stelle. VerScrollBar.Tracking := True mildert dieses Problem etwas ab. Der Inhalt scrollt bereits beim Bewegen des Scrollbars. Leider auch nicht zeitgemäß. Wünschenswert wäre die Unterstützung des Mausrades zum Scrollen, so wie im Webbrowser.

Gibt es eine Möglichkeit oder Komponente die so was erledigt, ohne dass ich für jede der sehr vielen Forms in unserem Programm einen OnMouseWheel-Event schreiben muss?

Vielen Dank.