Ayudame con OnMouseMove

[JANDREGUE]

Hola amigos

Lo que necesito es que cada vez que el mouse roce un componente pueda robarme el valor del Hint de este componente y mandarlo a un Label destinado, lo he hecho, pero colocandole a cada componete en el evento OnMouseMove un codigo como el siguiente: Label1.caption:=Edit1.Hint...por Ej.

Lo que quiero es poder hacer un proceso Unico que reconozca el componente rozado por el mouse y capture el Hint; con el fin de ahorrar codigo y no repetir tanto lo mismo puesto que podria aplicar el proceso al evento de un solo componente y heredarlo en los demás...

Espero haberme hecho entender....gracias por la atencion espero me colaboren.