D11 - TDBGrid Mousewheel bug?

[stalkingwolf]

wir portieren gerade unsere Programm auf Delphi 11 und wir haben noch in ein paar (alten) Programmen TDBGrid.
Damals gab es noch kein onmousewheel und wir haben das selber implementiert.
In D11 gibt es das Ereignis onMouseWheel.

Aber a) es wird nicht ausgelöst und b) es wird immer hoch gescrollt, selbst wenn man runter scrollt.
Im Netz habe ich erst einmal nichts gefunden. Sicherlich kann man nun TDBGrid gegen TVirtualStringTree austauschen, aber würde mich dennoch interessieren ob das ein Bug ist und man diese umgehen kann.