DBGrid-Event wie OnMouseOver

[Minz]

also ich habe jetzt eine abgeleitete Klasse von TDBGrid erstellt, die zusätzlich auf OnMouseEnter und OnMouseLeave reagiert. Diese benutze ich um einen Flag zu setzen.

In den Events OnMouseWheelUp und down von TForm überprüfe ich dieses Flag und sende eine Message WM_Keydown an mein DBGrid.

Funktioniert wunderbar nur dummerweise springt der im Grid immer zwei Stellen weiter und nicht eine. Weiß jemand woran das liegt?

Ich habe vermutet, dass durch die Nachricht WM_Keydown, das Grid aktiv wird und dann zusätzlich die Nachricht WM_MouseWheel erhält. Wie kann ich das rausfinden? In der WndProc von meiner DBGrid-Klasse kommt keine Nachricht WM_MouseWheel an.