MouseOver / MouseLeave auf MenuItem

[gmc616]

Hallo Delphi-Gemeinde,

Wie bekommt man raus, welcher MenuPunkt im MainMenü gerade mit der Maus überfahren wird?

Mein Ziel ist es im MenuItem.OnMouseOver eine Aktion zu starten und im MenuItem.OnMouseLeave die Aktion zu beenden.
Leider gibt es derartige Events in Delphi 2009 nicht.
Meine Experimente mit CM_MOUSELEAVE und CM_MOUSEENTER funktionieren mit (fast) jedem Control, nur nicht mit MenuItems.

Habt ihr Ideen wie ich den aktuell markierten (nicht geklickten!) MenuPunkt heraus bekomme?

Danke für eure Hilfe.