Hola. Gracias por el ejemplo.
Le he hecho algunas modificaciones para que vaya más rápido pues necesito que se ejecute en una máquina lenta y hay que optimizarlo al máximo, y lo he encapsulado en un componente, pero aún quiero añadirle algunas propiedades. En cuanto esté terminado lo pongo aquí disponible.
Un saludo.
![Smilie](http://www.clubdelphi.com/foros/images/smilies/smile.gif)