OnDragdrop y OnDragOver

[plionut]

@AgustinOrtu
Aquí está el problema, que no sabía codificar el comportamiento de los dos eventos. Gracias por responder .

@Ecfisa
genial tu respuesta, es la solución ! Mil gracias.
Pero ya que estoy, debo reconocer que no me explico como es que funciona.
A ver, según dices, los dos eventos están declarados como protected en la clase TControl.
después de esta línea:

Código Delphi [-]
type
  TSpeedButton = class(Buttons.TSpeedButton);

que pasa con la nueva clase TSpeedButton ? Los dos eventos dejan de ser protected? Puedes desarrolar un poco tu respuesta? Seguro que me resultará más que interesante y útil. Gracias.