Muchas gracias Roman,
Había llegado hasta una función recursiva ya que utilizo el ControlAtPos de manera bastante enreversada
.
Pero no caí en la cuenta de preguntar por Panel.ControlAtPos
De hecho había consultado la ayuda propia de Delphi y tenía claro que el problema estaba en el Parent. Pero no encontraba como solucionarlo.
Gracias por tu ayuda. Mientras escribo esto veo que has puesta también otro ejemplo con una función. De nuevo muchas gracias.