Estimado Fourier.
He editado tu último mensaje para encerrar el código publicado en la etiqueta [delphi]. Coincidirás conmigo en que ahora el mensaje es mucho mas legible.
Te recuerdo que el uso de dichas etiquetas es recomendado en los foros.
Hasta luego.