TListbox "MouseLeave" überschreiben

[himitsu]

Hättest du mal den Quellcode mit gekauft, dann könntest du nachsehn wie TControl.CMMouseEnter definiert ist und Dieses einfach kopieren/nachmachen.


http://www.delphi-treff.de/object-pa...n-und-objekte/ -> Botschaftsmethoden

http://www.delphipraxis.net/178117-k...auslagern.html


PS: Die Message heißt bestimmt vermutlich CM_MOUSE_ENTER (Component Message) oder du nimmst WM_MOUSEACTIVATE und WM_MOUSELEAVE (Windows Message)
siehe Unit Messages (oder vcl.messages ... k.A.) und dort kannst du ja in der OH oder via Codevervollständigung rumstöbern.